Club Builder

[Picard]

Hola compañeros hay alguna manera de trazar una linea desde una posicion de la pantalla (Latitude/Longitude) hasta la posicion del mouse LatCur/LongCur)? he estado averiguando sobre lineto pero al parecer solo me sirve para hacerlo desde una esquina de la pantalla hasta la posicion del mouse,
gracias
_________________
El hombre es el unico ser que tropieza dos veces en la misma piedra ( en mi caso infinitas veces)

[mopa]

Hola,

El principio de la linea se define con PenPos

Un ejemplo:

Al pulsar el raton pillas el punto de inicio

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
TPoint inicio(X,Y);
this->Canvas->PenPos=inicio;
}

Al soltarlo dibujas la linea

void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
this->Canvas->LineTo(X,Y);
}

Un saludo

[Cerúleo]

Hola Picard.

Para posicionar el lápiz en el punto origen de la línea, polígono, etc,... utiliza la función del Canvas:

[Picard]

Gracias ceruleo, bueno voy aprendiendo de todo lo que me explicais todos. en realidad mi idea es la siguiente: desde un punto determinado de la pantalla, en la que hay un mapa se ha de dibujar la linea constantemente, mas bien la linea ha de estar sienmpre con origen en latitude/longitude (posicion dada por el gps que a su vez tengo posicionada estas coordenadas en el centro de la pantalla) y destino en latCur/longCur coordenadas del puntero del mouse lo he hecho en el evento onmousemove del objeto tmap y no veo la linea por ninguna parte, pero sigo investigando pq.
gracias machotes
_________________
El hombre es el unico ser que tropieza dos veces en la misma piedra ( en mi caso infinitas veces)

[-Spencer-]

Porque no buscas en los ejemplos de builder, en la carpeta Apps > doodle el proyecto doodle.bpr, en este se maneja todo acerca de las lineas y canvas, lo cual puedes aplicar en tu trabajo.

Espero que te sirva de algo
_________________
"Cállate, o di algo mejor que el silencio"