Explorar o código

made it compile under win32

alex %!s(int64=25) %!d(string=hai) anos
pai
achega
9a4ddcd957
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      install/demo/quad.pp

+ 4 - 0
install/demo/quad.pp

@@ -425,7 +425,11 @@ Begin
  IF I<>0 THEN
   BEGIN
    ShowHighScore;
+{$IFDEF USEGRAPHICS}
+   GrInputStr(S,20,21-I,16,12,10,FALSE,AlfaBeta);
+{$ELSE}
    InputStr(S,20,21-I,10,FALSE,AlfaBeta);
+{$ENDIF}
    IF Length(S)<12 THEN
     BEGIN
      str(time.a_min,m);