mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-10 11:56:09 +02:00
Opkman: Small cosmetic changes, reported by @AlexeyT.
git-svn-id: trunk@54102 -
This commit is contained in:
parent
6b1e076b8b
commit
872edd4a68
@ -178,17 +178,6 @@ object OptionsFrm: TOptionsFrm
|
||||
TabOrder = 1
|
||||
end
|
||||
end
|
||||
object spDaysToShowNewPackages: TSpinEdit
|
||||
Left = 224
|
||||
Height = 23
|
||||
Top = 224
|
||||
Width = 76
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
AutoSize = False
|
||||
MaxValue = 365
|
||||
TabOrder = 4
|
||||
Value = 31
|
||||
end
|
||||
object lbDaysToShowNewPackages: TLabel
|
||||
Left = 16
|
||||
Height = 15
|
||||
@ -197,6 +186,17 @@ object OptionsFrm: TOptionsFrm
|
||||
Caption = 'Show newly added packages for(days):'
|
||||
ParentColor = False
|
||||
end
|
||||
object spDaysToShowNewPackages: TSpinEdit
|
||||
Left = 228
|
||||
Height = 24
|
||||
Top = 224
|
||||
Width = 76
|
||||
AutoSize = False
|
||||
BorderSpacing.Around = 1
|
||||
MaxValue = 365
|
||||
TabOrder = 4
|
||||
Value = 31
|
||||
end
|
||||
end
|
||||
end
|
||||
object tsProxy: TTabSheet
|
||||
@ -268,7 +268,7 @@ object OptionsFrm: TOptionsFrm
|
||||
Text = 'username'
|
||||
end
|
||||
object lbPort: TLabel
|
||||
Left = 318
|
||||
Left = 317
|
||||
Height = 15
|
||||
Top = 3
|
||||
Width = 22
|
||||
@ -295,13 +295,13 @@ object OptionsFrm: TOptionsFrm
|
||||
Text = 'password'
|
||||
end
|
||||
object seProxyPort: TSpinEdit
|
||||
Left = 318
|
||||
Height = 23
|
||||
Left = 319
|
||||
Height = 24
|
||||
Top = 22
|
||||
Width = 76
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Width = 75
|
||||
AutoSize = False
|
||||
MaxValue = 65535
|
||||
BorderSpacing.Around = 1
|
||||
MaxValue = 65635
|
||||
TabOrder = 3
|
||||
end
|
||||
end
|
||||
@ -309,8 +309,8 @@ object OptionsFrm: TOptionsFrm
|
||||
end
|
||||
object tsFolders: TTabSheet
|
||||
Caption = 'Folders'
|
||||
ClientHeight = 286
|
||||
ClientWidth = 519
|
||||
ClientHeight = 297
|
||||
ClientWidth = 517
|
||||
object pnFolders: TPanel
|
||||
Left = 0
|
||||
Height = 297
|
||||
@ -400,8 +400,8 @@ object OptionsFrm: TOptionsFrm
|
||||
end
|
||||
object tsProfiles: TTabSheet
|
||||
Caption = 'Profiles'
|
||||
ClientHeight = 286
|
||||
ClientWidth = 519
|
||||
ClientHeight = 297
|
||||
ClientWidth = 517
|
||||
object pnProfiles: TPanel
|
||||
Left = 0
|
||||
Height = 297
|
||||
@ -639,13 +639,6 @@ object OptionsFrm: TOptionsFrm
|
||||
end
|
||||
end
|
||||
end
|
||||
object SpinEdit1: TSpinEdit
|
||||
Left = 74
|
||||
Height = 23
|
||||
Top = 7
|
||||
Width = 50
|
||||
TabOrder = 2
|
||||
end
|
||||
object SDD: TSelectDirectoryDialog
|
||||
left = 448
|
||||
top = 112
|
||||
|
@ -95,7 +95,6 @@ type
|
||||
SDD: TSelectDirectoryDialog;
|
||||
seProxyPort: TSpinEdit;
|
||||
spDaysToShowNewPackages: TSpinEdit;
|
||||
SpinEdit1: TSpinEdit;
|
||||
tsFolders: TTabSheet;
|
||||
tsProfiles: TTabSheet;
|
||||
tsGeneral: TTabSheet;
|
||||
@ -411,6 +410,9 @@ 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.Left := lbDaysToShowNewPackages.Left + lbDaysToShowNewPackages.Canvas.GetTextWidth(lbDaysToShowNewPackages.Caption) + 10;
|
||||
|
||||
tsProxy.Caption := rsOptions_tsProxy_Caption;
|
||||
cbProxy.Caption := rsOptions_cbProxy_Caption;
|
||||
@ -423,6 +425,8 @@ begin
|
||||
gbProxySettings.Enabled := Options.ProxyEnabled;
|
||||
edProxyServer.Text := Options.ProxyServer;
|
||||
seProxyPort.Value := Options.ProxyPort;
|
||||
seProxyPort.Height := edProxyServer.Height;
|
||||
seProxyPort.Top := edProxyServer.Top;
|
||||
edProxyUser.Text := Options.ProxyUser;
|
||||
edProxyPassword.Text := Options.ProxyPassword;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user