Find colors for drop down arrows which do their job better to signalize a currently active SELECT or ORDER clause

This commit is contained in:
Ansgar Becker
2008-07-08 22:27:49 +00:00
parent db1dae81de
commit f122cb82f7
4 changed files with 18 additions and 18 deletions

View File

Binary file not shown.

Before

Width:  |  Height:  |  Size: 340 B

After

Width:  |  Height:  |  Size: 422 B

View File

Binary file not shown.

Before

Width:  |  Height:  |  Size: 422 B

After

Width:  |  Height:  |  Size: 384 B

View File

@@ -827,7 +827,6 @@ object MDIChild: TMDIChild
Anchors = [akTop, akRight]
ButtonWidth = 67
Caption = 'tlbDataButtons'
Color = clBtnFace
Images = MainForm.PngImageListMain
List = True
AllowTextButtons = True
@@ -837,7 +836,7 @@ object MDIChild: TMDIChild
Left = 0
Top = 0
Caption = 'Sorting'
ImageIndex = 73
ImageIndex = 107
Style = tbsTextButton
OnClick = btnDataClick
end
@@ -845,7 +844,7 @@ object MDIChild: TMDIChild
Left = 65
Top = 0
Caption = 'Columns'
ImageIndex = 73
ImageIndex = 107
Style = tbsTextButton
OnClick = btnDataClick
end

View File

@@ -4403,6 +4403,22 @@ object MainForm: TMainForm
Name = 'PngImage106'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001874455874536F667477617265005061696E742E4E45542076332E31
3072B22592000000FD4944415478DA63FCFFFF3F032580711819B074E9D22F40
8AFBF7EFDF0C3F7EFC60F8FEFD3BC3B76FDF18BE7CF902C65FBF7E05F37FFEFC
09C6DBB66D63443160F1E2C5ED4076B9929212E3BF7FFF187EFDFA05C620C520
1A6428C8F0F3E7CF335CBD7A75CE8103075231BC307BF6EC767E7EFE0A616161
B0AD9F3E7D026B04A9616565653877EE1CC3B56BD716EEDDBB37016718F4F6F6
F6090808144A4A4A32BC7BF70EEC02161616B0E61B376E2CDEB973671CC140AC
AEAE9E077445A2ACAC2CD80090E69B376FAEDABA756B38D1B1909E9EBE445C5C
3C1AE485EBD7AFAFDDBC797308C9D1181E1EFE081870173F7EFC1808F4F71FDA
A683116C00007FC9C1E16F55BF0D0000000049454E44AE426082}
Name = 'PngImage108'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
@@ -4417,21 +4433,6 @@ object MainForm: TMainForm
61F6444D2976A0F3FF31EC3BFF8EE1C6B537AB5E6E700E273A16748ACE2D9117
E38CFEF1FD2FC3D52B6FD6BE58EB104272344A251D7BF4FF3BC3C53F6F3E06BE
DEEDF987B6E960041B0000CAD0BEE161DA12680000000049454E44AE426082}
Name = 'PngImage108'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001874455874536F667477617265005061696E742E4E45542076332E31
3072B22592000000D74944415478DA63FCFFFF3F032580711819D0C0C8F80548
71FF04125F8118C4F908C41F80F81310BF03E2EF40FC0F8A5FFDFFCF8862401D
23633B50A2DC1028F61BC80719F403AA09191F03E29B0C0C73DEFCFF9F8AE185
12A021C20C0C153240F67BA8AD5FA036B203F16188E685AFFFFF4FC01906098C
8C7DA20C0C852A40F60B20FE06C4AC407C10A27931D0E9710403D19D91719E14
0343A226D4D9FB80F80603C3AA97FFFF87131D0B3A8C8C4BE41918A241E17095
8161ED8BFFFF43488E462946C64740D98B7F18180281FEFE43DB7430820D0000
28DE77E11D9A70650000000049454E44AE426082}
Name = 'PngImage107'
Background = clWindow
end>