Цитата:
Сообщение от lmikle
О-хо-хо...
Дык код тебе дадут... но он либо не подойдет напрямую, либо вообще будет не совсем то.
Код:
procedure TForm1.Button1Click(Sender : TObject);
begin
If not DBGrid1.DataSource.DataSet.Locate('FIO',VarArrayOf([Edit1.Text]),[]);
Then ShowMessage('Что-то ничего нету :(');
end;
ЗЫ. С сигнатурой Locate мог попутать слегка - проверь в среде...
|
СПАСИБО БОЛЬШОЕ ВСЕ РАБОТАЕТ!