Всем привет! А как сделать так чтобы поле выбиралось, и желательно 2 поля. ну и значение поиска вводилось с Edit. Пробую так, но не работает:
Код:
procedure TForm1.ADOTable2FilterRecord(DataSet: TDataSet; var Accept: Boolean);
var
FieldVal: String;
begin
case Combobox2.ItemIndex of
0: FieldVal := DataSet['Xozyaistvo'];
FilterOptions := [foCaseInsensitive]; // это тоже не работает(((
Accept:=FieldVal[1]=Edit2.text; // ругается на знак ";", вот текст ошибки: "Constant expressions expected"
end;
end;
Админ: Пользуемся тегами для оформления кода!
Помогите пожалуйста
