edit bileşeni

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
bimsamsy
Üye
Mesajlar: 25
Kayıt: 04 Mar 2005 04:42

edit bileşeni

Mesaj gönderen bimsamsy »

formda bulunan 50 adet edit bileşenlerinin text içeriğni otomatik olarak nasıl boşaltırım.
Kullanıcı avatarı
selman
Üye
Mesajlar: 664
Kayıt: 04 Ara 2003 12:06
Konum: İzmir

Mesaj gönderen selman »

selam
form üzerinde ki tüm editlerin içeriğini
boşaltabilmek için bir for do döngüsü ile bunu yapabilirsin
Kullanıcı avatarı
mege
Admin
Mesajlar: 2360
Kayıt: 05 Şub 2004 04:32
Konum: Beşiktaş
İletişim:

Mesaj gönderen mege »

:ara componentcount
böyle bi aratıp sonuçları inceleyin
.-.-.-.-.-.-.-. ^_^
Kullanıcı avatarı
vedatkaba
Kıdemli Üye
Mesajlar: 866
Kayıt: 06 Oca 2004 06:50
Konum: DARICA/GEBZE

Mesaj gönderen vedatkaba »

Kod: Tümünü seç

procedure edittemizle;
        var
        i:integer;
       begin
       for i:=0 to componentcount-1 do
      begin 
      if components[i] is Tedit then
    begin
   tedit(components[i]).clear;
end;
end;
end;
kolay gelsin
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.

***********************************
Cevapla