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

Вниз

Как запись типа record записать в TStream?   Найти похожие ветки 

 
Wadimka   (2012-08-02 14:08) [0]

т.е. есть
type
rmydata=record
 Line1:String[200];
 Param2:integer;
end;

var
mydata:Rmydata;

mydata.Line1:="Строка 1";
mydata.Param2:=100;

Как запись типа record записать в TStream а потом назад запихать в эту структуру из TStream?


 
Плохиш ©   (2012-08-02 14:14) [1]

Для записи существует метод урайт, для чтения, соответственно, - реад.


 
MBo ©   (2012-08-02 14:16) [2]

Запись в поток записи данного типа (без длинных строк и других динамических структур) ничем не отличается от записи простых переменных
Stream.Write(mydata, SizeOf(mydata));


 
Wadimka   (2012-08-02 14:21) [3]

Переменная типа String[254]

Пытаюсь записать в Tstream
Data2.Write( ArhParam, SizeOf(ArhParam));

Ошибка Abstract Error


 
Wadimka   (2012-08-02 14:24) [4]

все проблема решена


 
Anatoly Podgoretsky ©   (2012-08-02 14:35) [5]

Справка

function Write(const Buffer; Count: Longint): Longint; virtual; abstract;


 
Wadimka   (2012-08-02 14:42) [6]

да я уже понял, Tstream заменил на TMemoryStream и все ок


 
DVM ©   (2012-08-02 15:02) [7]

Я когда использую методы Write/Read(Buffer) класса TStream все время поминаю недобрым словом того, кто эти методы так назвал. Ибо абсолютно непонятно направление переноса данных. Нет бы ReadFromStream или WriteToStream назвали, а так приходится справку открывать смотреть когда долго не пользуешься ибо как то становится неочевидно.


 
Wadimka   (2012-08-02 15:17) [8]

это да согласен с тобой полностью
тут метод такой, в мозгу вопрос что делать с буфером?
соответственно read и write само за себя уже говорит


 
brother ©   (2012-08-02 18:05) [9]

напрягает проблемма установки position?



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

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

Наверх




Память: 0.48 MB
Время: 0.125 c
15-1351264428
AV
2012-10-26 19:13
2013.03.22
delphi7 под win7 - сервисы стандартным TService нормальные?


2-1328511667
_QWERTY_
2012-02-06 11:01
2013.03.22
инициализировать переменную


15-1350564105
neo1
2012-10-18 16:41
2013.03.22
Cisco выделил 5 млн рублей на стартап-проекты


15-1341407466
DevilDevil
2012-07-04 17:11
2013.03.22
Запустить *.bat в своей консоли


2-1333345551
TSubject
2012-04-02 09:45
2013.03.22
Вопрос по выпадающему списку