dbGrid ve vk_down

[hakkus]

Merhaba,
dbGrid üzerinde bir alanı edit ediyorum, değerleri giriyorum.
Ancak son satırdayken aşağı ok tuşuna basılırsa yeni boş bir kayıt açılmasını istemiyorum.
Bunu nasıl engelleyebilirim?
Saygıyla

[hakkus]

merhaba,
kodu buldum belki sizinde işinize yarar..
procedure TForm1.DBGrid1KeyDown(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin
if (Key = VK_DOWN) then
begin
Table1.DisableControls;
Table1.Next;
if Table1.EOF then Key:= 0
else Table1.Prior;
Table1.EnableControls;
end;
end;

[husonet]

Table1.DisableControls;
Table1.EnableControls;

Bu kodlar ne işe yarıyor.

Bu kodlar olmadanda yazığınız kodlar çalışıyor.

[mussimsek]

Merhaba,

mesela bir tabloda kayıtları baştan sonra tarıyorsanız, bu kodları yazmazsanız, geçerli kayıtın bilgileri bağlı DBEdit, DBGrid vs. de güncellenir. Bu hem görüntü açısından hoş olmuyor, hem de işlemi yavaşlatıyor. Bu kodları yazarsanız bağlı bileşenlerle irtibat kesiliyor ve bu olumsuzluklar olmuyor, tekrar bağlıyorsunuz.

Kolay gelsin.

[hakkus]

merhabalar,
table1.first;
while not table1.eof do
begin
..
..
table1.next;
end;
buna benzer bir kod kullanıyorsanız ve table1 dataları o anda bir grid de veya dbedit te görünüyorsa, bu görünen verilerin refresh edilmesi esnasında vakit kaybı sözkonusudur. bu nedenle önce disablecontrols yapıyoruz ki program ekran yenilenmesiyle uğraşmasın diye. İş bitince tekrar enablecontrols yaparak üzerinde durduğumuz veriye tekrar dönüyoruz.
saygıyla