ich möchte ein Programm schreiben, indem man kein MDI Fenster benutzt sondern
PageControl's (style=tsFlatButtons)!
Nur das Problem ist das ich nicht weiß, wie man ein RichEdit per Code neu erstellt!

Neuer TabSheet:

[code]
void __fastcall Twmain::Neu1Click(TObject *Sender)
{
    static number = 1;
    TTabSheet *pPage   = new TTabSheet(projects);
    pPage->PageControl = projects;
    pPage->Caption     = AnsiString("Unbenannt -") + IntToStr(++number);
}
[/code]

Meine Idee, hat aber nicht funktioniert:

[code]
void __fastcall Twmain::Neu1Click(TObject *Sender)
{
    static number = 1;
    TTabSheet *pPage   = new TTabSheet(projects);
    pPage->PageControl = projects;
    pPage->Caption     = AnsiString("Unbenannt -") + IntToStr(++number);
    TRichEdit *reEdit  = new TRichEdit(projects);
}
[/code]

Danke schon für eure Hilfe ...