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

← →
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]
А зачем гадать?

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

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

спасибо

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

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

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

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