Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Pascal - Dev Pascal e immagini BMP
Forum - Pascal - Dev Pascal e immagini BMP

Avatar
bepi (Normal User)
Rookie


Messaggi: 34
Iscritto: 20/05/2016

Segnala al moderatore
Postato alle 20:16
Lunedì, 20/06/2016
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

PM Quote