> coba....
>
> Procedure TForm1.create_radioGroup(aParent: TForm;posisiX, PosisiY,
Jumlah:
> Integer);
> var
> aRadioGroup:TRadioGroup;
> i: Integer;
> begin
> aRadioGroup:= TRadioGroup.Create(self);
> aRadioGroup.Parent:= aParent;
> aRadioGroup.Top:= posisiy;
> aRadioGroup.Left:= Posisix;
> aRadioGroup.Height:= 80;
> for i:= 1 to jumlah do
> aRadioGroup.Items.Add(intTostr(i));
> end;
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> i, j: integer;
> aRadioGroup: TRadioGroup;
> begin
> for i:= 1 to 4 do // sesuikan mau jumlah radio grounya berapa
> begin
> Create_radioGroup(Form1,5,(i*80), 5);
> end;
> end;
>
> aris s
> ----- Original Message -----
> From: "irvan" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Wednesday, November 12, 2003 12:26 PM
> Subject: [Delphindo] tanya lagi donk
>
>
> > delphiers yang baek....
> > mo nanya lagi nich (maklum masih bodo)
> > caranya mengcreate control pada saat runtime?
> > misal saya mo create radiogroup sebanyak 40 buah dengan masing2 terdiri
> > dari 5 buah radiobutton
> > bisa gak yach?
>
_____________________________________________________________________
Envie de discuter en "live" avec vos amis ? T�l�charger MSN Messenger
http://www.ifrance.com/_reloc/m la 1�re messagerie instantan�e de France
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/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/
