Окна.........

← →
SeF © (2002-02-22 11:44) [0]

Здраствуйте!
Подскажите кто сталкивался:
неовходимо создать форму которая будет точной копией оригинала, а после изменений на ней сохранить ее для дальнейшего использования. Была идея сохранить в Stream, но в связи с отсутствием опыта и знаний по работе со Stream, она отпала.
Потом встает вопрос как ее из сохраненного востановить.
Такая проблема. Отозвавшимся заранее Спасибо!

← →
Val © (2002-02-22 11:59) [1]

Точная копия оригинала-не потомок ли?

← →
Анонимщик © (2002-02-22 12:25) [2]

Вот именно со Stream и нужно работать.

TFileStream *pfs = new TFileStream(aFile, fmCreate);
pfs->WriteComponent(myForm);
pfs->Free();

TFileStream* pfs = new TFileStream(aFileName, fmOpenRead);
pfs->ReadComponent(this);
pfs->Free();

Тоько перед чтением нужно зарегистрировать классы, экземпляры которых имеет форма.

← →
oomneeq © (2002-02-22 13:46) [3]

Почитал бы форум чуть дальше своего сообщения.
Вопрос обсасывался недавно и активно
Вот почитай
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1014112454&n=0

← →
SeF © (2002-02-22 20:06) [4]

2Анонимщик
>Тоько перед чтением нужно зарегистрировать классы, экземпляры которых имеет форма.

KAK?

← →
SeF © (2002-02-22 20:36) [5]

2Val
идея: есть дефаултовая форма, она грузится, делаются изменения(добовляются/удаляются определенные компоненты компоненты), затем это все необходимо сохранить в новом виде. вслывающая задача: воспроизвести все сохраненное. примерно так.

← →
oomneeq © (2002-02-22 21:32) [6]

2SeF
Ну что ж ты ленивый то такой!
http://shop.biblio-globus.ru/cpr/save_objects.htm
как раз твоя задача на примере решается
или надо за тебя все сделать?

← →
SeF © (2002-02-22 21:52) [7]

2oomneeq
Не столь ленивый сколь малоопытный, не прими за грубость, но не моя задача, мне необшодимо сохранить и воспроизвести (2 процедуры/функции) форму, а в достаточно большом куске чужого кода, с пактически отсутствующими знаниями в синтаксисе языка, на данный момент мне не удалось. вот.

← →
oomneeq © (2002-02-22 22:26) [8]

Да я то не злой, но позволю себе аллегорию
представь себе, когда умирающему от жажды дают бутылку воды,
а он говорит - вы извините, я малоопытный, может в стаканчик нальёте?
Ну ты хоть ссылку, что я дал, посетил?
Там пример-то рабочий. Поуверенней, все получится.
Успеха тебе.

← →
SeF © (2002-02-22 23:11) [9]

2oomneeq ©
давно посетил.....

← →
SeF © (2002-02-23 03:09) [10]

2oomneeq
что-то я не ощутил в статье как мне сохранить форму. как компонент сохранить есть, а про форму целиком что-не заметил.

А чуть левее... :-)
http://shop.biblio-globus.ru/cpr/clone_objects.htm

Регистрация:
MetaClass = __classid(TDBEmbossLabel);
RegisterClass(MetaClass);
Это на билдере, а на Дельфи не помню, смотри справку по RegisterClass

2Анонимщик
senk

Окна......... Найти похожие ветки