Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
Модераторы: m0p3e , edward_K , Модераторы
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 16 ноя 2005, 09:15
Привет Всем!
к Pervsive-у подключаюсь с компонентами Titan через Delphi5.
подскажите как решить проблему с числами Int64 (nrec).
Например как сделать поиск по nrec-у?
пробовал так: KatMC.Locate('nrec',4640000000000005899,[])
не компилируеть, выдаеть Incompatible types: 'Variant' and 'Int64'.
а если передать как строку, ничего не находит
.
Max_Fin
На пенсии
Сообщения: 797 Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:
Сообщение
Max_Fin » 16 ноя 2005, 10:32
так пробовали
Код: Выделить всё
var
V: Variant;
begin
V :=4640000000000005899;
KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.
Жду выхода Вселенная 2.12!
san
Местный житель
Сообщения: 412 Зарегистрирован: 28 апр 2005, 11:34
Откуда: Галактика Млечный Путь
Сообщение
san » 16 ноя 2005, 11:11
а мы пробовали Pervasive Data Access Component (PDAC) для Delphi и тоже не работает с comp, отсюда вывод - в галактике драйвер лучше
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 16 ноя 2005, 11:32
Max_Fin писал(а): так пробовали
Код: Выделить всё
var
V: Variant;
begin
V :=4640000000000005899;
KatMC.Locate('nrec',V,[]);
end;
Правда, сам не работал с компонентами, поэтому не могу определенно сказать что происходит при передаче данных типа Comp.
Пробовал, выдает ту же ошибку...
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 16 ноя 2005, 11:47
Можеть какая то функция есть,
Int64ToVariant или еще что-то такое?
Max_Fin
На пенсии
Сообщения: 797 Зарегистрирован: 29 мар 2005, 17:49
Откуда: г. Тюмень
Контактная информация:
Сообщение
Max_Fin » 16 ноя 2005, 12:07
Я ж написал код, какая еще функциональность требуется
Жду выхода Вселенная 2.12!
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 16 ноя 2005, 12:41
Max_Fin писал(а): Я ж написал код, какая еще функциональность требуется
Я пробовал так написать, но
при присвоении
V :=4640000000000005899;
при компиляции выдает ту же ошибку:
Incompatible types: 'Variant' and 'Int64' .............
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 16 ноя 2005, 17:36
как же быть ааааа...............
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 17 ноя 2005, 09:42
Оказываеться в D5 -ом ругаеться на
V :=4640000000000005899
а в Д6 и Д7 -ом нормально присваивает
теперь проблема в следующем, делаю:
V :=4640000000000005899;
KatMC.Locate('nrec',V,[]);
и тут выдаеть ошибку:
Cannot access field 'NREC' as type Variant.
кто нибудь сталкивался с таким?
AlexPK
Сообщения: 7 Зарегистрирован: 13 дек 2005, 11:33
Сообщение
AlexPK » 13 дек 2005, 11:42
Выкинте Titan. Два небольших патча модуля ADODB.pas из Delphi 6 или 7 и у вас практически полнофункцинальный доступ через ADO к Галактике. По крайней мере проблема nrec в TADODataset у меня решена.
Свои
Сообщения: 8 Зарегистрирован: 16 ноя 2005, 09:05
Сообщение
Свои » 13 дек 2005, 15:27
а патча откуда взять?
AlexPK
Сообщения: 7 Зарегистрирован: 13 дек 2005, 11:33
Сообщение
AlexPK » 13 дек 2005, 15:39
Пропатчить самим. Я патчил сам. Могу поделиться