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

Вниз

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

 
Катерина ©   (2003-04-04 10:26) [0]

Почему в таком виде программа компилируется

var ... v1 : single ; ...
begin
...
readln(f,v1); Grid_0punkt.Objects[2,i] := TObject(v1);
...
end;


а в таком

var ... v1 : real ; ...
begin
...
readln(f,v1); Grid_0punkt.Objects[2,i] := TObject(v1);
...
end;


- нет! Выдает ошибку - Invalid typecast


 
Skier ©   (2003-04-04 10:29) [1]

Указатель (на экземпляр класса) - 4 байта
Single тоже 4 байта, а Real - 8 байт

А вообще это довольно СИЛЬНЫЙ кастинг ! :))




 
Palladin ©   (2003-04-04 10:31) [2]

нажимаем F1 и видим
Single - 4b
Real - 6b

и чего вы девушка ожидали?


 
Внук ©   (2003-04-04 10:31) [3]

Ой, а зачем это?

Рискну предположить, это потому, что размер типов Single и Pointer совпадает, а вот Real больше


 
Palladin ©   (2003-04-04 10:32) [4]

упс
сорри
точно
Real - 8 b


 
Внук ©   (2003-04-04 10:34) [5]

>>Palladin © (04.04.03 10:31)
Real = 8b = Double


 
Катерина ©   (2003-04-04 10:37) [6]

Поняла, спасибо.


 
Anatoly Podgoretsky ©   (2003-04-04 10:40) [7]

Palladin © (04.04.03 10:32)
Внук © (04.04.03 10:34)

По сути неверно, оба ответа верные и 6 и 8 байт, поскольку generic тип, по умолчанию в данной версиии 8


 
Внук ©   (2003-04-04 10:54) [8]

"по умолчанию в данной версиии 8" - именно так :)



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

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

Наверх




Память: 0.48 MB
Время: 0.028 c
1-44087
Sirus
2003-04-01 09:51
2003.04.14
Пакеты (Package) и библиотеки DLL в Delphi...


14-44336
Romano
2003-03-25 14:58
2003.04.14
как на Delphi писать маленькие программы?


1-44122
Gennadiy
2003-04-02 19:59
2003.04.14
Принтер не печатет в Win98, по команде WriteLn


1-44093
QUE
2003-04-02 17:52
2003.04.14
Как самому отрисовать TreeView ?


3-44024
Jaxtor
2003-03-25 16:07
2003.04.14
Procedure Unknown