deformar imagen

[maravert]

Hola que tal... ya hace mucho tiempo que he querido encontrar informacion acerca de defomar imagenes, esos efectos como los siguientes:

http://todopordospesos.iespana.es/todopordospesos/deformar.htm

En verdad si me pueden decir que herramientas usar, por donde entrarle... en verdad ya llevo mucho tiempo investigando y la verdad demasiado poco he conseguido por no decir nada.

O decirme si esto en verdad se puede hacer o no en Delphi.


Gracias y espero alguien pueda ayudarme, se los agradeceria enormemente.

[andres1569]

Hola, te aseguro que nunca he programado algo ni parecido, :D , pero por poderse hacer, claro que se debe poder hacer en Delphi. Lo normal es que cargues la imagen deseada en un objeto TBitmap (o en un TImage y accedas a su propiedad Picture.Bitmap) el cual tiene una función ScanLine que devuelve una dirección de memoria a un arraya de bytes que representan una linea horizontal de la imagen (infórmate al respecto, si trabajas con imágenes de 24 bits, pues ya sabes que cada pixel ocupa 3 bytes, si es de 32 bits son 4 ...). En fin que de esa forma accedes directamente a la información de la imagen, sin utilizar funciones tan lentas como GetPixel o SetPixel (Pixels[]).

El algoritmo que debas usar para conseguir cada efecto, como tú comprenderás, está fuera de mi alcance, seguro que hay material por ahí (Google ==> Graphics + Delphi + Effects).

Son solo sugerencias para que te hagas una idea ...

Saludos

[maravert]

Muchas gracias por tu respuesta y tu cooperación.

Tomare en cuenta lo que me dices.


Atentamente


Alejandro Maravert