Pascal - Dev Pascal e immagini BMP

Salve a tutti,
Sto imparando a giocare con la grafica di dev pascal e vorrei sapere se
di può salvare e come salvare sul disco l'immagine ottenuta in formato BMP.
Con una procedura del tipo
procedure ModoGrafico;
var
md,sgraph :smallint;
MaxOr, MaxVr :integer;
begin
sgraph:=DETECT;
InitGraph(sgraph,md,'d:\tp\bgi');
MaxOr:=GetMaxX;
MaxVr:=GetMaxY;
SetBkColor(Red);
Rectangle(0,0,MaxOr,MaxVr);
SetBkColor(white);
Rectangle(100,100,500,300);
repeat until KeyPressed;
closegraph;
end;
Ottengo una immagine, questa immagine come posso salvarla in immagine.BMP.
Si potrebbe anche salvarla con il cattura-schermo di Windows, ma c'è un modo diretto con dev pascal ?

Grazie dell'attenzione