Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.019 c
1-1091626882
BillyJeans
2004-08-04 17:41
2004.08.22
TTreeView и свойство RightClickSelect...


14-1091346039
ИМХО
2004-08-01 11:40
2004.08.22
Как смотреть WAP с компьютера?


1-1092121476
MetalFan
2004-08-10 11:04
2004.08.22
переделать Combobox


11-1079109894
Raki
2004-03-12 19:44
2004.08.22
PaintBox - bugs


3-1090879863
bigfoot
2004-07-27 02:11
2004.08.22
Выборка по дате




   Наверх