Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Probleme mit Tab-Navigation


dsJena - Do 28.12.06 16:21
Titel: Probleme mit Tab-Navigation
Hallo, ich bin gerade dabei einen Texteditor mit "Tabbed Browsing" zu programmieren. Ein Button mit der Funktion "Neuer Tab..." funktioniert schon ohne Weiteres. Nun möchte ich aber auf die neu erstellte Seite auch eine TRichEdit-Komponente haben; das bekomme ich nicht hin.

Danke für die Hilfe!


Leuchtturm - Do 28.12.06 16:51

Du musst ein RichEdit dynamisch erzeugen und Parent auf Das neue Tab setzen


dsJena - Do 28.12.06 16:54

Soweit war ich ja auch schon, nur wie? Ich habe es mit Richedit.Create gemacht, funktioniert hat's nicht so richtig.


Marco D. - Do 28.12.06 17:10

user profile icondsJena hat folgendes geschrieben:
Soweit war ich ja auch schon, nur wie? Ich habe es mit Richedit.Create gemacht, funktioniert hat's nicht so richtig.

Wenn du mehrere Tabs erstellen lassen willst, dann nimm entweder eine verkettete Liste oder ein array of TRichEdit.
Erstellen tust du ein Richedit so

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
var MyRichedit: TRichEdit;

MyRichEdit := TRichEdit.Create; //Ob da in Klammern noch der Owner hinmuss, weiß ich ATM nicht...
MyRichEdit.Parent := Self;
MyRichEdit.Left := XX;
MyRichEdit.Width := XX;
MyRichEdit.Height := XX;
MyRichEdit.Top := XX;

//Im OnDestroy alle wieder freigeben
FreeAndNil(MyRichEdit);