Usar objetos con variables.

[jularaXD]

Buenas gente!

Querria saber si hay alguna manera para usar objetos con variables o con matrices. Me explico mejor con este ejemplo:

procedure holamundo;
var
boton:string;
begin
boton:=button1;
if boton.caption=('hola') then begin
boton.caption:=('adios');
end
else begin
boton.caption:=('hola');
end;
end;

o

procedure holamundo;
begin
matriz[1,1]:=button1;
if matriz[1,1].caption=('hola') then begin
matriz[1,1].caption:=('adios');
end
else begin
matriz[1,1].caption:=('hola');
end;
end;

Estoy (o al menos intento) haciendo un parchis para aprender a usar delphi, y me gustaria tener una matriz con el nombre de todas las fichas y asi poder manipular varias fichas a la vez con un bucle, sin tener que estar escribiendo las propiedades ficha por ficha.

saludos y gracias de antemano

[Neftali [Germán.Estévez]]

Por partes....

Código Delphi [-]
procedure holamundo;
var
  boton:string;
begin
  boton:=button1;
  if boton.caption=('hola') then begin 
    boton.caption:=('adios');
  end
  else begin
    boton.caption:=('hola');
  end;
end;

La idea es buena y el código debería funcionar salvo por un detalle; Estás asignando un botón (TButton) a otra cosa que es un tipo String (boton).

Define la variable boton como TButton y prueba.

Código Delphi [-]
var
  boton:TButton;
...

Para una matriz igual, puedes definir una matriz de enteros, de strings o de Tbutton.

[jularaXD]

Ei, muchas gracias!! Me funcionó perfectamente

Una pregunta mas, hay alguna manera de hacer algun tipo de StrToTbutton?

Gracias!

[Neftali [Germán.Estévez]]

Directamente no.
Debes utilizar la función FindComponent. Si buscas en los foros sobre esta función encontrarás muchos ejemplos (en la ayuda de Delphi también).