Ver Mensaje Individual
  #2  
Antiguo 16-07-2007
NovatoEnObjetos NovatoEnObjetos is offline
Miembro
 
Registrado: jul 2007
Posts: 23
Reputación: 0
NovatoEnObjetos Va por buen camino
Thumbs up Gracias gabrielck

Oye Gabriel, de veras que me has ahorrado un buen, al igual que los demas compañeros, creo que me falta leer un poco mas, pero ya probé lo que expones y me sale de maravilla, ya que me ha surgido la necesidad de hacerlo con 24 tedits, y hago limpias de texto en un solo for, en verdad estoy agradecido a todos los que han participado, ya que me han sacado de varios apuros de varias formas, cada vez aprendo mas del lenguaje, es bueno saber que cuenta uno con ustedes...


Aqui un ejemplo de lo que hice


Código Delphi [-]
procedure TForm1.Button3Click(Sender: TObject); 
var 
edit:Tedit;
x:integer;
begin
edit:=nil; 

for x:=2 to 25 do
begin
edit:=FindComponent('edit'+inttostr(x)) as Tedit;
if edit<>nil then
edit.Text:='';
end;//fin del for
 
end;//fin del buttonclick

asi lo hice jeje, gracias a todos!!!! y alguna otra opción que me enseñe mas sera agradecida sinceramente....


su servidor NovatoEnObjetos
Responder Con Cita