Главная страница
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.054 c
3-1092120059
Fynjy
2004-08-10 10:40
2004.09.05
DBGridEh и STFilter


4-1090406888
Delphi5.01
2004-07-21 14:48
2004.09.05
Ia pitaus ispolzovat "rar.exe" console dla arhivacii dannih, ...


1-1093112770
SergP
2004-08-21 22:26
2004.09.05
Вопрос об автоматизации Excel


3-1092308994
Руслан
2004-08-12 15:09
2004.09.05
Как проверить существует ли заданная запись в базе?


3-1092140802
Koala
2004-08-10 16:26
2004.09.05
Ковертация из Dbase в Firebird