PageControl "Seitenverwaltung"

[blawen]

Zitat:

Zitat von Störtebeker

- Ich möchte, dass wenn ich auf "Öffnen" klicke, ein neuer Tab erstellt wird, dessen Caption der
Dateiname ohne Pfad (c:/.../.../blabla.txt --> blabla.txt) ist.

Den Weg habe ich Dir oben aufgezeigt.

Zitat:

Zitat von Störtebeker

- Beim Speichern möchte ich, dass der Dialog für das Speichern DEN Text speichert, dessen Tab gerade
aktiv ist. Müsste dann wahrscheinlich auch mit den Integerwerten gemacht werden, oder? Damit der
Dialog weiß, auf welchen Tab er zugreifen soll.

Hoffe, es ist etwas verständlicher geworden. :oops:

Dies ist mir noch nicht ganz klar.
Welchen Text möchtest Du (mit-) speichern und vorallem wo liegt genau das Problem. Mit den obigen Ansätzen kennst Du eigentlich alle notwendigen Dinge dafür.

(Sorry, dass ich so "Begriffsstutzig" bin)

[hoika]

Hallo,

PageControl1.ActivePage -> aktueller TabSheet

obiger Code noch mal

Delphi-Quellcode:

function TForm1.GetCurrentSynEdit: TSynEdit;
var
  i: SmallInt;
begin
  Result := nil;
  for i := 0 to PageControl1.ActivePage.ControlCount -1 do
  begin
    if (PageControl1.ActivePage.Controls[i] is TSynEdit) then
    begin
      Result := TSynEdit(PageControl1.ActivePage.Controls[i]);
      Break;
    end;
  end;
  // Assert(Result <> nil);
end;

Und jetzt erzähl noch mal,
was genau du nicht verstehst.


Heiko