Не знаю какое руководство использовалось, но похоже никакое.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
MyD1:TDialogs1;
begin
MyD1.Create;
MyD1.MyProp:=1;
MyD1.free;
end;
Где написано так делать?
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
MyD1:TDialogs1;
begin
MyD1 := TDialog1.Create;
MyD1.MyProp:=1;
MyD1.free;
end;