Hi,
ich möchte meinem Editor das Anzeigen mehrerer Datein ermöglichen. Dazu verwende ich ein PageControl. Das mit dem Hinzufügen der Reiter funktioniert schon einmal. Probleme habe ich jetzt mit dem SynEdit. Beim Programmstart ist ein SynEdit offen. Da schreibe ich jetzt zum Beispiel Text rein und erstelle dann über meinen Menüpunkt "NEU" eine neue Page. Was jetzt auftritt ist, dass auf dem neu erstellten Reiter der gleiche Text im SynEdit steht, wie im Reiter davor. Und wenn ich zwischen den beiden Reitern hin und her wechsle, habe ich das Gefühl, dass ich nur die Reiter ändere, jedoch nicht das SynEdit. Der folgende Code müsste doch eigentlich meinem Wunsch entsprechen, über den Menüpunkt "NEU" eine neue Seite zu erstellen, mit einem neuen, leeren SynEdit.
Doch das passiert leider nicht. Wäre froh, wenn jemand von euch Rat wüsste.
Delphi-Quellcode:
procedure TForm1.MenuItem27Click(Sender: TObject);
var
ts : TTabsheet;
se: TSynEdit;
begin
i:=i+1;
ts := TTabsheet.Create(Self);
ts.PageControl := PageControl4;
ts.Parent := PageControl4;
se:= TSynEdit.Create(Self);
se.Parent := ts;
ts.Caption := 'New Document '+IntToStr(i);
ts.PageControl.ActivePage := ts.PageControl.Pages[i];
end;
MfG
Störtebeker