Я имею ввиду выполнение операторов после строки
Код: Выделить всё
initialization
{$I unit1.lrs}
Вот это место!!!
end.
Модератор: Модераторы
Код: Выделить всё
initialization
{$I unit1.lrs}
Вот это место!!!
end.
Код: Выделить всё
TAnyForm = class(TForm)
...
public
constructor Create(AOwner: TComponent); override;
end;prgchip писал(а):Как раздел Implementation будет выглядеть
prgchip писал(а):На каком этапе происходит инициализация формы?
prgchip писал(а):На каком этапе происходит инициализация формы?
Я имею ввиду выполнение операторов после строки.
Код: Выделить всё
Application.CreateForm(TForm1, Form1);Код: Выделить всё
procedure TApplication.CreateForm(InstanceClass: TComponentClass;
out Reference);
var
Instance: TComponent;
ok: boolean;
AForm: TForm;
begin
// Allocate the instance, without calling the constructor
Instance := TComponent(InstanceClass.NewInstance);
// set the Reference before the constructor is called, so that
// events and constructors can refer to it
TComponent(Reference) := Instance;
ok:=false;
try
if (FCreatingForm=nil) and (Instance is TForm) then
FCreatingForm:=TForm(Instance); Код: Выделить всё
MyForm:TForm; //У нас есть переменная типа форма
//Нужно создать переменную (инициализировать, разместить в памяти, присвоить полям значения по умолчанию)
MyForm:=TForm.Create;prgchip писал(а):Я имею ввиду выполнение операторов после строки.
А именно для строки типа:Код: Выделить всё
Initialization