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

added some messages when compiler filename is invalid

Browse Source 
git-svn-id: trunk@2871 -
This commit is contained in:
mattias 2002-08-18 08:55:17 +00:00
parent 5ec68e1898
commit f23eb0d18e
3 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -118,6 +118,7 @@ designer/sizecompsdlg.pp svneol=native#text/pascal
designer/taborderdlg.lfm svneol=native#text/plain
designer/taborderdlg.lrs svneol=native#text/pascal
designer/taborderdlg.pas svneol=native#text/pascal
docs/LazarusIDEInternals.pdf -text svneol=unset#application/pdf
docs/Packages.txt svneol=native#text/plain
examples/bitbtnform.pp svneol=native#text/pascal
examples/bitbutton.pp svneol=native#text/pascal

BIN
docs/LazarusIDEInternals.pdf Normal file
View File

Binary file not shown.

12
ide/main.pp
View File

@ -55,7 +55,7 @@ uses
BuildLazDialog, MiscOptions, EditDefineTree, CodeToolsOptions, TypInfo,
IDEOptionDefs, CodeToolsDefines, LocalsDlg, DebuggerDlg, InputHistory,
DiskDiffsDialog, UnitDependencies, PublishProjectDlg, ClipBoardHistory,
ProcessList,
ProcessList, InitialSetupDlgs,
// main ide
BaseDebugManager, DebugManager, MainBar;
@ -686,7 +686,11 @@ end;
procedure TMainIDE.LoadGlobalOptions;
// load environment, miscellaneous, editor and codetools options
var
InteractiveSetup: boolean;
begin
InteractiveSetup:=true;
EnvironmentOptions:=TEnvironmentOptions.Create;
with EnvironmentOptions do begin
SetLazarusDefaultFilename;
@ -694,8 +698,7 @@ begin
TranslateResourceStrings(EnvironmentOptions.LazarusDirectory,
LazarusLanguageIDs[EnvironmentOptions.Language]);
if EnvironmentOptions.CompilerFilename='' then
EnvironmentOptions.CompilerFilename:=FindDefaultCompilerPath;
CheckCompilerFilename(InteractiveSetup);
if EnvironmentOptions.FPCSourceDirectory='' then
EnvironmentOptions.FPCSourceDirectory:=FindDefaultFPCSrcDirectory;
ExternalTools.OnNeedsOutputFilter:=@OnExtToolNeedsOutputFilter;
@ -7720,6 +7723,9 @@ end.
{ =============================================================================
$Log$
Revision 1.462 2003/02/19 22:27:33 mattias
added some messages when compiler filename is invalid
Revision 1.461 2003/02/07 19:13:57 mattias
fixed searching lazarus in current dir