ExecuteCompileReasons is missing in compoptsintf.pas
Original Reporter info from Mantis: m_burkhard@gmx.ch
-
Reporter name:
Original Reporter info from Mantis: m_burkhard@gmx.ch
- Reporter name:
Description:
I have also added the functions ExecuteBeforeCompileReasons and Execute After CompileReasons as a supplement to this report.
https://bugs.freepascal.org/view.php?id=34283
Steps to reproduce:
Example call:
function TProjectAVRApp.InitProject(AProject: TLazProject): TModalResult;
begin
...
AProject.LazCompilerOptions.ExecuteBeforeCompileReasons := [crCompile] + [crRun];
AProject.LazCompilerOptions.ExecuteAfterCompileReasons := [crRun];
or
s := 'Before: ';
if crCompile in LazProject.LazCompilerOptions.ExecuteBeforeCompileReasons then begin
s += 'compile ';
end;
if crBuild in LazProject.LazCompilerOptions.ExecuteBeforeCompileReasons then begin
s += 'build ';
end;
if crRun in LazProject.LazCompilerOptions.ExecuteBeforeCompileReasons then begin
s += 'run ';
end;
ShowMessage(s);
Mantis conversion info:
- Mantis ID: 34289
- OS: All
- OS Build: All
- Build: 1.9.0 r59700M
- Platform: All
- Version: 1.9 (SVN)
- Monitored by: » @ccrause (Christo Crause)