makasih banyak atas tanggapannya it's working properly harap maklum yaaaa masih bodo nich di delphi hehehehehehe
regrad irvan ignatius aris wrote: > > > > > 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 > ADVERTISEMENT > <http://rd.yahoo.com/SIG=12c81jgs1/M=267637.4116719.5338353.1261774/D=egroupweb/S=1705115362:HM/EXP=1068707549/A=1853618/R=0/*http://www.netflix.com/Default?mqso=60178338&partid=4116719> > > > > > Berlangganan: [EMAIL PROTECTED] > Stop Berlangganan: [EMAIL PROTECTED] > Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] > > Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service > <http://docs.yahoo.com/info/terms/>. [Non-text portions of this message have been removed] ------------------------ 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/
