最近Grid,想控制操作方式,像Excel 一樣,按Enter鍵即可往右移一格,於
KeyDown的Event編寫如下:

end; //if (Key = VK_Return) then

結果按Enter,有些欄位變寬,游標所在Cell的框線也不見!

煩請指教!!謝謝!!

聽起來像是 Auto adjust column width , 我沒用過, 看看是不是這個 property

property AutoSize:boolean;
Description : setting the Autosize property to true, resizes all columns to widths so that all text just fits.

或是看一下, 有關 size 的部分
http://www.tmssoftware.com/ACGDOC.HTM#Properties

看過上面的properties,試過結果還是一樣,AutoSize反而會把畫面拉大....

這個版區是屬於資料庫版區, 閣下所提出的問題, 具了解不屬於資料庫範圍, 是否重發到適用版區(如 vcl 元件)

已幫忙移動。

===================引 用 P.D. 文 章===================
這個版區是屬於資料庫版區, 閣下所提出的問題, 具了解不屬於資料庫範圍, 是否重發到適用版區(如 vcl 元件)

------


蕭沖
--All ideas are worthless unless implemented--

C++ Builder Delphi Taiwan G+ 社群
http://bit.ly/cbtaiwan

其實原本是想等提問者重新發到正確區後再回帖, 沒想到蕭大已處理了, OK! 沒關係啦

其實 TMS 的 GRID 不用這麼麻煩,
不管是 AdvStringGrid, 還是 AdvColumnGrid , TMS 都幫你處理好這個功能

你只要 Properities 中找到 Navigation 屬性,
再往下找到 AdvanceAuto 打開 (會連同 AdvacneOnEnter 一併打開)
然後 AdvanceDirection 有四種移動方式, 選擇 LeftRight 就可以在按下 Enter 時自動往右了

ps. 以上我是在付費的 TMS 元件上的結果(FOR WIN), PO網友未提到使用是那一種系列的 TMS或版本,
所以不清楚是否其他的TMS版本是否具有此功能
===================引 用 aftcast 文 章===================
已幫忙移動。

===================引 用 P.D. 文 章===================
這個版區是屬於資料庫版區, 閣下所提出的問題, 具了解不屬於資料庫範圍, 是否重發到適用版區(如 vcl 元件)

編輯記錄

PD兄實在對tms與db很熟。我想這個解肯定很正確 (我馬後炮一下，我印象也是這樣可以解…)

; -)

===================引 用 P.D. 文 章===================

其實 TMS 的 GRID 不用這麼麻煩,
不管是 AdvStringGrid, 還是 AdvColumnGrid , TMS 都幫你處理好這個功能

你只要 Properities 中找到 Navigation 屬性,
再往下找到 AdvanceAuto 打開 (會連同 AdvacneOnEnter 一併打開)
然後 AdvanceDirection 有四種移動方式, 選擇 LeftRight 就可以在按下 Enter 時自動往右了

ps. 以上我是在付費的 TMS 元件上的結果(FOR WIN), PO網友未提到使用是那一種系列的 TMS或版本,
所以不清楚是否其他的TMS版本是否具有此功能
===================引 用 aftcast 文 章===================
已幫忙移動。

===================引 用 P.D. 文 章===================
這個版區是屬於資料庫版區, 閣下所提出的問題, 具了解不屬於資料庫範圍, 是否重發到適用版區(如 vcl 元件)

------


蕭沖
--All ideas are worthless unless implemented--

C++ Builder Delphi Taiwan G+ 社群
http://bit.ly/cbtaiwan

編輯記錄

首先在這裡要跟各位先進抱歉!因為好久了才歸隊,一直以來習慣了資料庫這一版
謝謝你們幫我移版！

關於該Grid部分,那些設定確實有了,設定如下:
Navigation 底下...
AdvanceAuto = True
AdvanceDirection = adLeftRight
AdvanceOnEnter = True

但似乎是遇到ReadOnly的欄位,Cell的格線發生神隱,且會Autosize,讓該欄變寬....
我用的是Delphi7 TMS2007

再麻煩一下!!謝謝!!

編輯記錄

因為你詢問的是按enter可以到下一個欄位(右邊), 所以針對提問給予回答, 至於追加的問題, 我未曾遇過, 而且我未曾使用過ColumnGrid這個元件, 不清楚該元件的功能, 我都是用 AdvStringGrid或者AdvDBGrid 作業
===================引 用 heykris 文 章===================
首先在這裡要跟各位先進抱歉!因為好久了才歸隊,一直以來習慣了資料庫這一版
謝謝你們幫我移版！

關於該Grid部分,那些設定確實有了,設定如下:
Navigation 底下...
AdvanceAuto = True
AdvanceDirection = adLeftRight
AdvanceOnEnter = True

但似乎是遇到ReadOnly的欄位,Cell的格線發生神隱,且會Autosize,讓該欄變寬....
我用的是Delphi7 TMS2007

再麻煩一下!!謝謝!!

其實這兩個問題是一體兩面的,經測試,以TAB鍵移動,毫無疑問是順暢無誤,奇怪在Enter鍵出問題!
關於欄位自動拉寬,已找到解法,在SizeWhileTyping屬性的width設成False即可,但游標所在cell的格線仍神隱,按TAB則無此現象...
仍期待有先進指導一下,稍後就會結案,以免徒增問題...無論如何還是謝謝各位.....

編輯記錄

將ExcelStyleDecimalSeparator 設成 True....