I wrote this email on Wednesday/Rabu,
Date/time : 15-01-2003/12:54:29

   Date: Tue, 14 Jan 2003 11:20:25 +0700
   From: "Martin" <[EMAIL PROTECTED]>
Subject: Bentuk Form yg aneh aneh ..

gimana caranya bikin form yg bentuknya aneh aneh .. bulat + segitiga atau kotak elips 
dsb, dan
sisanya bolong / transparent ..

ada aplikasinya atau mesti dibikin manual ya ?

++++End Of Original Message++++

kalo aplikasinya saya nggak tau.
tapi kalo mau buat sendiri, saya pernah diajar di kuliahan. tapi masih
sederhana banget. pake win API
nih gua ketikkan sedikit.

procedure Tform1.formcreate (sender : TObject);
var sec1,sec2 : hrgn;
begin
  sec1 := createroundrectrgn(0,0,width,height-30,20,20);
  sec2 := createroundrectrgn(20,height-28,width-20,height,30,30);
  combinergn(sec1,sec1,sec2,rgn_or);
  setwindowrgn(handle,sec1,true);
end;

untuk lebih jelasnya, baca help :=)

---
Sugianto
Student
Surabaya


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Flexible Keyboard is the ideal accessory for PDA users that are on the move.
http://us.click.yahoo.com/dCBVZC/WnCFAA/sXBHAA/i7folB/TM
---------------------------------------------------------------------~->

Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ 


Kirim email ke