Rename "View" to "Perspective" in GUI controls and apply a more specific icon to the relevant toolbutton.

This commit is contained in:
Ansgar Becker
2008-10-21 21:45:57 +00:00
parent dd306fbc64
commit 12ad369e64
6 changed files with 68 additions and 15 deletions

BIN
res/icons/star.png Normal file
View File

Binary file not shown.

After

Width:  |  Height:  |  Size: 670 B

BIN
res/icons/star_grey.png Normal file
View File

Binary file not shown.

After

Width:  |  Height:  |  Size: 572 B

View File

@@ -784,13 +784,13 @@ object MDIChild: TMDIChild
WordWrap = True
end
object tlbDataButtons: TToolBar
Left = 227
Left = 163
Top = 1
Width = 268
Width = 332
Height = 23
Align = alRight
AutoSize = True
ButtonWidth = 67
ButtonWidth = 83
Caption = 'tlbDataButtons'
Images = MainForm.PngImageListMain
List = True
@@ -807,7 +807,7 @@ object MDIChild: TMDIChild
OnClick = btnDataClick
end
object tbtnDataColumns: TToolButton
Left = 67
Left = 83
Top = 0
AllowAllUp = True
Caption = 'Columns'
@@ -816,7 +816,7 @@ object MDIChild: TMDIChild
OnClick = btnDataClick
end
object tbtnDataFilter: TToolButton
Left = 134
Left = 166
Top = 0
AllowAllUp = True
Caption = 'Filter'
@@ -824,11 +824,11 @@ object MDIChild: TMDIChild
OnClick = btnDataClick
end
object tbtnDataView: TToolButton
Left = 201
Left = 249
Top = 0
Caption = 'View'
Caption = 'Perspective'
DropdownMenu = popupDataView
ImageIndex = 107
ImageIndex = 112
end
end
end
@@ -1984,7 +1984,7 @@ object MDIChild: TMDIChild
Left = 104
Top = 80
object menuViewSave: TMenuItem
Caption = 'Save view ...'
Caption = 'Save perspective ...'
Hint = 'Save current view details (columns, filter, sorting) permanently'
ImageIndex = 10
OnClick = menuViewSaveClick

View File

@@ -6473,9 +6473,9 @@ begin
end;
// Highlight drop down button if views are available
if DataViews.Count = 0 then
tbtnDataView.ImageIndex := 107
tbtnDataView.ImageIndex := 113
else
tbtnDataView.ImageIndex := 108;
tbtnDataView.ImageIndex := 112;
end;

View File

@@ -2,7 +2,7 @@ object FrmDataViewSave: TFrmDataViewSave
Left = 0
Top = 0
BorderStyle = bsDialog
Caption = 'Save view'
Caption = 'Save perspective'
ClientHeight = 129
ClientWidth = 273
Color = clBtnFace
@@ -22,9 +22,9 @@ object FrmDataViewSave: TFrmDataViewSave
object lblSave: TLabel
Left = 8
Top = 13
Width = 69
Width = 103
Height = 13
Caption = 'Name of view:'
Caption = 'Name of perspective:'
end
object comboSave: TComboBox
Left = 8
@@ -65,7 +65,7 @@ object FrmDataViewSave: TFrmDataViewSave
Width = 257
Height = 17
Anchors = [akLeft, akTop, akRight]
Caption = 'Save as default view for this table'
Caption = 'Save as default perspective for this table'
TabOrder = 1
end
end

View File

@@ -4373,6 +4373,59 @@ object MainForm: TMainForm
82}
Name = 'PngImage111'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C000002694944415478DA9593CD4B545118C69F3B73BD33DE9951
4727CB8F32B2514AC4442A137113D43E082B246AD1A24D10B4088A325A05FD01
ED6B21110D0441AB08C43E2DC45A94367E306933E33833CED79D7BEFF9E8ED0A
12384A1E389C03E77D7FEFF33EE71C454A89ADC6CAE4501F846CDB756CFCF956
31CA7680E4C7C15902841AFB27823B06243F0C0EAB9A7F0C746C15B2F7F60CBD
1FDD1120F17620AD075B830ADCC8C5A3B614C2DF7272D2FA2F40626260B44AAF
BDEBF185203983914EC22C64C65A4F7F39BF09B0F279C82F853C4B154E51BF3D
92CB364AD63DBE7A082B0551CE43515B606412308B5983CE9724175F29FE0DAD
11858CFA56E5ABEB727B7C70BB3462BAA008095E4E801597202D4636F8E1D25A
9C3DB74C30B30CDB2CC12CE5524E0BD46F540BD41FF0D6EE8628CE41986B108C
3909C25E9FD2E6D40E39A277A25CC8C0C8A7B3A4A6DD01C4C74F682429EAA969
68F5064260B9E9F524CBA695532BB427A0DBDF8D722E0D23B75AA4F8F6F0C5B9
C48689CBAF8FFEF5225AD31C6E84BD0A968F39490EC0B601A1C2551D46E677B4
2C99E8E8B8341FDB740BBF5EF5DE2615F7BD8106D8992992CD36AA2BE401B354
E452CB91CECB0B672A5E63EC65CF633DD43C52A502AC1487A20421A50A9E5F26
1516A4BB11E9D8FCD4E1AB4BBD15018B2FBADFD534EDEF77AB1EA7B2B99605B7
4D68DE00C005B86921F9F37BBCFB7AB2A9226021D2B558B737BCAFB49280914D
5982CBA792F35561B22B5A7540F7FA6A919CF9611CB999D62B02E69F1D2A08AA
440FE4D1C10BB337FE7D71D30F43D7C8D03BDC62F57D77F3AE8A80E858C748FB
B99927D8667CBA553D2C188F1C7F6039FFE20F461E81FFCAFB3AB60000000049
454E44AE426082}
Name = 'PngImage112'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001874455874536F667477617265005061696E742E4E45542076332E33
36A9E7E2250000020C4944415478DA9593CB6B1A5114C6EFD4F73882538A5829
2934904D16A574D39D2EA408EE0A252811DDC49574210537A526D47FC05DF629
182A7640DCB8F02D745B68772562291585FAC0D7E8F8CA39379990C744EA85C3
DC3BF79CDFFDCE776718B266542A9597CBE5F2A9DD6EFF7A5F0EB30E502A957E
AD56AB470E8783DF18502C16F7743ADD29CE47A3D191D3E93CDC085028143A66
B399671886B45AAD1928E15C2E97F45F807C3E7FC8B26C14828007A4D7EBA18A
53B7DBEDB903A856AB1CD0DF42E26B783E47D3D88B4124492293C984402B1432
1E8F45D8FFBB582C7E406E119E02532E977F1A8DC65DAD564B542A15A5C2262D
1C0E87643E9F136C0321389FCD66143C9D4E89288AFF98CB7ECF388E7B663299
502A4DC0E4DB81ED401E0543F460BD4D01B95C4E0B8B33003CC104948B0520F1
EA549CE30183C10063042AB77D3E5FEBCAC46C36CB21C46AB55AB00013650006
0EF4A5D96C4EE0FD8EDFEFFF73E7163299CC0750F0094FEA76BB374E973D68B7
DB42201078A3788DE974FA84E7F97D8D4643BD904D95CD54ABD5A4D1687C0F06
832F140182207CB3582CAF108046CA857ABD9E1A88EFEAF57A33140A3D5604A4
52A9DF369B6DABD3E9907EBF2F81F42F50D886C20383C1C0C275935AAD2686C3
615611904C2687D82F141D7BBDDEF7D7F7E2F1F83B50F311E261241279A00848
2412FB1E8FE733593362B1D81E7E81D16894FE17E70A015B0D98808536000000
0049454E44AE426082}
Name = 'PngImage113'
Background = clWindow
end>
PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
Left = 8