Cambiando el codigo de delphi a builder...

[paco_galo]

muy buen dia tengan todos...
veran, hace un rato encontre un codigo que me llamo mucho la atencion en el foro de delphi, es para realizar la misma accion sobre todos los objetos iguales de un formulario. lo encontre aqui (http://www.clubdelphi.com/trucos/index.php?id=410&scroll=0&scrollb=0).

Soy relativamente nuevo :confused:, y necesito ese codigo pero en c++ builder, podrian apoyarme a cambiarlo.

Se los agradesco mucho...:)

[paco_galo]

Este es el codigo que quiero pasar a builder. Pero en lugar de limpiar los Edit que me cambie el valor de enabled a true o a false.

For x := 0 To ComponentCount - 1 Do If Components[x] Is TEdit Then TEdit(Components[x]).Text := '';

Es algo que necesito lo mas rapido que se pueda, gracias...

[egostar]

Es algo que necesito lo mas rapido que se pueda, gracias...


Oye amigo, no es mal plan, pero porque no buscas en San Google manuales de C++Builder y conviertes tu mismo el código, pierdes mas tiempo esperando la respuesta que tal vez no llegará.

Por favor, lee nuestra guia de estilo (http://wiki.clubdelphi.com/wiki/index.php/Guia_de_estilo).

Salud OS

[escafandra]

Este es el codigo que quiero pasar a builder. Pero en lugar de limpiar los Edit que me cambie el valor de enabled a true o a false.

For x := 0 To ComponentCount - 1 Do If Components[x] Is TEdit Then TEdit(Components[x]).Text := '';Es algo que necesito lo mas rapido que se pueda, gracias...

Mira a ver si esto te sirve:
TEdit *E;
for(int n=0; n<ControlCount; n++){
E = static_cast<TEdit*> (Controls[n]);
if(E) E->Enabled = false;
}

[paco_galo]

escafandra, te lo agradesco de todo corazon. Me sirve y mucho

[escafandra]

escafandra, te lo agradesco de todo corazon. Me sirve y mucho

No hay de que....