Kali ini Saya mau share Cara Mengosongkan Tulisan Text Pada Komponen Edit Delphi 7 dan sebelumnya juga sudah share seputar Free Squid Proxy List Server Port 80 dan 8080 Terbaru Juni 2015 ok untuk mengosongkan tulisan pada komponen edit 7 secara otomatis itu cukup mudah sekali dan berikut adalah prakteknya;
1. Pertama buat procedure baru procedure kosongkan_text (sender: Tobject); lalu CTRL + SHIFT + C untuk memulai menggenretnya.
procedure kosongkan_text (sender: Tobject);
private
{ Private declarations }
2. Kedua masukan kode yang ada dibawah ini bisa sahabat perhatikan kodenya pada gambar.
procedure TForm1.kosongkan_text(sender: Tobject);
var i:byte;
begin
for i:=0 to componentcount-1 do
begin
if components[i] is edit then
begin
with components[i] as edit do
begin
text:='';
end;
end;
end;
end;
end;
3. Yang ketiga silahkan simpan atau coba build dulu , mungkin dari sahabat ada yang belum paham kefgunaannya tetapi suatu saat pasti sahabat akan membutuhkannya, he he
Dan hanya itu saja info kali ini seputar Cara Mengosongkan Tulisan Text Pada Komponen Edit Delphi 7 2015 semoga bermanfaat dan terima kasih.
Postingan selanjutnya; Cara Membuat Efek Sensitif Pada Minimize dan Close di Delphi 7 Terbaru 2015
Postingan selanjutnya; Cara Membuat Efek Sensitif Pada Minimize dan Close di Delphi 7 Terbaru 2015