Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Spielherstellung

    Delphi
    by SirThornberry, 6. Sep 2006
  das einfachste wäre wohl von TCustomControl abzuleiten und im SetBounds mit CreatePolygonRgn die sechseckige Form setzen
  Je nach Muster zum Beispiel so
  
  procedure TMyComp.SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
  var
  HR : Cardinal;
  lPoints: Array of TPoint;
  lWidth: Integer;
  begin
  lWidth := AWidth div 4;