[delphi5] Canvas i zapis do pliku

Jak można (jeżeli można) zapisac w postaci pliku (np. *.bmp) zawartość Canvas. To jest: rysuje sobie na formularzu kwadraty, elipsy itp i chcialbym to zapisac do pliku. Jezeli nie da sie tego zrobic w ten sposob to jak moge zapisywac do pliku graficznego takie figury?

Chcesz to zapisać jako obrazek, czy jako grafikę wektorową.

lol :P

var
bmp : tbitmap;
begin
bmp := tbitmap.create;
bmp.width := canvas.width;
bmp.height := canvas.height;
bmp.canvas := canvas;
bmp.savetofile('plik.bmp');
bmp.free;
end;