![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ayuda con procedimiento en programa de dibujo
Procedure TForm1.Cuadrado (Const X,Y :integer);
Begin With Image1.Canvas Do Begin Pen.Mode := pmNotXor; MoveTo (Origen.X,Origen.Y); Rectangle (Origen.X,Origen.Y,Punto.X,Punto.Y); MoveTo (Origen.X,Origen.Y); Rectangle (Origen.X,Origen.Y,X,Y); end; //Final del With Image1.Canvas end; En el form, no se como acceder a este tipo de procedimiento. No Sale en ningun lado de los eventos del Form. Ayuda? |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Ayuda con dibujo de elipse | lol | Gráficos | 0 | 23-04-2008 05:08:46 |
Ayuda con Procedimiento | JulioGO | Firebird e Interbase | 1 | 05-06-2007 17:47:10 |
ayuda con procedimiento y delphi | herbert | MS SQL Server | 4 | 13-09-2005 15:51:44 |
Ayuda, como llamar a un procedimiento desde otro procedimiento? | Ariatna | Varios | 1 | 01-02-2005 04:05:35 |
Ayuda con un procedimiento | gario | SQL | 7 | 31-12-2003 13:28:51 |
![]() |
|