Saturday, September 27, 2003, 4:09:55 AM, you wrote:
<!--DEL-->
AY> sbg ilustrasi di vb (maaf karena saya tahu nya cuma di vb :) )
AY> dapat dilakukan sbb :
Aah, ndak perlu minta maaf ini khan dalam rangka 'merayu' anda supaya
pake Delphi... Kalo banyak yang pake delphi khan entar banyak
programmernya kalo banyak programmernya gajinya juga murah... :p Jadi
kalo perlu 'apa sih yang nggak bisa pake Delphi'.
AY> dim a as textbox
AY> for i=0 to txtFields.count -1
AY> set a=txtfields(i)
AY> a.text=""
AY> next
Sesuai Analogi diatas:
var
a: TEdit;
i: Integer;
for i := 0 to ComponentCount-1 do
if Components[i] is TEdit then begin
a := TEdit(Components[i]);
a.Text := '';
end;
<!--DEL-->
---
Best regards,
Syarif Lumintarjo
[EMAIL PROTECTED]
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Upgrade to 128-Bit SSL Security!
http://us.click.yahoo.com/p7cEmB/s7qGAA/yigFAA/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/
