Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.23;
Скачать: CL | DM;

Вниз

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

 
бобёр   (2003-01-04 18:40) [0]

Такая проблема

Присваиваю значение поля SUM dbf-таблицы некой переменной testing
testing:=Query1.fieldbyname("SUM").AsInteger;
Все работает на ура до тех пор пока значение поля SUM в таблице не превысит некоторое значение
1500000000 - работает
2500000000 - уже нет вываливается сообщение 2500000000 is not integer value.
Если єто ограничение integer то чем можно его заменить в данном выражении?

Заранее благодарен.


 
Val ©   (2003-01-04 19:00) [1]

Пишем integer, нажимаем Ctrl+F1, получаем среди прочего:
Integer –2147483648..2147483647 signed 32-bit


 
бобёр   (2003-01-04 19:05) [2]

Как обойти это в данном примере?
Вроде AsExtended нет такого


 
Val ©   (2003-01-04 19:09) [3]

.AsLargeInt?


 
бобёр   (2003-01-04 19:26) [4]

Как его правильно использовать?
testing:=Query1.fieldbyname("SUM").AsLargeInt;
Так ругается undeclared identifier.
В хелпе вроде ничего путного не сказано


 
TTCustomDelphiMaster ©   (2003-01-04 19:41) [5]

Какого типа переменная testing и поле SUM?


 
бобёр   (2003-01-04 19:57) [6]

testing я попробовал при отладке, вообще используется в программе следующее выражение(из таблицы dbf файла значение помещается в db таблицу)
Query2.ParamByName("SUM").AsFloat:=Query1.FieldByName("SUM").AslargeInt;
Query2.ParamByName("SUM").AsFloat-это помещается в поле типа Number таблицы db (paradox)
Query1.FieldByName("SUM").AsLargeInt - это берется из таблицы dbf тип поля dbf - C size 19

ругается undeclared identifier "AslargeInt"
Как правильно объявить AslargeInt?


 
Xterm   (2003-01-04 22:44) [7]

Попробуй:

var
testing: Int64;
begin
...
testing := Query1.FieldByName("SUM").Value;

или:

testing := StrToInt64(Query1.FieldByName("SUM").AsString);



Страницы: 1 вся ветка

Текущий архив: 2003.01.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
7-72565
Sura+
2002-11-11 14:18
2003.01.23
Как програмно убрать восстановить кнопку


14-72489
zolotov
2003-01-06 01:09
2003.01.23
Rx Library for Delphi 7


6-72436
koandrew
2002-11-20 03:15
2003.01.23
Подсчёт сетевого и инетовского трафика


1-72403
alecs
2003-01-13 17:47
2003.01.23
BarCode


6-72444
anmartynov
2002-11-26 11:55
2003.01.23
TServerSocket