Показать сообщение отдельно
  #3  
Старый 27.07.2010, 12:33
Nat111 Nat111 вне форума
Прохожий
 
Регистрация: 23.07.2010
Сообщения: 19
Репутация: 10
По умолчанию

Цитата:
Сообщение от lmikle
О-хо-хо...
Дык код тебе дадут... но он либо не подойдет напрямую, либо вообще будет не совсем то.

Код:
procedure TForm1.Button1Click(Sender : TObject);
begin
  If not DBGrid1.DataSource.DataSet.Locate('FIO',VarArrayOf([Edit1.Text]),[]);
    Then ShowMessage('Что-то ничего нету :(');
end;

ЗЫ. С сигнатурой Locate мог попутать слегка - проверь в среде...


СПАСИБО БОЛЬШОЕ ВСЕ РАБОТАЕТ!
Ответить с цитированием