Переглянути джерело

Avoid flickering in Compilation messagebox

git-svn-id: trunk@34207 -
pierre 9 роки тому
батько
коміт
7b2c034065
1 змінених файлів з 1 додано та 1 видалено
  1. 1 1
      ide/fpcompil.pas

+ 1 - 1
ide/fpcompil.pas

@@ -620,7 +620,7 @@ begin
         else
         else
           begin
           begin
             if Status.CurrentSource='' then
             if Status.CurrentSource='' then
-              StatusS:=''
+              StatusS:='      '
             else
             else
               begin
               begin
                 StatusS:=ShrinkPath(SmartPath(DirAndNameOf(Status.Currentsourcepath+Status.CurrentSource)),
                 StatusS:=ShrinkPath(SmartPath(DirAndNameOf(Status.Currentsourcepath+Status.CurrentSource)),