[mufan]

доброго времени суток всем!
проблема такая: программно создаю MDI-дочернюю форму...
допустим так:

Код:

var
  new_project: TForm;
...
begin
  new_project:=TForm.Create(self);
  new_project.Width:=500;
  new_project.Height:=500;
  new_project.FormStyle:=fsMDIChild;
...

и есть желание добавить к форме этой, например, Property типа Integer и с именем MyField... как это сделать не подскажете???

[Aristarh Dark]

Сделай наследника от TForm, а потом программно создавай именно его. Примерно так:

Код:

Type
  TMyFrom = class(TForm)
    private
      FMyField:Integer;
    public
      property MyField:Integer read FMyField write FMyField;
  end;
...
...
...
  var
    form:TMyForm;
  begin
    form:=TMyForm.Create(nil);
    form.MyField:=10;
    form.Free;
  end;

[mufan]

спасибо!!!