Registriert seit: 18. Apr 2003
1.037 Beiträge
|
Re: String von Adresse lesen...
5. Feb 2005, 12:50
Delphi-Quellcode:
function getStringFromMemory(location: integer):String;
var PString: ^String;
begin
Integer(PString) := location;
Result := PString^;
end;
procedure TForm1.Button1Click(Sender: TObject);
var vTest: String;
begin
vTest := 'Hallo';
ShowMessage(getStringFromMemory(Integer(@vTest)));
end;
(Kurz Zusammengeklickt)
"Optimistisch ist diejenige Weltanschauung, die das Sein höher als das Nichts stellt und so die Welt und das Leben als etwas an sich Wertvolles bejaht."
Albert Schweitzer
|