Programm einblenden

[turboPASCAL]

Zitat von ManuMF:

Mit Sleep funktioniert es nicht, besser ist Delay.

Delphi-Quellcode:

procedure TForm.FormCreate...
var i: integer;
begin
  alphablend := true;
  alphablendvalue := 0;
  show;
  for i:= 0 to 255 do begin
    alphablendvalue := i;
    application.processmessages;
    sleep(0);  // bzw sleep(1);
  end;
  alphablend := false;
end;

Und ob das tut.