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

Вниз

Подскажите про преобразование типов   Найти похожие ветки 

 
Frozzen   (2004-08-08 19:54) [0]

Есть структура
у структуры поля типа longint
какему присвоить bi.XPelsPerMeter := resol*39.37
где resol : longint
не помню как типы преобразовать


 
GanibalLector ©   (2004-08-08 20:04) [1]

int+F1


 
Frozzen   (2004-08-08 20:05) [2]

дак int возвращает extended


 
GanibalLector ©   (2004-08-08 20:08) [3]

ну а потом,после умножения естественно  strtoint64(Floattostr(ЗНАЧЕНИЕ));


 
Frozzen   (2004-08-08 20:09) [4]

и проще никак
эт чего в делфи так сложно типы преобразуются


 
GanibalLector ©   (2004-08-08 20:12) [5]

и проще никак
Можно...написанием собственных процедур.


 
GanibalLector ©   (2004-08-08 20:13) [6]

эт чего в делфи так сложно типы преобразуются
А в каком месте сложно???Чет не вижу,млин.


 
Frozzen   (2004-08-08 20:15) [7]

целая эпопея использования функций int, floattostr,strtoint


 
GanibalLector ©   (2004-08-08 20:16) [8]

целая эпопея
Хм...все три,а Вам уже не нравиться.Странно???


 
Anatoly Podgoretsky ©   (2004-08-08 20:17) [9]

А какого типа bi.XPelsPerMeter


 
GanibalLector ©   (2004-08-08 20:19) [10]

2 Anatoly Podgoretsky ©   (08.08.04 20:17) [9]
А какого типа bi.XPelsPerMeter
Вроде  longint


 
Walker ©   (2004-08-08 20:23) [11]

попробуй округление:
bi.XPelsPerMeter := Round(resol*39.37)


 
Anatoly Podgoretsky ©   (2004-08-08 20:24) [12]

GanibalLector ©   (08.08.04 20:19) [10]
А зачем гадать?


 
GanibalLector ©   (2004-08-08 20:27) [13]

function Round(X: Extended): Int64;
Подходит целяком и полностью.


 
Frozzen   (2004-08-08 20:29) [14]

спасибо


 
GanibalLector ©   (2004-08-08 20:30) [15]

А я вот не знал про Round.Старым дедовским способом делал   strtoint64(Floattostr(ЗНАЧЕНИЕ)) как говорится век живи век учись,млин.


 
Walker ©   (2004-08-08 20:34) [16]

по-моему Round ещё старее твоего дедовского способа...:)


 
Frozzen   (2004-08-09 09:49) [17]

Удалено модератором



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

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

Наверх




Память: 0.49 MB
Время: 0.046 c
14-1091605212
Layner
2004-08-04 11:40
2004.08.22
Почему такая дискриминация русского???


1-1092070645
кш
2004-08-09 20:57
2004.08.22
мастера!!! помогите!!! как выполнить команду командной строки,


3-1091351123
Koala
2004-08-01 13:05
2004.08.22
Понять не могу....(делаю перенос данных из Dbase в Firebird)


9-1083338063
Pirate
2004-04-30 19:14
2004.08.22
ДВИЖОК


6-1087761129
Катя
2004-06-20 23:52
2004.08.22
Arr: string в zip и методом post на сервер