mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-22 12:24:58 +02:00
clean up
git-svn-id: trunk@22002 -
This commit is contained in:
parent
c94627a628
commit
e6b5741431
@ -1801,7 +1801,6 @@ resourcestring
|
||||
lisRunParamsTheHostApplicationIsNotExecutable = 'The host application %s%s%'
|
||||
+'s is not executable.';
|
||||
dlgTheDirectory = 'The directory "';
|
||||
dlgDoesNotExist = '" does not exist.';
|
||||
dlgTextToFing = '&Text to Find';
|
||||
dlgReplaceWith = '&Replace With';
|
||||
dlgFROpts = 'Options';
|
||||
|
@ -1848,6 +1848,7 @@ begin
|
||||
SourceNotebook.OnShowSearchResultsView := @OnSrcNotebookShowSearchResultsView;
|
||||
SourceNotebook.OnPopupMenu := @OnSrcNoteBookPopupMenu;
|
||||
DebugBoss.ConnectSourceNotebookEvents;
|
||||
DebugBoss.SetupSourceMenuShortCuts;
|
||||
|
||||
// connect search menu to sourcenotebook
|
||||
MainIDEBar.itmSearchFind.OnClick := @SourceNotebook.FindClicked;
|
||||
@ -2411,7 +2412,6 @@ end;
|
||||
procedure TMainIDE.LoadMenuShortCuts;
|
||||
begin
|
||||
inherited LoadMenuShortCuts;
|
||||
SourceNotebook.SetupShortCuts;
|
||||
DebugBoss.SetupMainBarShortCuts;
|
||||
end;
|
||||
|
||||
|
@ -5384,6 +5384,8 @@ begin
|
||||
+'end.'+le
|
||||
+le;
|
||||
AProject.MainFile.SetSourceText(NewSource);
|
||||
|
||||
//AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
|
||||
end;
|
||||
|
||||
function TProjectProgramDescriptor.CreateStartFiles(AProject: TLazProject
|
||||
@ -5449,6 +5451,7 @@ begin
|
||||
// add lcl pp/pas dirs to source search path
|
||||
AProject.AddPackageDependency('LCL');
|
||||
AProject.LazCompilerOptions.Win32GraphicApp:=true;
|
||||
//AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
|
||||
end;
|
||||
|
||||
function TProjectApplicationDescriptor.CreateStartFiles(AProject: TLazProject
|
||||
@ -5900,6 +5903,8 @@ begin
|
||||
NewSource.Add('');
|
||||
AProject.MainFile.SetSourceText(NewSource.Text);
|
||||
NewSource.Free;
|
||||
|
||||
//AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
|
||||
end;
|
||||
|
||||
function TProjectConsoleApplicationDescriptor.CreateStartFiles(
|
||||
|
Loading…
Reference in New Issue
Block a user