pagecontrolseiten dynamisch erzeugen

[markus lemcke]

für meinen html-editor möchte ich die pagecontrolkomponente
verwenden. für jede html-datei möchte ich eine seite(page) dynamisch
erstellen. in dieser page soll dynamisch ein memofeld erzeugt werden,
in dem die datei rein geladen wird!!!!!!
wer kann mir helfen!!!!!!!!!!!??????????????????????

mfg

markus

[meikl]

hi,

ein beispiel,

procedure TForm1.Button1Click(Sender: TObject);

var

T : TTabsheet;

M : TMemo;

begin

if Opendialog1.Execute then

begin

T := TTabSheet.Create(Self);

T.PageControl := PageControl1;

T.Parent := PageControl1;

T.Caption := Opendialog1.Filename;

M := TMemo.Create(Self);

M.Parent := T;

M.Align := alClient;

M.Lines.LoadFromFile(Opendialog1.Filename);

PageControl1.ActivePage := T;

end;

end;

meik

[meikl]

ich habs noch nicht raus mit den tags :-

[markus lemcke]

besten dank.
habe es aber schon selbst hinbekommen!!!

mfg

marku