Показать сообщение отдельно
  #3  
Старый 13.10.2013, 00:39
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Не знаю, может есть варианты и поэлегантнее, но я бы так организовал частичный поиск в записях, прямым перебором:
Код:
var
 i: integer;
begin
 DataSet.First;
 for i:= 0 to DataSet.RecordCount do
  begin
   if Copy(DataSet.FieldValues['EVENT_TIME'],
      1,
      Pos(' ', DataSet.FieldValues['EVENT_TIME']) - 1) = edt2.Text then
   begin
    Label1.Caption:= DataSet.FieldValues['EVENT_TIME'];// для примера
    Exit;
   end
    else DataSet.Next;
  end;
end;
DataSet - это ваша таблица


Добавлено позже

а ещё лучше вместо строки цикла подставить вот это
Код:
...
while not DataSet.Eof do
...
быстрее будет
Ответить с цитированием