备注字段在grid里显示Memo还是备注 - 编程论坛

#2

吹水佬2023-01-31 21:38

如果受表格大小限制，可以只显示几个开头的字作为提示。

#3

my23182023-01-31 21:39

可以考虑加一个字段，备注字段有内容时显示备注，无内容时为空，点击备注字段显示全部内容。当然，如果备注字段比较短，也可用字符字段。

#4

吹水佬2023-01-31 21:51

只有本站会员才能查看附件，请登录

程序代码：

CREATE CURSOR tt (f1 I, f2 M)
INSERT INTO tt VALUES (1,"ahfdjkfh23874563456438756")
INSERT INTO tt VALUES (1,"213274ajkbssad")
INSERT INTO tt VALUES (1,"dsj8326423865fdsh")
GO TOP
of = CREATEOBJECT("form1")
of.show(1)

DEFINE CLASS form1 as Form
    ADD OBJECT grd as grid1
ENDDEFINE

DEFINE CLASS grid1 as Grid
    PROCEDURE init
        this.ColumnCount = 2
        this.Column1.ControlSource = "tt.f1"
        this.Column2.ControlSource = "LEFTC(tt.f2,10)"
    ENDPROC
ENDDEFINE

#5

igaoyuan2023-02-01 09:18

回复 3楼 my2318

谢谢！

#6

igaoyuan2023-02-01 09:25

回复 4楼吹水佬

是一个好办法！特别是仅显示不编辑，很方便！

可以加做一个双击.text2动作去编辑或显示较多内容及分行段

感谢吹佬！

#7

sdta2023-02-01 09:50

备注列中加入一个EDIT控件，备注内容在EDIT中显示

#8

igaoyuan2023-02-01 10:12

回复 7楼 sdta

对，是这样在做的。
实际上更想知道是什么原因导致vfp下显示memo，而编译后显示“备注”

#9

sdta2023-02-01 10:54

说的再多也没用，上传相关文件

#10

igaoyuan2023-02-01 11:43

回复 9楼 sdta

明白，上表单，麻烦sdta版主在vfp下运行看一下，然后编译，独立运行
显示如下：
VFP环境下显示memo/Memo

只有本站会员才能查看附件，请登录

编译后独立运行显示"备注"

只有本站会员才能查看附件，请登录

附表单及表

只有本站会员才能查看附件，请登录

#11

sdta2023-02-01 12:13

上传完整文件

#12

igaoyuan2023-02-01 15:35

回复 9楼 sdta

附精简的项目，退出时请使用表单关闭按钮

只有本站会员才能查看附件，请登录

已编译好文件：我的学习项目.exe
版主费心了！

#13

cjc10102023-02-01 16:12

只有本站会员才能查看附件，请登录

#14

sdta2023-02-01 16:12

第21列没有EDIT控件，在此列中增加EDIT控件，删除TEXT控件，然后再试试看

#15

cjc10102023-02-01 16:14

备注列改为 edit，该列sparse改为F，表格的themes改为T。

#16

sdta2023-02-01 16:19

只有本站会员才能查看附件，请登录

#17

igaoyuan2023-02-01 17:45

回复 15楼 cjc1010

收到，谢谢！

#18

igaoyuan2023-02-01 17:46

回复 14楼 sdta

收到，谢谢版主！