mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-30 11:10:23 +02:00
IDE: View Package Links: no marquee at designtime, improved rescan caption
git-svn-id: trunk@39995 -
This commit is contained in:
parent
cca3231e11
commit
5ccf255361
@ -67,7 +67,7 @@ resourcestring
|
|||||||
lisFile = 'File';
|
lisFile = 'File';
|
||||||
lisNew = 'New';
|
lisNew = 'New';
|
||||||
lisClose = 'Close';
|
lisClose = 'Close';
|
||||||
lrsReadLplFiles = 'Read lpl files';
|
lrsRescanLplFiles = 'Rescan lpl files';
|
||||||
lisBtnClose = '&Close';
|
lisBtnClose = '&Close';
|
||||||
lisOk = 'OK';
|
lisOk = 'OK';
|
||||||
lisMenuOk = '&OK';
|
lisMenuOk = '&OK';
|
||||||
|
@ -141,7 +141,6 @@ object PackageLinksDialog: TPackageLinksDialog
|
|||||||
Top = 389
|
Top = 389
|
||||||
Width = 659
|
Width = 659
|
||||||
Align = alBottom
|
Align = alBottom
|
||||||
Style = pbstMarquee
|
|
||||||
TabOrder = 3
|
TabOrder = 3
|
||||||
end
|
end
|
||||||
object LPKParsingTimer: TTimer
|
object LPKParsingTimer: TTimer
|
||||||
|
@ -127,11 +127,13 @@ begin
|
|||||||
Caption:=lisPLDPackageLinks;
|
Caption:=lisPLDPackageLinks;
|
||||||
ScopeGroupBox.Caption:=dlgScope;
|
ScopeGroupBox.Caption:=dlgScope;
|
||||||
UpdateFacets;
|
UpdateFacets;
|
||||||
UpdateGlobalLinksButton.Caption:=lrsReadLplFiles;
|
UpdateGlobalLinksButton.Caption:=lrsRescanLplFiles;
|
||||||
CloseBitBtn.Caption:=lisClose;
|
CloseBitBtn.Caption:=lisClose;
|
||||||
|
|
||||||
LPKInfoCache.StartLPKReaderWithAllAvailable;
|
LPKInfoCache.StartLPKReaderWithAllAvailable;
|
||||||
LPKInfoCache.AddOnQueueEmpty(@OnAllLPKParsed);
|
LPKInfoCache.AddOnQueueEmpty(@OnAllLPKParsed);
|
||||||
|
ProgressBar1.Style:=pbstMarquee;
|
||||||
|
ProgressBar1.Visible:=true;
|
||||||
|
|
||||||
UpdatePackageList;
|
UpdatePackageList;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user