Probleme mit SetBounds

[Baeuerle]

Morgen zusammen,

ich habe ein kleines Problem unter Delphi2005 Prof.

SetBounds eines Formulars funktioniert nur, wenn das Fenster sichtbar ist! Das Projekt wurde von Delphi4 nach delphi2005 porptiert. Vielleicht hat jemand eine Ahnung woran das liegen kann.

Delphi-Quellcode:

// Das hier geht nicht !!!!
form:=TForm.Create(application)
try
form.setbounds(r.left,r.top,500,200);
form.showmodal;
finally
 form.Free;
 end;

// Das hier geht jedoch flxkert dann natürlich der Bildschirm
form:=TForm.Create(application)
try
form.show; // muss sein damit setbounds geht 
form.setbounds(r.left,r.top,500,200);
form.hide; // verstecken damit showmodal geht
form.showmodal;
finally
 form.Free;
 end;

Danke Baeuerle

[Sharky]

Hai Bauerle,

was geht denn nicht? Ich denke mal das Fenster wird an der falschen Postion angezeigt?
Wenn ja wird dies daran liegen das bei D2005 der default Wert für TForm.Position auf poDefaultPosOnly steht und nicht, wie bei den vorherigen Versionen auf poDesigned.

Es müsste also reichen vor deinem SetBounds den Wert für Position auf poDesigned zu setzen.

[Baeuerle]

Hai,

ok das hat geholfen, Position war auf poDefault eingestellt nach dem Umstellen auf poDesigned hat es funktioniert.

DANKE