PDA

View Full Version : سوال: بازیابی کلیدفشرده شده



arefih
سه شنبه 06 مهر 1389, 21:43 عصر
سلام خدمت دوستان در یک فرم شامل dbgrid , و یک edit می خواهم در صورتیکه توسط کاربر کلیدی شامل هریک از حروف الفبا روی dbgrid فشرده شود مکان نما به edit منتقل شود و ادامه تایپ انجام شود البته کلید ابتدایی که روی dbgrid هم فشرده شده در ابتدای کلمه در حال تایپ در edit اورده شود اگه ممکن است راهنمایی بفرمائید. این موضوع را جهت جستجو در dbgrid می خواهم استفاده کنم

SAASTN
سه شنبه 06 مهر 1389, 22:37 عصر
ببین بدرد می خوره:
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Edit1.Text := Char(Key);
Edit1.SetFocus;
Edit1.SelStart := 1;
end;