Вниз
Скачать: CL | DM;

TFileStream, Variant   Найти похожие ветки 

 
Lamerr ©   (2003-08-27 09:17) [0]

Мастаки, просветите глупого.

Нужно сохранить Variant (точнее его ДАННЫЕ) в FileStream.
Тип данных на этапе компиляции не известен. Но это либо Single, либо Real.
Проблема в том, что данные в Variantе хранятся в последних 8 байтах.
То есть проблему можно свести к сохранению в FileStream последние 8 байт переменной.

Заранее спасибо.


 
Reindeer Moss Eater ©   (2003-08-27 09:21) [1]

TWriter.WriteVariant не подходит?
Инкремент PByte тоже не помогает?


 
Lamerr ©   (2003-08-27 09:26) [2]

TWriter.WriteVariant не подойдет.
А вот PByte может и поможет, спасибо. :о)
Именно это я искал.


 
Lamerr ©   (2003-08-27 11:50) [3]

Х-м...
Похоже поторопился.
Что такое PByte? PByteArray? Если да, то все-равно не понятно как мне его использовать...


 
clickmaker ©   (2003-08-27 11:54) [4]

Stream.WriteBuffer(TVarData(V).VDouble, SizeOf(double));


 
Lamerr ©   (2003-08-27 11:57) [5]

Ага, попробую, спасибо...


 
Reindeer Moss Eater ©   (2003-08-27 12:00) [6]

Что такое PByte? PByteArray? Если да, то все-равно не понятно как мне его использовать...

PByte - указатель на байт.
Присваиваем переменной этого типа адрес варианта, увеличиваем значение переменной на нужное смещение (последние 8 байт)
Пришем в поток блок P^,8


 
Lamerr ©   (2003-08-27 12:26) [7]

Спасибо и это тоже попробую.


 
Serginio666   (2003-08-27 12:54) [8]

Посмотри unit SConnect реализацию TDataBlockInterpreter.
В принципе можешь напрямую и использовать


 
Lamerr ©   (2003-08-28 09:07) [9]

Обязательно погляжу



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

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



Память: 0.46 MB
Время: 0.012 c
9-24295
MASSACRE
2003-03-05 03:54
2003.09.08
Кубические сплайны Помогитееее.


8-24559
nevalex
2003-05-09 20:21
2003.09.08
Эквалайзер......


3-24323
Nikkkkk
2003-08-18 11:08
2003.09.08
Работа с индексами в таблицах БД


1-24490
Charly
2003-08-27 01:12
2003.09.08
Отследить появление окна в The Bat


14-24704
perfecto
2003-08-19 11:16
2003.09.08
Азартные игры (автоматы) vs Вы...




   Наверх