Прочти :)

← →
Hellman (2002-08-02 19:15) [0]

Вот создал запись вида:

type
TRL = record
Name : string[128];
Text : TStrings;
isLastFile : Boolean;
end;
type
TRLPart = record
Theme : string[64];
TRLData : TRL;
end;
TRLArray = array[1..128] of TRLPart;
TRLFile = file of TRLArray;

но у меня не получается с Text : TStrings;, чтобы записать в файл. Можеть подскажете что можно использовать вместо TStrings?

← →
Странный Прохожий (2002-08-02 21:57) [1]

Text : TStrings -- это указатель на объект TStrings. При попытке записи структуры в файл, естественно, запишется данный указатель.
По прочтении же он будет неактуален. И привет.
Так что нужно писать спец. процедуру для сохранения/восстановления содержимого вашей сложной структуры...

← →
Poirot (2002-08-02 23:09) [2]

Но помоему есть ещё маленькая проблемка с юзаньем TStrings - это мтт) абстрактный Класс с вытекающими от сюда последствиями...

← →
IrenFD (2002-08-03 02:59) [3]

Насколько помню, объекты и динамические массивы в record-ах не используються, так что работай по принципу memo, только сам.

← →
PC_Maniac (2002-08-12 12:52) [4]

Попробуй заменять TSrtings на TStringlist

← →
watcher (2002-08-12 14:17) [5]

попробуй писать TStrings.Text

← →
Pumpkin (2002-08-12 17:32) [6]

Послушай PC_Maniac.
Не трогай TStrings. Используй TStringList.

← →
watcher (2002-08-12 17:46) [7]

ну чем вам не нравится TStrings ?
ну абстрактный это класс, ну и что ?
(я надеюсь что Hellman не писал что-то вроде Text := TStrings.Create)
а почему не работает Странный Прохожий уже объеснял...

Прочти :) Найти похожие ветки