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

← →
Vladimir1984 (2006-11-01 21:01) [0]

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;

← →
@!!ex © (2006-11-01 21:07) [1]

Господи.. Что это?

← →
XP UserR-rr (2006-11-01 21:14) [2]

видимо, код

← →
DesktopDraw (2006-11-01 21:17) [3]

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

← →
DesktopDraw (2006-11-01 21:17) [4]

как удобно близнеца иметь

← →
DesktopDraw (2006-11-01 21:22) [5]

а тебе именно из панели нада?

← →
Vladimir1984 (2006-11-01 21:27) [6]

да из панели, имено на ней формируетмя изображение...

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

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

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

← →
DesktopDraw (2006-11-01 21:32) [8]

может чё нибудь с panel.paintto

← →
Правильный Вася (2006-11-01 21:43) [9]

может, лучше отрисовывать на битмап и его выводить на панель или сохранять, чем так через ж..

← →
Vladimir1984 (2006-11-01 21:47) [10]

дело в том что изображение уже появляется на панеле, и его как раз и надо как то сохранить....единственное что смог сделать это принт скрин програмно...

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

← →
Vladimir1984 (2006-11-01 21:54) [12]

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

лес там===>

> Vladimir1984 (01.11.06 21:54) [12]

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

> лес там===>

Не верю.

--
Regards, LVT.

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