Delphi de görsel ve dinamik menu oluşturmak

Murat abi rica etsem bu konu hakkında küçük bir örnek koyarmısın?Ben şu şekilde yaptım ama geciş gözle görülmeycek kadar hızlı oluyor ;

merhaba,
kesik şekilde formları yapmak için şuana kadar iki tür yöntem kullandım. il kullandığın yöntem paint de çizimi yapıyordum ve yaparken x,y koordinatlarını not ediyordum. çizimi bmp olarak kayıt edip photoshop da renklendirme, kenarlık ayarları vs... gibi kısımları ayarlıyordum. paint'de elde ettiğim x,y koordinatlarını delphide form'u kesmek için kullanıyordum. ve form'a bir adet timage nesnesi koyup photoshop'da yapıp yüksek kaliteli JPEG olarak kayıt ettiğim veya bmp olarak kaydettiğim resim dosysını programın kök dizinine koyup form yükleme esnasında timage nesnesie yüklüyordum. haliyle koordinatlarda kodlama ile kesildiğinde resim kesikler dışında kalıyordu. resim üzerinde phoshop'da ayar yaparken çizim dışına taşırmıyordum ( dış gölge kullanmayacaksın )
çok fazla kesim içeren formlarda bu yöntem baya zor oluyor. düşün ki ince form kesimlerinde belki 100 üzeri x,y koordinatı kullanıyorsun. örnek vereyim;

procedure TForm1.FormClick(Sender: TObject);
var
i:array [1..14] of TPoint;
FH:THANDLE;
begin
 FH := Form1.Handle;

 i[1]:=Point(50,50);
 i[2]:=Point(250,50);
 i[3]:=Point(250,75);
 i[4]:=Point(130,75);
 i[5]:=Point(130,90);
 i[6]:=Point(64,90);
 i[7]:=Point(64,75);
 i[8]:=Point(50,75);
 i[9]:=Point(50,50);

 i[10]:=Point(50,90);
 i[11]:=Point(250,90);
 i[12]:=Point(250,200);
 i[13]:=Point(50,200);
 i[14]:=Point(50,90);

 SetWindowRgn(FH,CreatePolygonRgn(i,14,WINDING),True);
end;

yukarıda dediğim gibi bu çizimin sonucuda istinaden yapığım resim'i de form'a yüklüyorum.

bunun dışında form'u CreateRectRgn, CombineRgn ve DeleteObject fonksiyonları ilede biçebilirsin.
örnek doküman:
http://www.megaupload.com/?d=KWNP36CC

ayrıca delphi 2009'da bu işi sıfır kod ile yapan bir mekanizma var.
örnek: ziyah zemin üzerine bir resim yap, form'un transparan özelliğini True yap ve transparanColor'u clblack yap. form'a bir image nesnesi koy ve resim'i yükle. (siyah ayarladığımızdan resimde siyah for üzerine olmalı) projeyi çalıştır ve sonucu gör. bu özellik belki önceki sürümlerde de vardır fakat Delphi 7 de yoktu diye hatırlıyorum. delphi 2009'da gözüme çarptı.