Seleccionar shapes y moverlas

[Kilik]

Muchas gracias por esa respuesta tan elaborada rocio84, creo que con eso que has puesto funcionará a la perfección.
La única duda que me queda,es a la hora de seleccionar una de las formas dibujadas para luego moverla, lo que se me ocurre es por ejemplo borrar la forma actual usando un brush de color del fondo y luego dibujarla en el lugar al que la vaya a mover.

Un saludo.

[turminator]

Hola, estoy siguiendo este mismo ejemplo que creo me resultará muy útil, pero me sucede ahora mismo que lo que tengo es un Timage de fondo y lo que quiero es que mediante un botón de opendialog me cargue una imagen y me la ponga encima del fondo que tengo.

Creo que solucionando este problema, podría a partir de ahí, crear tantas variables como componentes quisiera meter encima del fondo.

Como puedo solventar el problema? Llevo viendo varios ejemplos que tengo...pero ni así logré hacerlo tirar.

Muchas gracias, de veras.

[rocio84]

Perdon por la tardanza de la respuesta , posiblemente ya lo hayas solucionado, de todos modos, asi es como puedes cargar la imagen de un TImage usando un openpicturedialog:

Código Delphi [-]
if OpenPictureDialog.Execute then    
Imagen.Picture.LoadFromFile(OpenPictureDialog.FileName);

Para seleccionar la imagen en lugar de usar un OpenDialog es mejor usar un OpenPictureDialog que esta especializado para imagenes.

[turminator]

Perfecto! Muchisimas gracias rocio84!

Lo único que me queda por dominar la aplicación seria que mediante dos edit (X, Y) se pudiera ir viendo las coordenadas de la imagen.

Como podria hacer esto?

Una vez mas,

Muchisimas gracias!

[rocio84]

De nada para eso estamos y para hace eso ultimo que me pides puedes asignar las coordenadas donde se va trasladando la imagen a los edits dentro del procedimiento que usas para moverla asi:

Código Delphi [-]
edCoordenadaX.Text := imagen.Left;
edCoordenadaY.Text := imagen.Top

puede que de error porque el texto de los edits es de tipo string y los valores son enteros, si eso ocurre haz una coversion con la funcion: inttostr(int) que devuelve una cadena de caracteres.

Un saludo.

[dec]

Hola,

Empezado por Rocío

puede que de error...

No, no es que pueda... es fatal el error si no se hace la oportuna conversión al tipo que nos interesa, como dices, con la función "IntToStr", por ejemplo.

[dicatek]

Ok!

Siguiente paso solucionado!

Al final creo que está quedando algo muy digno...jejeje.

Para finalizar y dejar lel proyecto bien arreglado me gustaria saber si hay algun modo de delimitar el campo de actuación de los image, es decir, evitar que puedan salir del form. Y si hay alguna opción de al pulsar encima de las image que saliera como seleccionada y mediante las flechitas del teclado, poder mover varios pixels.

Saludos y gracias de nuevo!