Сохранение published-свойств
Juice © (2005-08-18 11:08:00)
Delphi сохраняет published-свойства в файлах формы. Вот
только-что провел простой эксперимент:
program Project1;
uses
Forms,
Classes,
StdCtrls,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
begin
Application.Initialize;
RegisterClass(TMemo);
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
private
Memo1: TMemo;
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Теперь с Memo1 можно работать так же, как если бы оно было
published-свойством (но конечно оно не доступно для других классов
кроме как из Form1) т.е. оно сохраняется, отображается на форме. В
чем прикол ? И вообще меня очень интересует механизм сохранения
обьектов в Delphi, что как и когда сохраняется, как контролировать
этот процесс и т.д. и т.п. Буду очень признателен за ссылочку или
статейку где почитать.
Digitman (2005-08-18 11:23:00) [1]
перенос Memo1: TMemo в секцию private в дан.случае ровным
счетом ни на что не влияет (кроме будущей области видимости
идент-ра Memo1) - при сохранении формы будут автоматически
сохранены все компоненты, owner'ом которых является сохраняемая
форма (см. TCustomForm.GetChildren), а owner'ом у Memo по дифолту
как раз и является эта самая сохраняемая форма, ибо ты бросил Memo
на эту форму в дизайн-тайм, а не создал его в ран-тайм
Наверх 
ЧАТ |
Орешник |
|
