Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сохранить Форму в Файл


Алексей П ©   (2003-01-06 16:33:00) 

Ситуация такая:
1) В режиме Run-Time создаются:
форма fmrdUnit
Компонент TrdQuickRep (на форме fmrdUnit)
Компонент TrdQRBand (на компоненте TrdQuickRep)
2) Затем форма сохраняется
SaveComponentToTextFile(TComponent(fmrdUnit),FFileName);

После этого смотрим ф файл:
fmrdUnit и TrdQuickRep сохранились как положено, а компонента TrdQRBand нет.
и так с любым компонентом, который оказывается не на форме.

Подскажите, в чем может быть проблема.



procedure TfmMine.SaveComponentToTextFile(Component: TComponent; const FileName: string);
var
ms: TMemoryStream;
fs: TFileStream;
begin
fs := TFileStream.Create(FileName, fmCreate or fmOpenWrite);
ms := TMemoryStream.Create;
try
ms.WriteComponent(Component);
ms.position := 0;
ObjectBinaryToText(ms, fs);
finally
ms.Free;
fs.free;
end;
end;


Алексей П   (2003-01-07 13:48:00) [1]

Большое спасибо, у меня как раз Owner и Parent - одно лицо, так сказать.
Надо изучать предметную часть...


Юрий Зотов   (2003-01-07 11:10:00) [2]

Видимо, при создании TrdQRBand его Owner"ом Вы делаете не форму, а TrdQuickRep или что-то еще. Owner"ом надо делать форму, а Parent"ом - то, на чем контрол должен размещаться (TrdQuickRep).


Наверх

Титульная страница Поиск, карта сайта Написать письмо