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

Вниз

Как сохранить картинку в буфер, а потом ее от туда считать?   Найти похожие ветки 

 
CrossOut   (2004-08-21 21:50) [0]

Как сохранить картинку в буфер, а потом ее от туда считать?


 
CrossOut   (2004-08-21 21:52) [1]

В Help"e приводится пример:

procedure TForm1.Button1Click(Sender: TObject);

var
 MyFormat : Word;
 Bitmap : TBitMap;
 AData,APalette : THandle;
begin
 Bitmap := TBitmap.Create;
 try
   Bitmap.LoadFromFile("c:\Program Files\Common Files\Borland Shared\Images\Splash\256color\factory.bmp");
   Bitmap.SaveToClipBoardFormat(MyFormat,AData,APalette);
   ClipBoard.SetAsHandle(MyFormat,AData);
 finally
   Bitmap.Free;
 end;
end;

За что отвечают переменные MyFormat,AData,APalette?


 
8ung   (2004-08-21 22:18) [2]

В хелпе написано еще
Allocates a global handle and writes the picture in its native Clipboard format (CF_BITMAP for bitmaps, CF_METAFILE for metafiles, and so on).

Delphi syntax:

procedure SaveToClipboardFormat(var AFormat: Word; var AData: THandle; var APalette: HPALETTE);

C++ syntax:

void __fastcall SaveToClipboardFormat(Word &AFormat, int &AData, HPALETTE &APalette);

Description

Use SaveToClipboardFormat to copy the picture to a Clipboard format. The resulting values can then be copied to the Windows clipboard using the clipboard’s SetAsHandle method.

The picture’s palette is returned in the APalette parameter, the format in the AFormat parameter, and a handle to the data in the AData parameter. Before the picture can be saved, an application must have registered the format using the RegisterClipboardFormat method.


 
8ung   (2004-08-21 22:20) [3]

читай да переводи



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

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

Наверх




Память: 0.47 MB
Время: 0.076 c
1-1093168480
Jiurasrasr
2004-08-22 13:54
2004.09.05
Как обеспечить чтобы окно было повнрх всех!


1-1093003639
kukuikar
2004-08-20 16:07
2004.09.05
Я изменил Dialogs.pas. Как мне переделать Dialogs.dcu?


1-1093011809
Lord de Mon
2004-08-20 18:23
2004.09.05
Что такое inherited


4-1090500778
юзверь
2004-07-22 16:52
2004.09.05
Как запустить процедуру, зная ее адрес??


1-1093045746
nika_ufc
2004-08-21 03:49
2004.09.05
прошу помогите с фонтами. думаю об этом и статьу можна написать