Zapis PaintBox do pliku BMP lub JPG

0

Natknełem się na ciekawy PROBLEM, jak zapisać zawartość obszaru PaintBox'a do pliku .BMP lub .JPG.

Niestety, ale po PaintBox'ie rysuje się kilka razy szybciej niż po Image i z tąd konieczność zapisania rysunku z PaintBox'a do pliku, w celu dalszej obróbki.

Rozwiązania proszę na priva i na forum, przyda się zapewne jeszcze innym Delphi'arzom.

pozdrawiam
Tomek--Obywatelu oszczedzaj lasy! Bo i TY mozesz kiedys zostac partyzantem...

0

utwórz
var
Bitmapa:TBitmap;
begin
Bitmapa:=TBitmap.Create;
Bitmapa.Width:=PaintBox1.Width;
.
.
.
Bitmapa.Canvas.CopyRect(Rect(0,0,Bitmapa.Width,Bitmapa.Height),PaintBox.Canvas,Rect(0,0,Bitmapa.Width,Bitmapa.Height));
Bitmapa.SaveToFile(NazwaPliku);
Bitmapa.Free;

To jeden ze sposobów. Ale można też inaczej.--Jest jeszcze jeden błąd ... :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1