1. 程式人生 > >按著shift鍵對dbgrid進行多條記錄選擇的問題(50分)

按著shift鍵對dbgrid進行多條記錄選擇的問題(50分)

可以用sendmessage,想dbgrid 發鍵盤資訊,
按下shift鍵,同時按下button1
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=1 to Table1.Recordcount-1 do
sendmessage(DbGRID1.handle,WM_KEYDOWN,VK_DOWN,1);
end;

 

在DBGrid的Click事件中,先GotoBookMark,然後使用一個迴圈到你後面選定的記錄,期間
對路過的每一條記錄都加入BookMarkList.

 

為什麼不用第三方控制元件?woll2woll公司的InfoPower 2000控制元件包中有一個wwDbGrid的控制元件
很好用。公司網址http://www.woll2woll.com/。
一定記著給分呀!