Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как записать полную информацию о форме в stream ? [D5, Win95/98, Win2k]

hair_fly © (2002-02-19 12:54:00)
Уважаемые Мастера! Возник интересный вопрос: можно ли (и если да, то как) записать полную информацию о форме в stream, а потом, используя этот stream создать точную копию этой формы ?

hair_fly (2002-02-19 17:40:00) [1]
to oomneeq:
Sorry, все ок. Спасибо!

hair_fly (2002-02-19 17:39:00) [2]
to oomneeq:
а файлик приклеить забыл :(

oomneeq (2002-02-19 17:24:00) [3]
>речь идет не о клонировании, а о возможности на другом компе
>(через сеть) создать точную копию формы

"создать точную копию" <> "клонированиe"
говоришь ...
Ну да ладно, пусть философы упражняются.

Я тебе страницу почтой отправил.

>Весь прикол как раз в том, что "другой комп" вообще не знает, >что это за форма.

Надо познакомить.
твою задачу не решить
без декларации класса формы
она нужна как ДНК в клонировании живых организмов.

hair_fly (2002-02-19 16:49:00) [4]
Весь прикол как раз в том, что "другой комп" вообще не знает, что это за форма.

Digitman (2002-02-19 15:27:00) [5]
"на другом компе" есть декларация класса формы ?

hair_fly (2002-02-19 15:06:00) [6]
А вот у меня ни в какую не грузится :(
Может кто на мыло мне кинет, что там есть ? ПЛИЗ!

Pete (2002-02-19 15:02:00) [7]
Да вроде нормально работает... ссылка...

hair_fly (2002-02-19 14:57:00) [8]
to Darkwin:
речь идет не о клонировании, а о возможности на другом компе (через сеть) создать точную копию формы

to oomneeq:
За ссылку спасибо, но она не работает :(

oomneeq (2002-02-19 14:20:00) [9]
>Darkwin (19.02.02 13:58)
>Не знаю как на счёт Stream, а копию формы можно сделать так:
>procedure TForm1.Button1Clic(Sender: TObject);
>var
> ClonForm:TForm;
>begin
> Application.CreateForm(TFormClass(Self.ClassType),ClonForm);
> ClonForm.Left:=Left+50;
> ClonForm.Top:=Top+50;
> ClonForm.Show;
>end;

Это будет не точная копия, а просто еще одна форма такого же типа, с дефолтными установками, т.е. без учета текущего состояния
свойств.
Прм клонировании с помощью стрима достигается гораздо большее сходство с оригиналом.
См. пред. постинг.

Darkwin (2002-02-19 13:58:00) [10]
Не знаю как на счёт Stream, а копию формы можно сделать так:
procedure TForm1.Button1Clic(Sender: TObject); var ClonForm:TForm; begin Application.CreateForm(TFormClass(Self.ClassType),ClonForm); ClonForm.Left:=Left+50; ClonForm.Top:=Top+50; ClonForm.Show; end;

oomneeq (2002-02-19 13:58:00) [11]
Можно.
читать здесь:
http://shop.biblio-globus.ru/cpr/save_objects.htm

там по-русски.

Наверх

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