Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как сохранить файл bmp из панели, используя SavePictureDialog

Vladimir1984 © (2006-11-01 21:01:00)
C SavePictureDialog не пойму вообще! А вот просто с сохранением фала что то получается но криво ужос...файл получается но пустой без изображения...
procedure TfrmBmpHView.Button3Click(Sender: TObject);
var
Bitmap: TBitmap;
Source: TRect;
Dest: TRect;
begin
Bitmap := TBitmap.Create;
try
with Bitmap do
begin
Width := panel7.Width;
Height := panel7.Height;
Dest := Rect(0, 0, Width, Height);
end;
with panel7 do
Source := Rect(0, 0, Width, Height);
Bitmap.Canvas.CopyRect(Dest, bitmap.Canvas, Source);

Bitmap.SaveToFile('MYFILE.BMP');
finally
Bitmap.Free;
end;
end;

Leonid Troyanovsky (2006-11-01 22:30:00) [1]

> Vladimir1984 (01.11.06 21:54) [12]

> > Аллах присылает?

> лес там===>

Не верю.

--
Regards, LVT.

Vladimir1984 (2006-11-01 21:54:00) [2]

> Аллах присылает?

лес там===>

Ketmar (2006-11-01 21:48:00) [3]
>[10] Vladimir1984 1-Nov-2006, 21:47
>дело в том что изображение уже появляется на панеле
Аллах присылает?

Vladimir1984 (2006-11-01 21:47:00) [4]
дело в том что изображение уже появляется на панеле, и его как раз и надо как то сохранить....единственное что смог сделать это принт скрин програмно...

Правильный Вася (2006-11-01 21:43:00) [5]
может, лучше отрисовывать на битмап и его выводить на панель или сохранять, чем так через ж..

DesktopDraw (2006-11-01 21:32:00) [6]
может чё нибудь с panel.paintto

Vladimir1984 (2006-11-01 21:28:00) [7]

> По крайней мере похож, ты где это взял?

хз искал по яндексу =)

Vladimir1984 (2006-11-01 21:27:00) [8]
да из панели, имено на ней формируетмя изображение...

DesktopDraw (2006-11-01 21:22:00) [9]
а тебе именно из панели нада?

DesktopDraw (2006-11-01 21:17:00) [10]
По крайней мере похож, ты где это взял?

DesktopDraw (2006-11-01 21:17:00) [11]
как удобно близнеца иметь

XP UserR-rr (2006-11-01 21:14:00) [12]
видимо, код

@!!ex (2006-11-01 21:07:00) [13]
Господи.. Что это?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »