Adotable.filter

← →
Dest81 © (2006-04-07 14:43) [0]

Есть база *.mdb! Пробую фильтровать по текстовому полю - фильтрует если только есть полное совпадение! Как фильтровать без учета регистра и по первичному совпадению (типа "Коз*")???

← →
Desdechado © (2006-04-07 15:14) [1]

UPPER(fld) LIKE "КОЗ%"

← →
Соловьев © (2006-04-07 15:24) [2]

SELECT Таблица1.Name
FROM Таблица1
WHERE UCase(Name) like "*М*"

← →
Dest81 © (2006-04-07 15:49) [3]

А для Adotable

← →
sniknik © (2006-04-07 16:10) [4]

> А для Adotable
думаеш он чтото значит? Adotable это "обманка для идиотов" специальный генератор глюков, а на самом деле, внутри под шелухой, это "белый и пушистый" ADODataSet. (поэтому это и для него тоже)

код для проверки
type
TMyADOTable = class(TADOTable); //для доступа к "закрытым" методам, обьявить в том же модуле, перед/после TForm1

procedure TForm1.Button1Click(Sender: TObject);
begin
with TMyADOTable(ADOTable) do begin
CommandType:= cmdText;
CommandText:= "SELECT * FROM "+TableName+" WHERE Name LIKE ""Коз%""";
Open;
end;
end;

и если вернет все из таблицы, а не только то что в условии, то я балерина...

← →
Dest81 © (2006-04-07 16:31) [5]

У меня чето неидет можно пример для adotable1 и где именно обявлять класс

← →
sniknik © (2006-04-07 17:11) [6]

где у тебя форма на которой кнопка лежит? вот там

type
TMyADOTable = class(TADOTable);

TForm1 = class(TForm)
Button1: TButton;
....
procedure Button1Click(Sender: TObject);
....
end;

в принципе можно не обьявлять... просто приведение делать например к TADODataSet, будет одно и тоже.

Cпасибо! Пошло!

> Cпасибо! Пошло!
но это неправильно!!! ;)
это написано, чтобы показать абсурдность TADOTable, поменяй его на TADODataSet с тем же кодом, и все станет на свои места. (и ни приведения ни обьявления дополнительных классов станут не нужны)

Adotable.filter Найти похожие ветки