hedgewars/hwengine.dpr
changeset 489 6b0ced304920
parent 434 2c6ccce17f39
child 497 adf1aee202c6
equal deleted inserted replaced
488:4dee644f382d 489:6b0ced304920
   106 if flagMakeCapture then
   106 if flagMakeCapture then
   107    begin
   107    begin
   108    flagMakeCapture:= false;
   108    flagMakeCapture:= false;
   109    s:= 'hw_' + cSeed + '_' + inttostr(GameTicks) + '.bmp';
   109    s:= 'hw_' + cSeed + '_' + inttostr(GameTicks) + '.bmp';
   110    WriteLnToConsole('Saving ' + s);
   110    WriteLnToConsole('Saving ' + s);
   111 //   SDL_SaveBMP_RW(SDLPrimSurface, SDL_RWFromFile(PChar(s), 'wb'), 1)
   111    SDL_SaveBMP_RW(SDLPrimSurface, SDL_RWFromFile(Str2PChar(s), 'wb'), 1)
   112    end;
   112    end;
   113 end;
   113 end;
   114 
   114 
   115 ////////////////////
   115 ////////////////////
   116 procedure OnDestroy;
   116 procedure OnDestroy;