Problem mit Listbox und Typen

[wadimwadim]

Hallo, leider komme ich nicht mehr alleine weiter.
Ich habe ein Programm erstellt, dass Speicheradressen aus einem bestimmten Bereich ausliest und in einer Listbox ausgibt.
Mir wird so etwas als String ausgegeben: z.B. (00A00000) also Hextyp.
Nun möchte ich mit einem ButtonClick, diese gefundenen Adressen weiter verwenden, um mit ihnen mit Readprocessmemory die Werte auszulesen.
Aber dieser Type bei Readprocessmemory ist ja : ptr($00A00000). Meine Frage ist nun, wie bekomm ich diese Strings in Hexs mit Dollorzeichen vorne drann?

[Klaus01]

Hallo,

geht ptr(StrToInt('$'+HexString)) nicht?

Grüße
Klaus

[wadimwadim]

Danke dir, so hatte ich es noch nicht probiert, hatte davor ein memo.
Eine andere Frage... Wie bekomm ich die einzelnen Textzeilen aus der Listbox? ich möchte sie auf arrays speichern.

[Klaus01]

Hallo,

mit ListBox1.Items[i] kannst Du auf die Zeile i der Listbox zugreifen.
ListBox1.Items.count liefert Dir die Anzahl der Zeilen (o basierend).
ListBox1.ItemIndex liefer Dir den Index der selektierten Zeile.

Grüße
Klaus

p.s.
Hier gilt pro Frage ein neuer Thread, bitte denke demnächst daran.

[wadimwadim]

Hey, ich danke dir sehr für deine schnelle Antwort, hat mir viel geholfen.

[wadimwadim]

ptr(StrToInt('$'+HexString))
geht bei mir leider nicht..
Inkompatible Typen... was kann ich machen?

[wadimwadim]

sory, habe mich geirrt, bei mir in der Listbox sind keine Strings, sondern Hex:
Listbox1.Items.Add (IntToHex(StartMemHex,8));

[Klaus01]

hm,

bei mir funktionert es:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  a: pointer;
  hex: String;
begin
  hex := 'a123bc';
  a := ptr(StrToInt('$'+hex));
end;

Die Funktion ptr erwartet doch einen Integer und
StrToInt macht aus dem hexString einen Integerwert.

Vielleicht kannst Du auch mal StrToInt64 probieren.
Ich weiß nicht wie groß Deine HexWerte sind.

IntToHex macht aus einen Integerwert eine HexDarstellung, diese ist vom Typ aber ein String.
Die Umkehrfunktion sollte dann StrToInt('$'+..) sein.

Grüße
Klaus

[wadimwadim]

Wenn ich die Funktion von Delphi benutze : z.B. IntToHex(255,8) bekomm ich das zurück 00000255, aber normalerweise soll das ja FF sein, oder?

pls help me

[Fussball-Robby]

Zitat von wadimwadim:

Wenn ich die Funktion von Delphi benutze : z.B. IntToHex(255,8) bekomm ich das zurück 00000255, aber normalerweise soll das ja FF sein, oder?

Bei mir ergibt das (richtigerweise) 000000FF.Edit1.Text := IntToHex(255, 8);