Zitat von
wadimwadim:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
...
While StartMemHex <= EndMemHex Do
begin
...
StartMemHex:= StartMemHex + 1;
If SuchS = lbuf Then
Listbox1.Items.Add (IntToHex(StartMemHex,8));
Sets:= Listbox1.Items.Count;
Label5.Caption:=IntToStr(Sets) ;
end;
end;
So etwas sollte in der Listbox z. B. rauskommen :
00A0002F
00A00037
00A0003F
00A00047
00A0004F
00A00057
bei mir kommt aber das raus:
00A00030
00A00038
00A00040
00A00048
Hallo,
die Werte die Du herausbekommst unterscheiden sich nur um 1 Byte
von den Werten die Du herausbekommen willst.
Es mag sein, das dieses an StartMemHex := StartMemHex +1 liegt.
Grüße
Klaus