 |
VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
jerryclt
註冊時間: 2009-03-10 文章: 334 來自: 佛心來的
第 16 樓
|
發表於: 星期一 六月 21, 2010 6:48 pm 文章主題: |
|
|
小弟寫了這麼一段:
WITH thisform.grid1
.allowheadersizing=.F.
.allowrowsizing=.F.
.deletemark=.F.
.recordmark=.F.
.readonly=.T.
.headerheight=FONTMETRIC(1,browse_font,browse_size)+6
.rowheight=FONTMETRIC(1,browse_font,browse_size)*2+10
.columncount=3
* -------------------- SOURCE --------------------
.column1.controlsource="field_01"
.column2.controlsource="field_02"
WITH .column3
.addobject('Edit1','EditBox')
WITH .Edit1
.borderstyle=0
.fontname=browse_font
.fontsize=browse_size
.scrollbars=0
.selectonentry=.T.
.specialeffect=1
.tabstop=.F.
.visible=.T.
ENDWITH
.dynamiccurrentcontrol="'Edit1'"
.sparse=.F.
.controlsource="field_03+CHR(13)+field_04"
ENDWITH
* -------------------- LENGTH --------------------
.column1.width=(11)*FONTMETRIC(6,browse_font,browse_size)
.column2.width=(11)*FONTMETRIC(6,browse_font,browse_size)
.column3.width=(LEN(cu01f_03)+1)*FONTMETRIC(6,browse_font,browse_size)
* -------------------- TITLE --------------------
.column1.header1.caption="序號"
.column2.header1.caption="日期"
.column3.header1.caption="摘要 #1+#2"
ENDWITH
意思是到了,
有插入Editbox容器,
也能顯示兩行
感謝大家費心 ^^ |
|
| 回頂端 |
|
 |
|
|
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
|
|