SoloCodigo

Muchas graciasss!!! lo voy a probar y te comento como me fuee!

Gracias de nuevo me sirvio mucho para aprender por lo menos

Hola perdon, pero no se como fijarme en que pixel estoy.. pasa que soy nuevo trabajando con imagenes..

Podrias decirme algo de codigo xfa...

Graciass!!!

Hola, tengo el mismo problema de que no puedo obtener las coordenadas con respecto a la esquina superior izquierda de la imagen dentro del scrollbox, porque me toma como (0,0) la esquina superior izquierda de la parte que se ve. Como hago para obtener las coordenadas con respecto a la esquina superior izquierda de la imagen?

intente de la forma que explican mas arriba pero no me sale..

Desde ya muchas gracias

Hola gente

Bueno necesito poder recortar una parte de un TImage para mostrarla luego en otro TImage.

Yo probe usando CopyRect pero la verdad que no me funciono.

La imagen que uso es en formato JPEG.

El codigo que habia utilizado es el siguiente.

La idea es recortar un rectangulo de la imagen haciendo click en el vertice superior izquierdo del rectangulo que se quiere cortar  y despues en el vertice inferior derecho


y en un botton tengo el siguiente codigo


El codigo recorta una parte pero lo hace mal porque no recorta la parte que yo necesito, viendo un poco mas me di cuenta de que los valores que le paso a CopyRect no tienen que ser esos.. pero no entiendo muy bien el CopyRect asique no se como arreglar mi codigo para que haga lo que necesito..

Bueno Gracias a todos!!

una vez mas este foro me ha mostrado la direccion por la que debo ir..

ya resolvi mi necesidad

aca les explico el como..

Primero defini 4 variables globales

bool medir;
int coordX;
int coordY;
int medircont;

luego tengo un botton en el cual hago click para comenzar la medicion y tiene el siguiente codigo dentro..
void __fastcall TForm1::Button2Click(TObject *Sender)
{
medir=true;
medircont=1;//luego explico bien para que sirve esta variable
//Los edits los pongo solo para corroborar que este midiendo bien, no son necesarios.
Edit1->Text="midiendo";
Edit2->Text="midiendo";
Edit3->Text="midiendo";
}

//Una vez presionado el boton programa el evento onclick de la imagen para que pueda medir la distancia entre dos puntos haciendo click en ellos. Es decir hago click en el boton que tiene caption medir y luego hago click en el primer punto y posteriormente hago click en el segundo punto para calcular la distancia entre ellos..

//Aqui les paso el codigo del evento onclick de la imagen

void __fastcall TForm1::Image1Click(TObject *Sender)
{

if(medir)
{
TPoint posicion;

 if(medircont==1)//cuando medircont vale 1 significa que voy a hacer click en el primer punto
 {
  GetCursorPos((&posicion));
  coordX=posicion.x;
  coordY=posicion.y;
  medircont++;
 }

 else if(medircont==2)//cuando medircont vale 2 quiere decir que voy a hacer click en el segundo punto
 {
  GetCursorPos((&posicion));
  int X1=posicion.x;
  int Y1=posicion.y;

  coordX=abs(coordX-X1);
  coordY=abs(coordY-Y1);

  Edit1->Text=coordX;
  Edit2->Text=coordY;


  int dist=sqrt(pow(coordX,2)+ pow(coordY,2));//aqui por pitagoras calculo la distancia entre los puntos a partir de la resta
                                                                        entre sus coordenadas X y Y
  Edit3->Text=dist;//nuevamente este edit solo es para control, no es necesario
 }
}
}


Bueno espero q a alguien le sirva, no se si el codigo es del todo eficiente.. pero por lo menos anda.. Dsp lo mejorare si es necesario.

Hola gracias por tu respuesta..

Pero, algebra se.. el problema es que lo que no se es manipular el builder para que me de la posicion de un punto con respecto a algo.. necesito una funcion que me devuelva la posicion de un punto en el canvas con sus coordenadas x e y. supongo que como la mayoria de las funciones me devolvera la posicion con respecto a alguna de las esquinas del TImage.

Entonces aqui va mi pregunta nuevamente..

Hay alguna funcion, metodo o algo, que me permita obtener de un punto en el Canvas de un TImage su posicion con cooredenadas X e Y?

Bueno desde ya muchas gracias... y perdon si no fui muy claro anteriormente cuando pregunte..

Hola gente!!Como les va??

TEngo un programa en el cual uso una base de datos..

El problema que tengo es que cuando cierro la aplicacion nose porq algunas veces se guardan los registros nuevos que ingreso en la base y otras veces cuando vuelvo a ejecutar el programa no se habian guardado..

Hay alguna funcion o algo de las TTable para asegurarse que cuando se cierre el programa se hagan permanentes los cambios que se hicieron en la base??

Gracias desde ya

Hola gente!


Supongamos que tengo dos Timage... Uno grande y otro mas pequeño..

Lo que hago primero es poner el pequeño dentro del TImage mas grande modo que quedan superpuestos y el mas chico tapa una parte del mas grande..

Hay alguna forma de guardar una imagen con el contenido de Ambos TImage de modo que se vea esa superposicion??

Ejemplo si tengo un TImage con una cara y otro con un parche y pongo el del parche sobre el ojo de la cara, que la imagen que yo guardo contenga la cara con un parche??

Gracias desde ya!

Para identificar si las teclas que pulsas son mayusculas o minusculas te puede servir la funcion isuuper();

check la ayuda de builder y fijate como se usa..

Seguro tenes que programar el evento onkeypress

Disculpa que no te de mas ayuda pero no se como verificar si la palabra entera esta en mayusculas..

Espero que te sirva..

Hola!

Muchisssimas Gracias!!

Anduvo a la perfeccion!!

Y otra consulta mas ahora.. Como puedo hacer para guardar la imagen de forma que ahora contenga la cerradura y la llave?? es decir que contenga la imagen de fondo y la imagen que le puse encima...

Gracias de nuevo!

Hola gracias!!

Pero lo probe y no funciona, busque en la ayuda de builder y me dice que FreeImage sirve para otras cosas..

Lo que yo quiero hacer es que el TImage quede en blanco como cuando creas uno nuevo..

Hola, soy gonzalo

Estoy realizando un programa en el que tengo elementos TImage que contienen imagenes que guardo en una base de datos.

Mi duda es como hacer cuando quiero ingresar un nuevo fichero, para hacer que los TImage queden vacios, es decir que no muestren nada para que el usuario pueda asociarles otras imagenes distintas.

Por mas que busque, no encuentro ninguna funcion al estilo Image1->Clear() que me permita hacer eso..

Espero ayuda

Gracias