Thema: Delphi Form nicht rechteckig

Einzelnen Beitrag anzeigen

SimStar001

Registriert seit: 18. Jan 2008
594 Beiträge
 
#4

Re: Form nicht rechteckig

  Alt 11. Jun 2009, 17:39
kein ding, ganz einfach:

hier mal ein Bsp:

Delphi-Quellcode:
procedure TfrmMain.FormCreate(Sender: TObject);
var HR1 : Hrgn;
    P : array [0..3] of TPoint;

begin
  P[0] := Point(0,0);
  P[1] := Point(0,100);
  P[2] := Point(100,0);
  P[3] := Point(0,0);

  HR1 := createPolygonRgn(P,4,ALternate);

  SetWindowRgn(Handle,HR1,True);
end;
Du kannst beliebig viele Punkte ins Array packen... je nach dem was du als Form haben willst!


LG Marco
  Mit Zitat antworten Zitat