Einzelnen Beitrag anzeigen

striderx

Registriert seit: 11. Feb 2007
Ort: Bergisch Gladbach
206 Beiträge
 
Delphi 10.4 Sydney
 
#1

Delphi 2005 und CreateEllipticRgn

  Alt 20. Dez 2009, 08:41
Hallo,

ich bin vor kurzem von Delphi 7 auf Delphi 2005 Pro unter Windows 7 umgestiegen (ich habe zwar auch Delphi 2009 aber noch keine Lust, alles auf Unicode umzustellen). Alles klappt wunderbar, nur CreateEllipticRgn bleibt ohne Effekt (d. h. rechteckig).

Delphi-Quellcode:
procedure TDlgSplash.FormCreate(Sender: TObject);

var
  NewRegion: Hrgn;

begin
  NewRegion := CreateEllipticRgn(1, 1, 500, 500);
  SetWindowRgn(Handle, NewRegion, True);
end;




P. S.: Beim alten Kompilat des Programms ist alles 'rund'.
  Mit Zitat antworten Zitat