| Aranilan kayda gitmesi için kullanilan komuttur.
|
| ** Table1.Findnears: Aranilan kayit bulunamazsa
o kayda en yakin olan kayda gider.
|
| **Table1.Findkey: Aranilan kayit bulunazsa
herhangi bir yere gitmez bulundugu yerde kalir. |
| ÖRNEK: Kayitli olan paradoxlarda kayit
numarasina göre arama. |
 |
procedure TForm1.Button1Click(Sender: TObject);
begin
table1.FindNearest([edit1.Text]); // kaydi
ara kayit yoksa yakinina gider
if not Table1.FindKey([edit1.text])
then //aranan kayit bulunamassa
MessageDlg('Isim Bulunamadi',mtError,[mbok],0);
// hata mesaji verme
end; |
! ! DOWNLOAD !
!
|
