Locate

← →
volph2 (2002-09-09 11:15) [0]

Почему неправильно работает данная конструкция?

procedure TForm1.Edit1Change(Sender: TObject);
begin
if (length(Edit1.text) <> 0) then
IBQuery1.Locate("COL",Edit1.Text,[loPartialKey]);

end;

поле COL в таблице VARCHAR(16)

Неправильность в том, что неправильно позиционируется курсов в DBGrid"e

← →
Mike Kouzmine (2002-09-09 11:36) [1]

Может это связано с русскими символами? или с латиницей тоже?

← →
volph2 (2002-09-09 12:04) [2]

На самом деле там только цифры.
и щас уже процедура такая:

procedure TForm1.Edit1Change(Sender: TObject);
begin
if (length(Edit1.text) <> 0) then
begin
dxDBGrid1.GotoFirst();
IBQuery1.Locate("col",Edit1.Text,[loPartialKey,loCaseInsensitive]);
end;

end;

но все равно не пашет Ж(((((((

← →
Mike Kouzmine (2002-09-09 13:53) [3]

А может VarArrayOf([Edit1.text]) попробовать? Я, конечно не уверен.

>volph2 (09.09.02 11:15)
Неправильность в том, что неправильно позиционируется курсов в DBGrid"e
то есть Locate все-таки отрабатывает?

Locate Найти похожие ветки