Hallo,
Zitat:
sei doch bitte so nett und editiere Deinen Beitrag noch einmal.
Ja, das wäre sehr nett; sonst bekommt man noch Augenkrebs
Um DeddyH zu konkretisieren: Anmelden, den eigenen Beitrag suchen, in der Fusszeile auf die Schaltfläche Bearbeiten klicken und dann Quellcode innerhalb der [DELPHI ][/DELPHI ]-Tags (Helm-Symbol in den Shortcuts) einfügen.
Ansonsten könnte folgendes Dein Problem vielleicht lösen:
Delphi-Quellcode:
TForm2 = class(TForm)
procedure FormPaint(Sender: TObject);
private
FMustRepaint : Boolean;
end;
procedure TForm5.FormCreate(Sender: TObject);
begin
FMustRepaint := True
end;
procedure TForm2.FormPaint(Sender: TObject);
begin
if FMustRepaint then
begin
blattanpassen;
ausgabe(blatt);
FMustRepaint := False
end;
end;
procedure TForm2.FormShow(Sender: TObject);
begin
FMustRepaint := True
end;
Zitat:
{diese 5 zeilen standen mal in form2.create}
Und diese 5 Zeilen wieder ins FormCreate
Gruß