Integer + 1

[grenzgaenger]

Ein Blick in das Debuggfenster hilft da meist weiter.

Demoprojekt:

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
 i: integer;
begin
 i := 0;
 inc(i);
 i := i + 1;
 writeln(i);
 readln;
end.

relevante zeilen assemblercode

Code:

Project1.dpr.10: i := 0;
0040914D 33DB             xor ebx,ebx
Project1.dpr.11: inc(i);
0040914F 43               inc ebx
Project1.dpr.12: i := i + 1;
00409150 43               inc ebx
Project1.dpr.13: writeln(i);
00409151 A1F0A94000       mov eax,[$0040a9f0]

unter D2006 compiliert.

Denke der assemblercode sagt alles.

grüsse GG

PS: sah grad, dass du mit D3 arbeitest. da sollte es noch einen unterschied machen. übernimm doch mal das beispiel und quote das ASM resultat..