GitHub-Mirror/unitswitcher
1
0
Fork 0
mirror of synced 2024-11-15 00:43:50 +00:00
Code Issues Projects Releases Wiki Activity

Fixed: Delphi 7 compatibility for forms

Browse Source
This commit is contained in:
Mark van Renswoude 2007-12-17 09:02:37 +00:00
parent bf9df045af
commit 804603986f
3 changed files with 4 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Lib/D7/UnitSwitcherD7.bpl
View File

Binary file not shown.

8
Source/CmpSwConfiguration.dfm
View File

@ -30,10 +30,6 @@ object frmCmpSwConfiguration: TfrmCmpSwConfiguration
object tsGeneral: TTabSheet object tsGeneral: TTabSheet
BorderWidth = 8 BorderWidth = 8
Caption = 'Filters' Caption = 'Filters'
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
DesignSize = ( DesignSize = (
296 296
338) 338)
@ -59,8 +55,6 @@ object frmCmpSwConfiguration: TfrmCmpSwConfiguration
OnData = lbFiltersData OnData = lbFiltersData
OnDataObject = lbFiltersDataObject OnDataObject = lbFiltersDataObject
OnDblClick = lbFiltersDblClick OnDblClick = lbFiltersDblClick
ExplicitLeft = 5
ExplicitTop = 34
end end
object tbFilters: TToolBar object tbFilters: TToolBar
Left = 0 Left = 0
@ -69,6 +63,8 @@ object frmCmpSwConfiguration: TfrmCmpSwConfiguration
Height = 29 Height = 29
ButtonWidth = 73 ButtonWidth = 73
Caption = 'tbFilters' Caption = 'tbFilters'
EdgeBorders = []
Flat = True
Images = ilsFilters Images = ilsFilters
List = True List = True
ShowCaptions = True ShowCaptions = True

21
Source/CmpSwDialog.dfm
View File

@ -1,46 +1,33 @@
inherited frmCmpSwDialog: TfrmCmpSwDialog inherited frmCmpSwDialog: TfrmCmpSwDialog
Width = 358
Height = 557
Caption = 'ComponentSwitcher' Caption = 'ComponentSwitcher'
ClientHeight = 530
ClientWidth = 350
ExplicitWidth = 358
ExplicitHeight = 557
PixelsPerInch = 96 PixelsPerInch = 96
TextHeight = 13 TextHeight = 13
inherited sbStatus: TStatusBar inherited sbStatus: TStatusBar
Top = 511 Top = 511
Width = 350 Width = 350
ExplicitTop = 511
ExplicitWidth = 350
end end
inherited pnlMain: TPanel inherited pnlMain: TPanel
Width = 350 Width = 350
Height = 402 Height = 402
ExplicitWidth = 350
ExplicitHeight = 402
inherited pnlSearch: TPanel inherited pnlSearch: TPanel
Width = 342 Width = 342
TabOrder = 1 TabOrder = 1
ExplicitWidth = 342
inherited cmbSearch: TComboBox inherited cmbSearch: TComboBox
Width = 342 Width = 342
ExplicitWidth = 342
end end
end end
inherited lstItems: TListBox inherited lstItems: TListBox
Width = 342 Width = 342
Height = 349 Height = 349
TabOrder = 2 TabOrder = 2
ExplicitTop = 47
ExplicitWidth = 342
ExplicitHeight = 349
end end
inherited pnlSubFilters: TPanel inherited pnlSubFilters: TPanel
Width = 342 Width = 342
TabOrder = 0 TabOrder = 0
ExplicitWidth = 342
inherited lblSubFilters: TLabel inherited lblSubFilters: TLabel
Width = 343 Width = 343
ExplicitWidth = 343
end end
end end
end end
@ -48,17 +35,13 @@ inherited frmCmpSwDialog: TfrmCmpSwDialog
Top = 475 Top = 475
Width = 350 Width = 350
TabOrder = 2 TabOrder = 2
ExplicitTop = 477
ExplicitWidth = 350
inherited btnCancel: TButton inherited btnCancel: TButton
Left = 271 Left = 271
TabOrder = 2 TabOrder = 2
ExplicitLeft = 271
end end
inherited btnOK: TButton inherited btnOK: TButton
Left = 190 Left = 190
TabOrder = 1 TabOrder = 1
ExplicitLeft = 190
end end
object btnConfiguration: TButton object btnConfiguration: TButton
Left = 4 Left = 4