表格预览(可编辑)

st788796

游客，如果您要查看本帖隐藏内容请回复

测试

1. (defun c:tt ()
   
2.   (xd::odcl:previewtable '(("A" "B" "C") (1 2 3) (4 5 6)))
   
3.   (princ)
   
4. )
   

(defun c:tt ()<br />   (xd::odcl:previewtable '(("A" "B" "C") (1 2 3) (4 5 6)))<br />   (princ)<br /> )<br />

liuyj

这个高深了，得消化一阵子

zhangq_cai1

高大上~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

newer

UI上是不是在丰富下页面，现在感觉太平了，表格下面加个rectang 设置好背景色是不是更好点？

st788796

newer 发表于 2014-12-15 18:48
UI上是不是在丰富下页面，现在感觉太平了，表格下面加个rectang 设置好背景色是不是更好点？

下步根据内容调整大小

st788796

odcl限制只能将就了

st788796

根据 G 版提醒 CellStyle 改用 13 方式，还有个问题 列标题 没有找到修改方法，哪位知道提个醒

houyu-_10651552

三翻四复琐琐碎碎啊反反复复反反复复反反复复反反复复反反复复

Lispboy

st788796 发表于 2014-12-16 07:38
根据 G 版提醒 CellStyle 改用 13 方式，还有个问题 列标题 没有找到修改方法，哪位知道提个醒

grs432

CAD与表格上开发越来越圆满了。。

st788796

Lispboy 发表于 2014-12-16 09:54

这个不能在位编辑，而且列标题在行计数中没有，下一行才是 0

Lispboy

st788796 发表于 2014-12-16 10:04
这个不能在位编辑，而且列标题在行计数中没有，下一行才是 0

看看下面：



(dcl-Control-GetProperties  grid)
("(Name)" "BeginLabelEdit" "ButtonClicked" "ColumnAlignmentList"
"ColumnAlternateImageList" "ColumnCaptionList" "ColumnClick"
"ColumnDefaultImageList" "ColumnImageList" "ColumnListImages" "ColumnListItems"
"ColumnStyleList" "ColumnWidthList" "DblClicked" "EndLabelEdit" "FontBold"
"FontItalic" "FontSize" "FontStrikeout" "FontUnderline" "KeyDown" "KeyUp"
"KillFocus" "MouseDown" "MouseMove" "MouseUp" "SelChanged" "SetFocus"
"ToolTipAviFileName" "ToolTipBalloon" "ToolTipLine" "ToolTipPicture"
"ToolTipTitle" "ToolTipTitleColor" "(Control Browser)" "(Custom)"
"AltOrientation" "AlternatingColor" "BackColor" "BorderStyle"
"BottomFromBottom" "ColumnHeader" "Enabled" "EventInvoke" "Font" "GridLines"
"Height" "ImageList" "IsTabStop" "LabelWrap" "Left" "LeftFromRight"
"RightFromRight" "RowHeader" "RowHeight" "Sorting" "ToolTipMainText" "Top"
"TopFromBottom" "UseBottomFromBottom" "UseLeftFromRight" "UseRightFromRight"
"UseTopFromBottom" "VarName" "Visible" "Width")

1. (dcl-control-getproperty grid "ColumnCaptionList")
   
2. ("A" "B")
   
3. 
   

(dcl-control-getproperty grid "ColumnCaptionList")<br /> ("A" "B")<br /> <br />

获得的列标题的字符串。

下面代码修改列标题为D,E

1. (dcl-control-setproperty grid  "ColumnCaptionList"   '("D" "E"))
   

(dcl-control-setproperty grid  "ColumnCaptionList"   '("D" "E"))<br />

odcl所有控件的属性取得和编辑都可以用 dcl-control-getproperty dcl-control-setproperty , dcl-Control-GetProperties查询控件所有支持的方法，这个和XDRX API的xdrx_getpropertyvalue , xdrx_setpropertyvalue 异曲同工。

st788796

Lispboy 发表于 2014-12-16 10:17
看看下面：

我的意思是列标题不能像下面的cell一样设置样式后就可以直接编辑

Lispboy

st788796 发表于 2014-12-16 10:23
我的意思是列标题不能像下面的cell一样设置样式后就可以直接编辑

那是不能的，可以通过上面方法弹出文本框间接编辑。另外建议下，预览这个表格，可以能简单的排版，对中、左对齐、右对齐。这样能减少不少交互。

Lispboy

st788796 发表于 2014-12-16 10:23
我的意思是列标题不能像下面的cell一样设置样式后就可以直接编辑

不过可以隐藏标题栏，把第一行自己定义成标题栏，设置不同的背景色，这样就可以了。