Form nicht zu sehen !?

[haentschman]

Danke für Eure zahlreichen Tipps...

habe jetzt:

Delphi-Quellcode:

const
  WM_FERTIG = WM_USER + 100;

procedure HabeFertig(var Msg: TMessage); Message WM_FERTIG;

Delphi-Quellcode:

procedure TFUMain.FormShow(Sender: TObject);
begin
  JvXPProgressbar1.Position:= 0;
  INIEinlesen;
  UINIEinlesen;
  PostMessage(Handle, WM_FERTIG, 0, 0);
end;

Delphi-Quellcode:

procedure TFUMain.HabeFertig(var Msg: TMessage);
var A: Integer;
begin
  for A := 1 to UFiles do
    begin
      FileINI(IntToStr(A));
      DateiDownload(USource,UZiel);
    end;
  VersionDatum:= UVersionDatum;
  INISchreiben;
  ShellExecute(Application.Handle,'open',PChar('eAV.exe'),NIL,NIL,SW_SHOWNORMAL);
  Application.Terminate;
end;

...und es arbeitet doch

Danke an alle.