FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
un problema de lineas
Tengo un problema que no lo he podido solucionar creo una linea y si se ve pero no toda la linea completa sino nada mas una parte
var Sh : Timage; begin with Sh do Canvas.FillRect(ClientRect); Canvas.MoveTo(X, Y); Canvas.LineTo(X1,Y1); transparent:=true; parent:=panel2; end; gracias.
__________________
From the mind to the human eye |
#2
|
|||
|
|||
acabo de probar el codigo que mandas y me ha funcionado bien
Código:
with Sh do begin Canvas.FillRect(ClientRect); Canvas.MoveTo(1, 1); Canvas.LineTo(100,1); Transparent := true; Parent := Panel2; end; |
#3
|
|||
|
|||
Gracias, Ya lo intente y no me crea la linea completa, pienso que esta bien, pero aun no se porque no me dibuja toda la linea.
__________________
From the mind to the human eye |
#4
|
|||
|
|||
Fijate bien en como cadetill ha probado tu ejemplo, estos fallos casi siempre son una tonteria y se nos escapan pequeños detalles.
Prueba el ejemplo de cadetill, puede que tu fallo este en la clausula with que debe tener un begin y un end si a continuacion tienes mas de una sentencia. with Sh do begin Canvas.FillRect(ClientRect); Canvas.MoveTo(1, 1); Canvas.LineTo(100,1); Transparent := true; Parent := Panel2; end; Suerte |
#5
|
|||
|
|||
Gracias, ya me salio se me habia escapado un detalle,
__________________
From the mind to the human eye |
#6
|
|||
|
|||
Cita:
|
#7
|
|||
|
|||
....
Es de risa (da verguenza), no me respetaba el tamaño del Timage
__________________
From the mind to the human eye |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|