PDA

Ver la Versión Completa : Sacar una imagen de un TChart


David
02-04-2008, 13:16:54
Hola

Quiero en delphi, convertir un TChart en imagen, ¿Cómo se hace? Si la imagen, se pudiera guardar en algún tipo de Stream sería ideal, pero bueno, esto es menos importante.

Palmiro
02-04-2008, 15:48:48
Hola...
DBChar lo puede exportar en cuatros formatos, a menos que despues lo conviertas....

http://www.clubdelphi.com/foros/showthread.php?p=276994#post276994

Fijate en el link. Te enseña como editar el DBChart en tiempo de ejecucion.
Para exportar una imagen en tiempo de Diseño lo puedes hacer con un clic derecho sobre el DBChart y luego export.... O bien haciendo clic Preview/Chart/General

Espero haberte ayudado... y que sobre todo me hayas entendido...

cHackAll
02-04-2008, 16:02:59
Aunque depende del componente; en lineas generales se puede utilizando la función PaintTo del objeto;

procedure TForm1.BitBtn1Click(Sender: TObject);
var Bitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
Bitmap.Width := VtChart1.Width;
Bitmap.Height := VtChart1.Height;
VtChart1.PaintTo(Bitmap.Canvas, 0, 0);
Bitmap.SaveToStream( ... );
Bitmap.Destroy;
end;

ContraVeneno
02-04-2008, 19:11:46
sería más fácil utilizar alguno de los métodos que ya tiene el TChart:
CopyToClipBoardBitMap, CopyToClipBoardMetaFile y el más interesante, el cuál seguro te permite exportarlo a cualquier tipo de archivo de imagen, TeeCreateMetaFile.

Presiona F1 en estos eventos para ver ejemplos.

Northern
02-04-2008, 22:18:17
TChart ya implementa esa función:


procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Chart1.SaveToBitmapFile('imagen.bmp');
end;



Saludos

ContraVeneno
03-04-2008, 00:02:54
Tienes razón, no lo vi en la ayuda de delphi. :P, ya me estoy quedando ciego

pero sí aparece el método en el código.