Ver Mensaje Individual
  #4  
Antiguo 02-06-2006
HenryOlg HenryOlg is offline
Registrado
 
Registrado: jun 2006
Posts: 3
Reputación: 0
HenryOlg Va por buen camino
Para efectos impresionantes también puedes utilizar el TeeChart, es decir, creas un Chart y utilizas su canvas, por ejemplo:

chart1.Canvas.Pen.Color := colorboxLinea2.Selected;
chart1.Canvas.Pen.Style := dameEstilo(comboEstiloLinea2.itemindex);
chart1.Canvas.Pen.Width := scrollanchoLinea2.Position;
chart1.Canvas.Line(x,y,x+15,y);
chart1.canvas.TextOut(x+17,y,EditEtiqL2.Text);
chart1.Canvas.Sphere(puntoini.X,puntoini.Y,0,5.0);

chart1.CopyToClipboardBitmap;

etc, etc.

Te anexo un programa (Delphi 6) de una gráfica de un tacómetro (semáforo), pero lo interesante es el uso del Canvas del Chart para dibujar las líneas y texto.

Saludos

Última edición por HenryOlg fecha: 02-06-2006 a las 07:11:50.
Responder Con Cita