Сохранение и отображения объекта FileStream - Общие вопросы Delphi

medved6216 · 03.11.2011, 10:01

Не могу отобразить сохраненную панель из Stream
Загружаю так:

Код:

if FileExists( ExtractFilePath(Application.ExeName) + 'Components.sav' ) then
   begin
      FileStream := TFileStream.Create( ExtractFilePath(Application.ExeName)
       +'Components.sav', fmOpenRead );
      FileStream.ReadComponent( FormCalendar );
      FileStream.Free;
      end;

А сохраняю так:

Код:

FileStream := TFileStream.Create(ExtractFilePath(Application.ExeName) +
 'Components.sav', fmCreate );
   FileStream.WriteComponent( FormCalendar );
filestream.Free;

Может я что не так делаю? Но панель не появляется после открытия. Может ещё что надо дописать?

Человек_Борща · 03.11.2011, 10:05

Однако странный способ. Да и с чего вы взяли, что оно на панели отобразит, то что вы прочитали?
Вы родителя задали тому, что прочитали? Вы место расположения на форме указали ему? Нет. Просто считали в переменную(Если вообще считывали) и больше ничего.

medved6216 · 03.11.2011, 10:22

Человек_Борща, может поможете? Панель создается динамически. Её необходимо сохранить на форме, чтобы она появилась и при следующем открытие.

Человек_Борща · 03.11.2011, 10:35

Вы записываете сам компонент, а его позиция относительно формы и его родитель не запоминается.

parent, left, top свойства.

03.11.2011, 10:01	#1
medved6216 Пользователь Регистрация: 28.10.2009 Сообщений: 56	Сохранение и отображения объекта FileStream Не могу отобразить сохраненную панель из Stream Загружаю так: Код: `if FileExists( ExtractFilePath(Application.ExeName) + 'Components.sav' ) then begin FileStream := TFileStream.Create( ExtractFilePath(Application.ExeName) +'Components.sav', fmOpenRead ); FileStream.ReadComponent( FormCalendar ); FileStream.Free; end;` А сохраняю так: Код: `FileStream := TFileStream.Create(ExtractFilePath(Application.ExeName) + 'Components.sav', fmCreate ); FileStream.WriteComponent( FormCalendar ); filestream.Free;` Может я что не так делаю? Но панель не появляется после открытия. Может ещё что надо дописать?

03.11.2011, 10:05	#2
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,434	Однако странный способ. Да и с чего вы взяли, что оно на панели отобразит, то что вы прочитали? Вы родителя задали тому, что прочитали? Вы место расположения на форме указали ему? Нет. Просто считали в переменную(Если вообще считывали) и больше ничего. Последний раз редактировалось Человек_Борща; 03.11.2011 в 10:07.

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Создан ли FileStream	KoBRaAndrey	Общие вопросы Delphi	6	26.04.2011 11:52
TreeView, Record, FileStream	JoLan	Общие вопросы Delphi	18	17.01.2011 11:15
Проблемы с FileStream	Gauss	Общие вопросы .NET	10	13.09.2010 17:16
Сохранение объекта в файл	garybaldi	Помощь студентам	4	30.10.2009 09:55
FileStream	ryton	Общие вопросы Delphi	9	26.05.2008 13:53

03.11.2011, 10:22	#3
medved6216 Пользователь Регистрация: 28.10.2009 Сообщений: 56	Человек_Борща, может поможете? Панель создается динамически. Её необходимо сохранить на форме, чтобы она появилась и при следующем открытие.

03.11.2011, 10:35	#4
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,434	Вы записываете сам компонент, а его позиция относительно формы и его родитель не запоминается. parent, left, top свойства.