Ver Mensaje Individual
  #2  
Antiguo 11-04-2014
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.293
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por isradoblem Ver Mensaje
...en el colegio curso la materia de graficacion y el profesor nos puso un proyecto de hacer una imagen (esta adjunta) la cual la debemos de hacer con Canvas.
Intenta explicar esa parte un poco mejor...
Sobre un canvas puedes puntar líneas, puntos, circulos, rectángulos, elipses, rellenar zonas con color,..
Para ello basta con que en la ayuda mires los métodos de TCanvas.

No se si es eso a lo que te refieres y se me antoja algo costoso dibujar la imagen que presentas, pues no es "trivial".

Ora opción (parece más lógica) es dibujarla desde un fichero de disco, pero no utilizando componentes, sino los métodos del Canvas.

Para empezar con una prueba, puedes hacer lo siguiente:

(1) Crea una aplicación nueva y pon en el botón en el form.
(2) en el OnClick del botón pon lo siguiente...

Como ves, para acceder al Canvas del formulario basta con hacer: Self.Canvas.

Código Delphi [-]
  // Cambia el color de linea
  Self.Canvas.Pen.Color := clRed;
  // Cambia el ancho de línea
  Self.Canvas.Pen.Width := 3;
  // Dibuja lineas
  Self.Canvas.LineTo(0,0);
  Self.Canvas.LineTo(100,100);
  // Dibuja rectangulo
  Self.Canvas.Rectangle(10,10,200,200);


Si se trata de la segunda opción comentada, revisa en la ayuda el método CopyRect de TCanvas (incluyendo el ejemplo).
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita