Cita:
Empezado por joanajj
Buenas a todos, alguien sabe como hacer que esto funcione:
Un saludo y gracias...
|
Porqué no pruebas a mandar el objeto sin mas y luego manipularlo a tu gusto....
Código Delphi
[-]
Procedure moverf(Objeto: TJvimage ;casifich : Integer);
begin
TJvimage(Objeto).Left := coord[casifich*2-1];
TJvimage(Objeto).top := coord[casifich*2];
end;
moverf(ficha2,23);