Fairtris

Clone de Tetris basé sur la bibliothèque SDL2.

Signaler un problème

Roland Chastain

Rédacteur/Modérateur

Le 13/12/2021 à 6:04

Pour information, le jeu fonctionne aussi sous Linux. Il y a simplement une petite modification à faire, que l'auteur indique dans ce message.

Code :

Sélectionner tout

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
function TClock.GetCounterFrequency(): Int64;
begin
  {$IFDEF WINDOWS}
  Result := 0;
  QueryPerformanceFrequency(Result);
  {$ELSE}
  Result := 1000000000;
  {$ENDIF}
end;
 
function TClock.GetCounterValue(): Int64;
{$IFDEF UNIX}
var
  Counter: TTimeVal;
{$ENDIF}
begin
  {$IFDEF WINDOWS}
  Result := 0;
  QueryPerformanceCounter(Result);
  {$ELSE}
  FPGetTimeOfDay(@Counter, nil);
  Result := Int64(Counter.tv_sec) * 1000000000 + Int64(Counter.tv_usec) * 1000;
  {$ENDIF}
end;

Poster un commentaire

Developpez.com décline toute responsabilité quant à l'utilisation des différents éléments téléchargés.