Wiedermal C -> Delphi

[Klaus01]

ein Versuch:

Code:

int main(int argc, char* argv[])

Das sind die Aufrufparameter des Programms
argc entspricht ParamCount
argv entspricht Paramstr

Delphi-Quellcode:

var 
  Test_PATCH : Array [1..17] of Byte
  Test74 : Array [1..17] of Byte; 
  Test9C : Array [1..17] of Byte; 
  TestCC : Array [1..33] of Byte; 
... 
2 : for i:=0 to 16  do 
  begin 
   if (i mod 2)= 0 then //Prüfung auf Parität (is i/2 ???) [b]Hier hapert es  Was soll "i mod 2"nicht sein[/b] 
    Test74[i]:=Test_PATCH[i+1] 
  else 
  Test74[i]:=Test_PATCH[i-1]; 
end;

Code:

int Test_code(char* Test, char *std)

function Test_code(Test:array of byte;std :array of byte):Integer und zum Schluss noch ein Link zu C von A bis Z, ein OnlineBuch zu C.

Grüße
Klaus