forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix, gdv commander, possibly two items checked after "Select custom exe" + cancel in the dialog

This commit is contained in:
Basile Burg 2020-08-22 04:46:42 +02:00
parent 08dbbc5196
commit 425a7090af
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/u_gdb.pas
View File

@ -1862,14 +1862,14 @@ end;
procedure TGdbWidget.mnuSelCustomClick(Sender: TObject); procedure TGdbWidget.mnuSelCustomClick(Sender: TObject);
begin begin
mnuSelProj.Checked:=false;
mnuSelRunnable.Checked:=false;
with TOpenDialog.Create(nil) do with TOpenDialog.Create(nil) do
try try
if execute then if execute then
begin begin
fCustomTargetFile := FileName; fCustomTargetFile := FileName;
fDebugTargetKind := dtkCustom; fDebugTargetKind := dtkCustom;
mnuSelProj.Checked:=false;
mnuSelRunnable.Checked:=false;
updateDebugeeOptionsEditor; updateDebugeeOptionsEditor;
end; end;
finally finally