| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
(Не)Работа Locate c 2-мя опциями [D6, IB6.x]
Vemer © (2003-10-21 12:34:00)
Здравствуйте.
Как правильно объединять TLocateoption в TLocateoptions, чтобы они оба работали? Следующая процедура по идее должна ставить указатель на запись без учета регистра и при неполном совпадении.
Вот как раз "без учета регистра" и не срабатывает, похоже дело в кривом объединении, или они вместе вообще не пашут?
procedure TF_Sklad.Ed_FinderChange(Sender: TObject);
Var
SelText:Variant;
Opt1:TLocateOption;
Opt2:TLocateOption;
Option: TLocateOptions;
Begin
Opt1 := (loCaseInsensitive);
Opt2 := (loPartialKey);
Option := [opt1, opt2];
SelText := Ed_Finder.Text;
DM.Klient.Locate("KLN_NAME", SelText, Option);
End;
--------------------------
ACCESS DENIED, Delphi Recomended! (c)Vemer.
Vemer (2003-10-28 10:16:00) [1]
С латынью работает, а с рускими [loCaseInsensitive] не пашет. Ну и фиг с ним.
DenK_vrtz (2003-10-21 13:15:00) [2]
в догонку
uses db;
ежли что!
DenK_vrtz (2003-10-21 13:13:00) [3]
а просто написать без заморочек
DM.Klient.Locate("KLN_NAME", SelText, [loCaseInsensitive, loPartialKey])
| |
