Thema: Delphi Offset bei AllocMem?

Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: Offset bei AllocMem?

  Alt 20. Sep 2013, 21:55
AllocMem gibt Dir einen Pointer auf den Speicherbereich zurück. Mit Showmessage(PChar(Addr)); würdest Du Dir den Inhalt des Speicherbereiches as "String" anzeigen lassen.

Delphi-Quellcode:
Const
  s: String = 'Hallo'#0;
var
  Addr: Pointer;
begin
  Addr := AllocMem(1024);
  try
    Move(s[1], Addr^, Length(s) * SizeOf(char)); // ein Stück Text in den Speicherbereich schieben
    Showmessage(PChar(Addr)); // und den Text anzeigen
    Showmessage(IntToHex(DWord(Addr), 8)); // den Wert der Adressse in HEX anzeigen
  finally
    FreeMem(Addr);
  end;
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat