limpiar text en edit

[botones67]

Hola a todos y perdorar mi ignorancia.

Tengo 10 edit y en ejecucion quiero borrar la propiedad text de todos.
Es posible hacerlo con algún bucle para no repetir el mismo codigo
para los 10

var contador: integer;


for contador:=1 to 10 do

form1.edit+contador.text:=' ' ; me da error



Gracias anticipadas

[Bacterion]

lo primero que tienes que ver es ¿que estas haciendo con form1.edit+contador.text:=' ' ;?

Una forma de hacer lo que buscas es, saber que todo Tcomponent tiene una lista de components que posee. El Form es un Tcomponent y por lo tanto, todo componente que pegas en el está en esa lista. Se accede por medio de la propiedad Components. Hay otra que te da cuantos hay, componentCount.

Ejemplo:
Procedure TForm1.LimpiaEdits;
var
I: Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then
TEdit(Components[i]).Text := '';
end;

Esto debe funcionarte, salvo fallos de sintaxis.

[botones67]

Muchas gracias.

[delphi.com.ar]

También puedes utilizar el método Clear. A mi parecer queda mas prolijo.

Saludos!

[reyesvc]

hola viejo yo tbm necesito una ayuda, tengo un proyecto de hacer una calculadora basica, y utilize 10 botones para los numeros del 0-9, luego 4 botones para los operadores y un EDIT para que se pueda visualizar los numeros alli...

keria saber como puedo programar por ejemplo el boton de SUMA que me haga que cuando aga click alli se pueda borrar lo que haya en el edit y pueda colocar el siguiente numero con el que kiero aser una suma y lo que se borro antes en el edit guardarlo en una variable q espere el siguiente numero qeu coloke despues, osea kisiera que tenga la misma funcion q la calculadora normal que tiene windows por defecto..

saludos y grasias

[Casimiro Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración