fix neverending duplicating entries in the breakpointlist and input on the PA

This commit is contained in:
Dark Byte 2019-02-26 16:33:11 +01:00
parent 38df507944
commit 2a977a2434
2 changed files with 11 additions and 5 deletions

View File

@ -115,6 +115,15 @@ begin
if debuggerthread<>nil then
debuggerthread.updatebplist(ListView1, miShowShadow.checked);
i:=0;
while i<listview1.items.count do
begin
if listview1.items[i].data=pointer(-1) then
listview1.Items[i].Delete
else
inc(i);
end;
l:=TStringList.create;
try
dbvm_getBreakpointList(l);

View File

@ -271,7 +271,7 @@ begin
begin
if loaddbvmifneeded('Launch DBVM?') then
begin
pa:=strtoint64(edtPA.text);
pa:=strtoint64('$'+edtPA.text);
//convert to a changereginfo
changereginfo.Flags.changeRAX:=ifthen(tempregedit.change_eax,1,0);
@ -323,10 +323,7 @@ begin
changereginfo.newR14:=tempregedit.new_r14;
changereginfo.newR15:=tempregedit.new_r15;
if dbvm_cloak_changeregonbp(PA, changereginfo, address)=0 then
begin
end;
dbvm_cloak_changeregonbp(PA, changereginfo, address);
memorybrowser.disassemblerview.Update;
modalresult:=mrok;