Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
3. Jun 2003, 08:15
Und hier das Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i : Integer;
p : pointer;
begin
i := 2; { Inahlt von i ist '2' }
p := @i; { p beinhaltet jetzt die Speicher Adresse von i }
ShowMessage('Inhalt: '+IntToStr(i)+' - Adresse: $'+(IntToHex(Integer(p), 8)));
end;
Michael Ein Teil meines Codes würde euch verunsichern.
|