Discussion :

[Sancha]

Bonjour à tous !

J'aurais voulu savoir si, en Delphi, il existait une fonction qui permettrait
de connaître le type de terminologie du microprocesseur du PC (savoir si c'est du Little Endian, du Big Endian ou autre)...

S'il n'existe pas de fonction permettant de faire ça, est-ce que quelqu'un aurait une astuce pour trouver facilement sans trop se casser la tête ?

Je vous remercie !

[Dr.Who]

processeur x86 : little endian
processeur motorola 68000/SPARC/IBM 370 : big endian
processeur PowerPC/ARM/DECa/MIPS/RISC/IA64 : bi-endian
processeur PDP11 : middle endian

[Sancha]

D'accord, merci.

Mais, y'a-t-il un moyen de le détecter avec delphi ?
(il faut que je puisse le détecter avec un bout de code car mon programme
ne fonctionnera pas de la même manière en fonction de l'endian...)

Merci en tous cas !

[ShaiLeTroll]

Windows et Delphi ne fonctionnant que sur du Little Endian (x86 en général), la réponse est vite trouvée !

[Sancha]

Merci beaucoup ! La pour le coup, ça me facilite la vie c'est c'est du Little dès qu'il y a Windows !

[Dr.Who]

test simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
type
  TEndianess = (eUnknown = 0, eLittle, eBig);
 
function GetEndianess: TEndianess;
var
  R32 : packed record case integer of
    0: (L : LongWord);
    1: (B : array[0..3] of byte);
  end;
begin
  result := eUnknown;
  R32.L := 1;
  if R32.B[0] = 1 then
    result := eLittle
  else
  if R32.B[3] = 1 then
    result := eBig;
end;
 
 
begin
    case GetEndianess of
      eLittle  : writeln('Little endian');
      eBig     : writeln('Big endian');
      eUnknown : writeln('Unknown endianess');
    end;
 
    readln;
end.

mais :

Delphi ne tourne que sur x86.
Un programme compilé x86 ne peu tourner sur un processeur non x86

[Sancha]

Merci pour tout !

Avec toutes ces infos, je devrais arriver à me débrouiller !

Encore merci !