String von Adresse lesen...

[FriFra]

Wie bekomme ich einen Text von einer bestimmten Adresse in einen String?

[KLS]

Was meinst du mit Adresse?

Ein Zeichen kannst du so auslesen.

bsp := 'test';
showmessage(Bsp[2]); // = e

[ReDoX]

das kannst du mit

Delphi-Quellcode:

var
AChar : Char;
MyString : String;
begin
AChar := MyString[1];
end;

Mfg ReDoX

[FriFra]

Nein, das meinte ich nicht... Ich habe eine Variable vom Typ Word (eine Zahl ) und will nun den entspr. Text von dieser Adresse aus dem Speicher lesen...

[KLS]

Durch ein bisschen ausprobieren bin ich auf sowas gekommen... (ich hab keinerlei Erfahrung mit Pointern)

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  test : string;
  zeiger : pointer;
begin
  try
    test := 'Hallo';
    zeiger := @test;
    showmessage(string(zeiger^));
  except
    showmessage('Fehler');
  end;
end;

Deinen "Zeiger" musst du halt nur anpassen.

[Oxmyx]

Zitat von FriFra:

Nein, das meinte ich nicht... Ich habe eine Variable vom Typ Word (eine Zahl ) und will nun den entspr. Text von dieser Adresse aus dem Speicher lesen...

Welchen Text denn? Da steht doch kein Text im Speicher, sondern eine Zahl!

Wenn du die Zahl in die hexadezimale Darstellung umwandeln willst, kannst du dir Funktion IntToHex benutzen.

[KLS]

Nein, er möchte den Inhalt einer Speicheradresse ausgeben.

[moritz]

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)

[FriFra]

Danke, Danke ...

Manchmal hat man echt ein Brett vorm Kopf

[Oxmyx]

Zitat von FriFra:

Nein, das meinte ich nicht... Ich habe eine Variable vom Typ Word (eine Zahl ) und will nun den entspr. Text von dieser Adresse aus dem Speicher lesen...

Nicht eher DWORD? Mit Word könntest du maximal die ersten 65 KB adressieren.