線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1339
推到 Plurk!
推到 Facebook!

StringGrid小小一問!

 
7-11
一般會員


發表:53
回覆:33
積分:16
註冊:2005-12-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-07-31 13:45:09 IP:220.130.xxx.xxx 未訂閱

當StringGrid屬性中的Options -> goEditing 為 True 時可讓StringGrid表格被編輯

但可不可以限制只能編輯哪一格?

例如只能編輯Cells[5,5]這格!或者是Cells[5,全部]

請高手指教謝謝!

Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-07-31 17:06:52 IP:210.65.xxx.xxx 未訂閱

在 StringGrid 的 OnKeyPress 事件加入以下程式碼

procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
var
Obj : TStringGrid;
begin
Obj := TStringGrid(Sender);
// if not ((Obj.Col = 5) and (Obj.Row = 5)) then
if not ((Obj.Col = 5)) then
begin
Key := #0;
end;
end;

Fishman

------
Fishman
7-11
一般會員


發表:53
回覆:33
積分:16
註冊:2005-12-05

發送簡訊給我
#3 引用回覆 回覆 發表時間:2006-08-01 09:03:48 IP:220.142.xxx.xxx 未訂閱
===================引 用 文 章===================

在 StringGrid 的 OnKeyPress 事件加入以下程式碼

procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
var
Obj : TStringGrid;
begin
Obj := TStringGrid(Sender);
// if not ((Obj.Col = 5) and (Obj.Row = 5)) then
if not ((Obj.Col = 5)) then
begin
Key := #0;
end;
end;

Fishman

------------------------------------------------------------------------------------------------------------------------------------------------------

感謝FishMan問題已經解決了!

不過我還想問一下! if not ((Obj.Col = 5)) then 若我所點選的格子不是Col5那麼可不可以讓游標閃都不要閃

系統時間:2024-05-17 15:51:02
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!