hedgewars/hwengine.pas
changeset 10133 d73412fbf3b4
parent 10127 7f29a65aa1e4
child 10139 9046f69dae4c
equal deleted inserted replaced
10132:701844ed50d3 10133:d73412fbf3b4
   115 
   115 
   116     if flagMakeCapture then
   116     if flagMakeCapture then
   117         begin
   117         begin
   118         flagMakeCapture:= false;
   118         flagMakeCapture:= false;
   119         {$IFDEF PAS2C}
   119         {$IFDEF PAS2C}
   120         s:= '/Screenshots/hw';
   120         s:= '/Screenshots/hw_' + inttostr(GameTicks);
   121         {$ELSE}
   121         {$ELSE}
   122         s:= '/Screenshots/hw_' + FormatDateTime('YYYY-MM-DD_HH-mm-ss', Now()) + inttostr(GameTicks);
   122         s:= '/Screenshots/hw_' + FormatDateTime('YYYY-MM-DD_HH-mm-ss', Now()) + inttostr(GameTicks);
   123         {$ENDIF}
   123         {$ENDIF}
   124 
   124 
   125         // flash
   125         // flash