Страница 1 из 2

Delphi+Titan+Pervasive nrec

Добавлено: 16 ноя 2005, 09:15
Свои
Привет Всем!
к Pervsive-у подключаюсь с компонентами Titan через Delphi5.
подскажите как решить проблему с числами Int64 (nrec).
Например как сделать поиск по nrec-у?
пробовал так: KatMC.Locate('nrec',4640000000000005899,[])
не компилируеть, выдаеть Incompatible types: 'Variant' and 'Int64'.
а если передать как строку, ничего не находит :(.

Добавлено: 16 ноя 2005, 10:32
Max_Fin
так пробовали

Код: Выделить всё

var
     V: Variant;

begin
        V :=4640000000000005899;
        KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.

Добавлено: 16 ноя 2005, 11:11
san
а мы пробовали Pervasive Data Access Component (PDAC) для Delphi и тоже не работает с comp, отсюда вывод - в галактике драйвер лучше :)

Добавлено: 16 ноя 2005, 11:32
Свои
Max_Fin писал(а):так пробовали

Код: Выделить всё

var
     V: Variant;

begin
        V :=4640000000000005899;
        KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.
Пробовал, выдает ту же ошибку...

Добавлено: 16 ноя 2005, 11:47
Свои
Можеть какая то функция есть,
Int64ToVariant или еще что-то такое?

Добавлено: 16 ноя 2005, 12:07
Max_Fin
Я ж написал код, какая еще функциональность требуется

Добавлено: 16 ноя 2005, 12:41
Свои
Max_Fin писал(а):Я ж написал код, какая еще функциональность требуется
Я пробовал так написать, но
при присвоении
V :=4640000000000005899;

при компиляции выдает ту же ошибку:
Incompatible types: 'Variant' and 'Int64' .............

Добавлено: 16 ноя 2005, 17:36
Свои
как же быть ааааа...............

Добавлено: 17 ноя 2005, 09:42
Свои
Оказываеться в D5 -ом ругаеться на
V :=4640000000000005899
а в Д6 и Д7 -ом нормально присваивает :-)
теперь проблема в следующем, делаю:

V :=4640000000000005899;
KatMC.Locate('nrec',V,[]);

и тут выдаеть ошибку:
Cannot access field 'NREC' as type Variant.

кто нибудь сталкивался с таким?

Добавлено: 13 дек 2005, 11:42
AlexPK
Выкинте Titan. Два небольших патча модуля ADODB.pas из Delphi 6 или 7 и у вас практически полнофункцинальный доступ через ADO к Галактике. По крайней мере проблема nrec в TADODataset у меня решена. :cool:

Добавлено: 13 дек 2005, 15:27
Свои
а патча откуда взять?

Добавлено: 13 дек 2005, 15:39
AlexPK
Пропатчить самим. Я патчил сам. Могу поделиться

Добавлено: 13 дек 2005, 15:47
Свои
буду благодарен если скинешь
aybeck@list.ru

Добавлено: 13 дек 2005, 16:22
AlexPK
отправил

Добавлено: 14 дек 2005, 11:03
nickmix
AlexPK
Тоже буду рад distporg@mail.ru