Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.23;
Скачать: CL | DM;

Вниз

Сохранение Chart в Jpeg   Найти похожие ветки 

 
goga   (2004-01-11 08:37) [0]

Как это сделать по-человечески? У него метод есть SaveToBitmapFile и я делаю через ж., то есть сохраняю в битмап в temp директории винды(кстати интересно : ее я получаю через GetWindowsDirectory + "\Temp", но ведь в 2000/XP Temp у каждлого пользователя свой), потом загружаю из этого файла в TBitmap, затем JpegImage.Assisgn и только потом сохраняю в jpeg"е


 
Думкин ©   (2004-01-11 08:52) [1]

Из переменных окружения брать путь можно,например.

Совсем необязательно в файл, можно работать с канвой и сохранять во временный БМП в памяти, а потом в ЖПЕГ.


 
goga   (2004-01-11 18:05) [2]

Вопрос именно в том, как сохранять используя только память? У TChart есть еще CopyToClipboardFormat().А как из Clipboard засунуть в TBitmap или сразу в JPEG? И в догонку : как работать с переменными окружения? Ничего такого не знаю и не умею


 
Думкин ©   (2004-01-11 18:41) [3]

GetEnvironmentStrings
GetEnvironmentVariable

var T : TBitMap;
TT : TJpegImage;
begin
T :=TBitMap.Create;
TT := TJpegImage.Create;
try
T.Width := Chart1.Width;
T.Height := Chart1.Height;
BitBlt(T.Canvas.Handle,0,0,Chart1.Width,Chart1.Height,Chart1.Canvas.Handle,0,0,SRCCOPY);
TT.Assign(T);
TT.SaveToFile("e:\1.jpg")
finally
TT.Free;
T.Free
end
end;


Например так.


 
YuRock ©   (2004-01-11 18:46) [4]

> ее я получаю через GetWindowsDirectory + "\Temp"

Получать темп-директорию надо так:

var
pPath: Array[0..MAX_PATH] of Char;
begin
...
GetTempPath(MAX_PATH, @pPath);
// Теперь String(pPath) - и есть путь к директории Temp.
...
end;



Страницы: 1 вся ветка

Текущий архив: 2004.01.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
4-72981
Dimaxx
2003-11-15 13:30
2004.01.23
DeviceIOControl + IOCTL_Disk_Format_Tracks_Ex


7-72950
Spayker
2003-11-07 12:32
2004.01.23
Завершение процесса


3-72632
smu
2003-12-26 16:20
2004.01.23
TDbf Как избавиться от *.obf файлов, кот он создает?


1-72756
alextov
2004-01-13 14:48
2004.01.23
В Win2000 при ошибке программа закрывается без сообщения о ошибке


4-72990
Владимир
2003-11-13 09:35
2004.01.23
Непрямоугольные компоненты