como ejecutar una instruccion

[[egostar]]

Empezado por omy

hi


tengo este codigo



dentro de un evento click
var nombre,prueba:string
begin

// tengo un objeto llamado DBEnombre. Que tiene como valor ACAPULCO

prueba := ‘DBEnombre.text’
nombre := ¿??????? prueba
// como ejecuto el valor de prueba para que la variable nombre guarde ACAPULCO

end;



¿Si se puede?

Gracias de antemano

Hola omy, antes que nada te invito a leer nuestra guía de estilo, sería bueno que usaras las etiquetas para que el código se comprenda mejor.

Por otro lado, veo un problema en tu código, no estas pasando adecuadamente DBEnombre a la variable prueba.

Trata así:

Código Delphi [-]
var 
  nombre,prueba:string
begin
   prueba := DBEnombre.text;
   nombre := prueba;
end;

Salud OS

[omy]

Por otro lado, veo un problema en tu código, no estas pasando adecuadamente DBEnombre a la variable prueba.

no me explique bien, la variable prueba contiene litaralmente el nombre el objeto 'DBEnombre.text', lo que pasa es que en visual fox cuando yo ponia lo siguiente

prueba = ‘DBEnombre.text’
nombre = &prueba

// donde nombre trae como valor ACAPULCO....
espero explicarme mejor....

[[egostar]]

Empezado por omy

no me explique bien, la variable prueba contiene litaralmente el nombre el objeto 'DBEnombre.text', lo que pasa es que en visual fox cuando yo ponia lo siguiente

prueba = ‘DBEnombre.text’
nombre = &prueba

// donde nombre trae como valor ACAPULCO....
espero explicarme mejor....

Y ya intentaste con el código que te mostré?

Salud OS

[[Caral]]

Hola
Egostar lo entendio perfectamente y te dio la solucion a tu problema.

Código Delphi [-]
var 
  nombre,prueba:string
begin
   prueba := DBEnombre.text;
   nombre := prueba;
end;

Es de suponer que DBEnombre es un DBEdit, por esa razon contiene una propiedad Text, que es de tipo string, que a su vez sera pasado a una variable de nombre Prueba.
No me explico para que tanto royo, la verad yo eliminaria la variable nombre.
Ahora si lo que se quiere es que la variable Prueba contenga el valos ACAPULCO, pues para que usar el dbedit.

Código Delphi [-]
var 
  nombre,prueba:string
begin
   prueba := 'ACAPULCO';
   nombre := prueba;
end;

Saludos

[omy]

Código Delphi [-]

var 
  nombre,prueba:string
begin
   prueba := DBEnombre.text;
   nombre := prueba;
end;

lo anterior es facil, quizas no me explique bien yo quiero la referancia de prueba

Código Delphi [-]
var 
  nombre,prueba:string
begin
   prueba := 'DBEnombre.text';
   nombre := ?prueba;
end;

el valor que asigno a prueba es el nombre del objeto no su valor....
que signo antecede al prueba para hacer referencia el contenido del objeto

[[Caral]]

Hola
Ninguno.
Saludos

[omy]

como ninguno ?

[[egostar]]

Empezado por omy

lo anterior es facil, quizas no me explique bien yo quiero la referancia de prueba

Código Delphi [-]
var 
  nombre,prueba:string
begin
   prueba := 'DBEnombre.text';
   nombre := ?prueba;
end;

el valor que asigno a prueba es el nombre del objeto no su valor....
que signo antecede al prueba para hacer referencia el contenido del objeto

Sigo sin entender para que quieres hacer eso si puedes acceder directamente al texto de tu edit, pero bueno, si así tiene que ser, yo haría esto:

Código Delphi [-]
var
  nombre:String;
  prueba:TEdit; //prueba NO puede ser de tipo string.
begin
   prueba := Edit1;
   nombre := prueba.Text;
   ShowMessage(nombre);
end;

Aunque no se si antes deba crear el objeto prueba con:

Código Delphi [-]
   prueba := TEdit.Create(nil);

Alguno de los compañeros con más experiencia en este asunto seguro nos puede ayudar.

Salud OS

[[Caral]]

Hola
No hace falta crearlo antes y funciona perfectamente y hace exactamente lo mismo que esto:

Código Delphi [-]
var 
  nombre: string
begin
   nombre := Edit1.text;
    ShowMessage(nombre);
end;

No te parece ilogico?
Saludos

[omy]

Ok


Tengo en un form 50 objetos Edit con el siguiente nombre


Nombre1
Nombre2
Nombre3
.
.
.
Nombre50

La problemática viene cuando con un TComboBox (contiene del 1 al 50 ) selecciono el número del nombre que deseo. Ahora con ese nombre genero un sql, para hacerlo tendría que hacer un CASE del valor de TComboBox para hacer el sql con el valor seleccionado, lo que quiero es hacer menos lineas como ¿?

Yo lo conocia como macro donde a una variable tipo texto le asigno esto:

Supongamos que selecciono en el TComboBox el 10

Código Delphi [-]
prueba:=  'nombre'+ TComboBox.text+’.txt’;

entonces   prueba vale ‘nombre10.txt’

al ejecutar la macro lo hacia 


nombre := &prueba;

y me daba la referencia del objeto nombre10.txt que es Juan Perez

[[Caral]]

Hola

Código Delphi [-]
var
  prueba :String;
begin
   prueba:=  'nombre'+ Combobox1.Text;
   ShowMessage(prueba);
end;

Saludos