![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Опять FastDIB :)) [D7, WinXP]
PenguinX © (2004-06-21 14:27:00)Всем привет!
Опять мучаюсь с FastDIB.
Пишу:
--------
...
procedure TForm1.Button1Click(Sender: TObject);
var b1, b2: TFastDIB;
begin
b1 := TFastDIB.Create;
b2 := TFastDIB.Create;
Image1.LoadFromFile('C:\Pictures\mypic.bmp');
b1.hDC := Image1.Canvas.Handle;
Rotate90CW(b1, b2);
Image2.Canvas.Handle := b2.hDC;
end;
...
----------
При этом Image2 остаётся пустым, хотя в Image1 отображается картинка. Если вместо строчки b1.hDC := Image1.Canvas.Handle вставить b1.LoadFromFile('C:\Pictures\mypic.bmp'), то всё нормально. Однако мне нужно не загружать изображение с помощью FastDIB, а именно присваивать контекст устройства.
PenguinX (2004-06-21 22:04:00) [1]2Sandman25+2
Так ведь проблема не в получении изображения с TFastDIB, а в передачи в сам TFastDIB. При операциях с изображением он работает со свойством Pixels**, а затем выводит на Device Context.
ЗЫ: Прочтите plz внимательней вопрос.
Sandman25+2 (2004-06-21 17:55:00) [2]PenguinX © (21.06.04 15:56) [4]
А че тут думать? Я пытался донести до Вас мысль, что Canvas
тут ни при чем.
Image2.Picture.Bitmpa.Handle := B2.HDC
Огромное Кулясище (2004-06-21 17:08:00) [3]Попробуй, может, для тестирования нарисовать через BitBlt, раз уж есть Hande.
PenguinX (2004-06-21 15:56:00) [4]2Sandman25
Теперь сами вдумайтесь в то, что вы написали.
Sandman25 (2004-06-21 15:50:00) [5]Image2.Picture.Assign(Image1.Picture)?
PenguinX (2004-06-21 15:46:00) [6]Удалено модератором
PenguinX (2004-06-21 15:12:00) [7]Удалено модератором