paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-08 22:58:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: closing the Run Parameters Dialog with OK sets the modified flag of the project (bug #7692)

Browse Source 
git-svn-id: trunk@10374 -
This commit is contained in:
vincents 2007-01-04 22:23:57 +00:00
parent bd34c39c73
commit 44f00697d3
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/main.pp
View File

@ -3276,7 +3276,8 @@ end;
procedure TMainIDE.mnuRunParametersClicked(Sender: TObject); procedure TMainIDE.mnuRunParametersClicked(Sender: TObject);
begin begin
ShowRunParamsOptsDlg(Project1.RunParameterOptions); if ShowRunParamsOptsDlg(Project1.RunParameterOptions)=mrOK then
Project1.Modified:=true;
end; end;
//------------------------------------------------------------------------------ //------------------------------------------------------------------------------