VCL Delphi

  1. Home
  2. Delphi
  3. VCL
  4. [] Birden fazla editleri silmek için
// Birden fazla Editleri içeriğini temizlemek
// Sedat Ermiş seydi73@hotmail.com
// 7 tane Editiniz var diyelim....
var
i: byte;
begin
for i:=1 to 7 do
(FindComponent('Edit'+IntToStr(i)) as Tedit).Text := '';
end;