Форум: "Media";
Текущий архив: 2003.12.04;
Скачать: [xml.tar.bz2];
Внизкак из буфура сохранить jpeg? Найти похожие ветки
← →
Малой (2003-08-06 14:51) [0]Мастаки, вот такой код:
procedure TForm1.Button1Click(Sender: TObject);
var
jp: TJPEGImage;
begin
jp := TJPEGImage.Create;
try
with jp do
begin
DBChart1.CopyToClipboardBitmap;
LoadFromClipboardFormat(cf_???,ClipBoard.GetAsHandle(cf_???),0);
( "1.jpg") Мастаки, вот такой код:
procedure TForm1.Button1Click(Sender: TObject);
var
jp: TJPEGImage;
begin
jp := TJPEGImage.Create;
try
with jp do
begin
DBChart1.CopyToClipboardBitmap;
LoadFromClipboardFormat(cf_???,ClipBoard.GetAsHandle(cf_???),0);
SaveToFile("1.jpg")
end;
finally
jp.Free;
end;
end;
что писать вместо cf_???. Перері все что знал, нашел только для BitMap и MetaFile.
Помогите.
← →
clickmaker (2003-08-06 14:54) [1]В хелпе по LoadFromClipboardFormat написано "LoadFromClipboardFormat can also recognize, and supports, a bitmap format on the Clipboard". Так что CF_BITMAP
← →
Малой (2003-08-06 14:58) [2]
> LoadFromClipboardFormat(cf_???,ClipBoard.GetAsHandle(cf_???),0);
после этой строчки выскакивает Access Violation. блин, чего ему надо?
← →
clickmaker (2003-08-06 15:24) [3]А если так
LoadFromClipboardFormat(cf_bitmap, ClipBoard.GetAsHandle(cf_bitmap), ClipBoard.GetAsHandle(cf_palette));
← →
Малой (2003-08-06 15:28) [4]нет - AV :(
← →
pasha676_* (2003-08-06 16:28) [5]Как у вас тут все сложно.
Как насчет асснгнуть в TBitmap, а потом ассингнуть в TJPegImage? Помоему это проще. Не знаю почему, но у меня что то в этом духе написано. Наверное сразу в jpeg пихнуть не получилось тоже. Давно писал, подробностей не помню.
← →
Малой (2003-08-06 16:54) [6]
> Как насчет асснгнуть в TBitmap, а потом ассингнуть в TJPegImage?
>
а как из DBChart это можно сделать?
← →
pasha676_* (2003-08-07 17:23) [7]Я БД чарт не вертел. Ну надо попробывать содрать с него картинку из канваса например в TBitmap ну а оттэдова в Jpeg. Напрямую с Jpeg никому работать не рекомендую. Хотя можно попробывать и сразу в Jpeg ассигнуть.
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2003.12.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.003 c