Opkman: More meaningful name.

git-svn-id: trunk@54106 -
This commit is contained in:
balazs 2017-02-07 07:39:11 +00:00
parent cea1e9a19d
commit 2a82da77b0
3 changed files with 8 additions and 16 deletions

View File

@ -271,7 +271,7 @@ resourcestring
rsOptions_cbCheckForUpdates_Item5 = 'Never';
rsOptions_lbLastUpdate_Caption = 'Last update: ';
rsOptions_LastUpdate_Never = 'never';
rsOptions_lbDaysToShowNewPackages_Caption = 'Show newly added packages for(days):';
rsOptions_lbDaysToShowNewPackages_Caption = 'Show different icon for newly added packages for(days):';
rsOptions_lbFilterFiles_Caption = 'Excluded files (packages)';
rsOptions_lbFilterDirs_Caption = 'Excluded folders (packages)';
rsOptions_bAdd_Caption = 'Add';

View File

@ -188,11 +188,9 @@ object OptionsFrm: TOptionsFrm
end
object spDaysToShowNewPackages: TSpinEdit
Left = 228
Height = 24
Height = 23
Top = 224
Width = 76
AutoSize = False
BorderSpacing.Around = 1
MaxValue = 365
TabOrder = 4
Value = 31
@ -225,7 +223,7 @@ object OptionsFrm: TOptionsFrm
TabOrder = 0
end
object gbProxySettings: TGroupBox
Left = 15
Left = 16
Height = 176
Top = 48
Width = 411
@ -295,12 +293,10 @@ object OptionsFrm: TOptionsFrm
Text = 'password'
end
object seProxyPort: TSpinEdit
Left = 319
Height = 24
Top = 22
Left = 317
Height = 23
Top = 24
Width = 75
AutoSize = False
BorderSpacing.Around = 1
MaxValue = 65635
TabOrder = 3
end
@ -541,7 +537,6 @@ object OptionsFrm: TOptionsFrm
Color = clBtnFace
ItemHeight = 0
ParentShowHint = False
ScrollWidth = 179
ShowHint = True
Sorted = True
TabOrder = 2
@ -629,7 +624,6 @@ object OptionsFrm: TOptionsFrm
Color = clBtnFace
ItemHeight = 0
ParentShowHint = False
ScrollWidth = 159
ShowHint = True
Sorted = True
TabOrder = 2

View File

@ -410,8 +410,7 @@ begin
lbLastUpdate.Caption := rsOptions_lbLastUpdate_Caption + FormatDateTime('YYYY.MM.DD hh:mm:ss', Options.LastUpdate);
lbDaysToShowNewPackages.Caption := rsOptions_lbDaysToShowNewPackages_Caption;
spDaysToShowNewPackages.Value := Options.DaysToShowNewPackages;
spDaysToShowNewPackages.Height := cbCheckForUpdates.Height;
spDaysToShowNewPackages.Top := lbDaysToShowNewPackages.Top - ((spDaysToShowNewPackages.Height - lbDaysToShowNewPackages.Height) div 2);
spDaysToShowNewPackages.Top := lbDaysToShowNewPackages.Top + 1 + (lbDaysToShowNewPackages.Height - spDaysToShowNewPackages.Height) div 2;
spDaysToShowNewPackages.Left := lbDaysToShowNewPackages.Left + lbDaysToShowNewPackages.Canvas.GetTextWidth(lbDaysToShowNewPackages.Caption) + 10;
tsProxy.Caption := rsOptions_tsProxy_Caption;
@ -425,8 +424,7 @@ begin
gbProxySettings.Enabled := Options.ProxyEnabled;
edProxyServer.Text := Options.ProxyServer;
seProxyPort.Value := Options.ProxyPort;
seProxyPort.Height := edProxyServer.Height;
seProxyPort.Top := edProxyServer.Top;
seProxyPort.Top := edProxyServer.Top + (edProxyServer.Height - seProxyPort.Height) div 2;
edProxyUser.Text := Options.ProxyUser;
edProxyPassword.Text := Options.ProxyPassword;