Wie gebe ich dem Form eine andere Form?

[Martin R. Fajt]

Hallo,
ich bin ein Delphi Anfänger, dennoch habe ich ein ausgefallenes Problem,
ich würde gerne den Forms meiner Applikation(en) eine andere Form geben, nicht nur rechteckig, ist das machbar, wenn ja wo kann ich was zu diesem Thema nachlesen?

Danke im Voraus,
Martin

[Markus Fuchs]

Hi,<p>
ja, das ist möglich.<p>
Eine Möglichkeit wäre die Freewarekomponente 'CoolForm' ( http://www.lawrenz.com/coolform ) zu benutzen. Die Handhabung ist allerdings nicht ganz einfach (glaub ich, noch nicht mit gearbeitet!)!<p>
Die andere Möglichkeit wäre, dass man es, ohne Komponente, selbst programmiert.<p><p>
Z.B.<p>
<tt>
procedure TForm1.FormCreate(Sender: TObject);<br>
var r1, r2: HRgn;<br>
begin<br>
&nbsp;&nbsp;r1 := CreateEllipticRgn(1, -1, Width - 1, Height);<br>
&nbsp;&nbsp;r2 := CreateEllipticRgn(50, 50, Width - 50, Height - 50);<br>
&nbsp;&nbsp;CombineRgn(r2, r1, r2, RGN_XOR);<br>
&nbsp;&nbsp;SetWindowRgn(handle, r2, true);<br>
end;<p>
</tt>
Bei weiteren Fragen stehe ich gerne zur Verfügung.<p>
Gruß,<br>
Marku

[Hagen Reddmann]

Hi

Hier natürlich

http://www.entwickler-forum.de\webx?13@@.ee6cb11/2

Gruß Hage