paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 11:49:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* don't send Update messages during loading of files, makes the IDE startup much faster when a lot of files are loaded

Browse Source 
git-svn-id: trunk@13541 -
This commit is contained in:
florian 2009-08-16 10:26:29 +00:00
parent 512d66988c
commit 212da45205
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/fpviews.pas
View File

@ -3894,7 +3894,9 @@ begin
end;
W^.HelpCtx:=hcSourceWindow;
Desktop^.Insert(W);
{ this makes loading a lot slower and is not needed as far as I can see (FK)
Message(Application,evBroadcast,cmUpdate,nil);
}
end;
PopStatus;
IOpenEditorWindow:=W;
@ -3986,7 +3988,7 @@ begin
FindFirst(filename,anyfile,Srec);
while (DosError=0) do
begin
ITryToOpenFile(Bounds,dir+srec.name,CurX,CurY,tryexts,true,false);
ITryToOpenFile(Bounds,dir+srec.name,CurX,CurY,tryexts,true,false);
FindNext(srec);
end;
FindClose(srec);