[code]procedure TForm1.edSearchChange(Sender: TObject);
begin
with Table1 do begin
SetKey;
FieldByName('Company').AsString:=edSearch.text;
GotoNearest;
end;
end;[/code]

Beğeniler: 0
Favoriler: 0
İzlenmeler: 591
favori
like
share
suskun47_ Tarih: 29.07.2008 12:51
tşkürler
@RTHuR Tarih: 20.05.2008 16:06
SAGOLASIN
By_ergen Tarih: 15.12.2007 14:37
paylasım icin tesekkurler
zekiusen Tarih: 13.12.2007 23:33
teşekkürler
turkbey Tarih: 25.09.2007 00:43
tsk