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

file modif checker, force check on activate 

fix: had to set focus explicitly to check
This commit is contained in:
Basile Burg 2017-03-12 13:37:52 +01:00
parent a00ae4ea65
commit e50a89f671
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/ce_main.lfm
View File

@ -6519,6 +6519,7 @@ object CEMainForm: TCEMainForm
}
end
object ApplicationProperties1: TApplicationProperties
OnActivate = ApplicationProperties1Activate
OnException = ApplicationProperties1Exception
left = 96
top = 1

7
src/ce_main.pas
View File

@ -286,6 +286,7 @@ type
procedure actProjSaveGroupExecute(Sender: TObject);
procedure actProjSelUngroupedExecute(Sender: TObject);
procedure actSetRunnableSwExecute(Sender: TObject);
procedure ApplicationProperties1Activate(Sender: TObject);
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure updateDocumentBasedAction(sender: TObject);
procedure updateProjectBasedAction(sender: TObject);
@ -2603,6 +2604,12 @@ begin
form.Free;
end;
procedure TCEMainForm.ApplicationProperties1Activate(Sender: TObject);
begin
if fDoc.isNotNil then
fDoc.checkFileDate;
end;
function TCEMainForm.compileRunnable(unittest: boolean = false): boolean;
var
i: integer;