PageControl "Seitenverwaltung"

[blawen]

Zitat von Störtebeker:

Na ja, die Frage 1 ist, wie ich es schaffe, dass die Tabs automatisch beschriftet werden.

Steht soweit in meiner vorherigen Antwort.

Ein weiteres Bsp.:

Delphi-Quellcode:

var
  iZaehler: Integer;

begin
  with PageControl1 do
    for iZaehler := 0 to 5 do
      with TTabSheet.Create(Self) do
        begin
          PageControl := PageControl1;
          Caption := 'Dokument ' + IntToStr(iZaehler);
        end;
end;