Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
System.windows.media.color in VFP
Message
From
22/08/2012 14:19:41
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Visual FoxPro and .NET
Title:
System.windows.media.color in VFP
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Network:
Windows 2003 Server
Database:
MS SQL Server
Application:
Desktop
Miscellaneous
Thread ID:
01551060
Message ID:
01551060
Views:
95
From VFP9, I am passing a system.windows.media.color to a .net dll. However, I am not passing the ARGB but the friendly colorname instead (i.e.LightGray, AliceBlue, etc) I could easily get the rgb from the getcolors() and add the alpha to it to pass aRGB, but I need to pass the descriptive name of one of the predefined system colors. Has anyone already built a picklist of system.windows.media.color by any chance ? I know it's a longshot, but thought I would ask....

Nevermind. created it myself. If anyone needs it, here is listbox containing all of the system.windows.media.colors:
oForm = CREATEOBJECT('colorpickerform')
oForm.Show()
READ EVENTS

DEFINE CLASS colorpickerform AS form


	Top = 0
	Left = 0
	Height = 360
	Width = 449
	DoCreate = .T.
	Caption = "Color Picker for system.windows.media.color"
	Name = "ColorPicker"
	DIMENSION pacolors[1,6]


	ADD OBJECT colorlist AS listbox WITH ;
		RowSourceType = 9, ;
		Height = 300, ;
		Left = 24, ;
		Top = 24, ;
		Width = 204, ;
		Name = "ColorList"


	ADD OBJECT text1 AS textbox WITH ;
		Alignment = 1, ;
		Height = 23, ;
		Left = 276, ;
		Top = 36, ;
		Width = 144, ;
		Name = "Text1"


	ADD OBJECT text2 AS textbox WITH ;
		Alignment = 1, ;
		Height = 23, ;
		Left = 276, ;
		Top = 72, ;
		Width = 144, ;
		Name = "Text2"


	ADD OBJECT text3 AS textbox WITH ;
		Alignment = 1, ;
		Height = 23, ;
		Left = 277, ;
		Top = 108, ;
		Width = 144, ;
		Name = "Text3"


	PROCEDURE Init
		*--Create system.windows.media.color array*
		Dimension aColors[133,6]
		aColors[1,1] = 'White'
		aColors[1,2] = '255'
		aColors[1,3] = '255'
		aColors[1,4] = '255'
		aColors[1,5] = 'RGB(255,255,255)'
		aColors[1,6] = 16777215
		aColors[2,1] = 'WhiteSmoke'
		aColors[2,2] = '245'
		aColors[2,3] = '245'
		aColors[2,4] = '245'
		aColors[2,5] = 'RGB(245,245,245)'
		aColors[2,6] = 16119285
		aColors[3,1] = 'Gainsboro'
		aColors[3,2] = '220'
		aColors[3,3] = '220'
		aColors[3,4] = '220'
		aColors[3,5] = 'RGB(220,220,220)'
		aColors[3,6] = 14474460
		aColors[4,1] = 'LightGrey'
		aColors[4,2] = '211'
		aColors[4,3] = '211'
		aColors[4,4] = '211'
		aColors[4,5] = 'RGB(211,211,211)'
		aColors[4,6] = 13882323
		aColors[5,1] = 'Silver'
		aColors[5,2] = '192'
		aColors[5,3] = '192'
		aColors[5,4] = '192'
		aColors[5,5] = 'RGB(192,192,192)'
		aColors[5,6] = 12632256
		aColors[6,1] = 'DarkGray'
		aColors[6,2] = '169'
		aColors[6,3] = '169'
		aColors[6,4] = '169'
		aColors[6,5] = 'RGB(169,169,169)'
		aColors[6,6] = 11119017
		aColors[7,1] = 'Gray'
		aColors[7,2] = '128'
		aColors[7,3] = '128'
		aColors[7,4] = '128'
		aColors[7,5] = 'RGB(128,128,128)'
		aColors[7,6] = 8421504
		aColors[8,1] = 'DimGray'
		aColors[8,2] = '105'
		aColors[8,3] = '105'
		aColors[8,4] = '105'
		aColors[8,5] = 'RGB(105,105,105)'
		aColors[8,6] = 6908265
		aColors[9,1] = 'Black'
		aColors[9,2] = '0'
		aColors[9,3] = '0'
		aColors[9,4] = '0'
		aColors[9,5] = 'RGB(0,0,0)'
		aColors[9,6] = 0
		aColors[10,1] = 'RosyBrown'
		aColors[10,2] = '188'
		aColors[10,3] = '143'
		aColors[10,4] = '143'
		aColors[10,5] = 'RGB(188,143,143)'
		aColors[10,6] = 9408444
		aColors[11,1] = 'Lightcoral'
		aColors[11,2] = '240'
		aColors[11,3] = '128'
		aColors[11,4] = '128'
		aColors[11,5] = 'RGB(240,128,128)'
		aColors[11,6] = 8421616
		aColors[12,1] = 'IndianRed'
		aColors[12,2] = '205'
		aColors[12,3] = '92'
		aColors[12,4] = '92'
		aColors[12,5] = 'RGB(205,92,92)'
		aColors[12,6] = 6053069
		aColors[13,1] = 'Brown'
		aColors[13,2] = '165'
		aColors[13,3] = '42'
		aColors[13,4] = '42'
		aColors[13,5] = 'RGB(165,42,42)'
		aColors[13,6] = 2763429
		aColors[14,1] = 'FireBrick'
		aColors[14,2] = '178'
		aColors[14,3] = '34'
		aColors[14,4] = '34'
		aColors[14,5] = 'RGB(178,34,34)'
		aColors[14,6] = 2237106
		aColors[15,1] = 'Red'
		aColors[15,2] = '255'
		aColors[15,3] = '0'
		aColors[15,4] = '0'
		aColors[15,5] = 'RGB(255,0,0)'
		aColors[15,6] = 255
		aColors[16,1] = 'DarkRed'
		aColors[16,2] = '139'
		aColors[16,3] = '0'
		aColors[16,4] = '0'
		aColors[16,5] = 'RGB(139,0,0)'
		aColors[16,6] = 139
		aColors[17,1] = 'Maroon'
		aColors[17,2] = '128'
		aColors[17,3] = '0'
		aColors[17,4] = '0'
		aColors[17,5] = 'RGB(128,0,0)'
		aColors[17,6] = 128
		aColors[18,1] = 'LightPink'
		aColors[18,2] = '255'
		aColors[18,3] = '182'
		aColors[18,4] = '193'
		aColors[18,5] = 'RGB(255,182,193)'
		aColors[18,6] = 12695295
		aColors[19,1] = 'Crimson'
		aColors[19,2] = '220'
		aColors[19,3] = '20'
		aColors[19,4] = '60'
		aColors[19,5] = 'RGB(220,20,60)'
		aColors[19,6] = 3937500
		aColors[20,1] = 'PalevioletRed'
		aColors[20,2] = '219'
		aColors[20,3] = '112'
		aColors[20,4] = '147'
		aColors[20,5] = 'RGB(219,112,147)'
		aColors[20,6] = 9662683
		aColors[21,1] = 'LavenderBlush'
		aColors[21,2] = '255'
		aColors[21,3] = '240'
		aColors[21,4] = '245'
		aColors[21,5] = 'RGB(255,240,245)'
		aColors[21,6] = 16118015
		aColors[22,1] = 'HotPink'
		aColors[22,2] = '255'
		aColors[22,3] = '105'
		aColors[22,4] = '180'
		aColors[22,5] = 'RGB(255,105,180)'
		aColors[22,6] = 11823615
		aColors[23,1] = 'DeepPink'
		aColors[23,2] = '255'
		aColors[23,3] = '20'
		aColors[23,4] = '147'
		aColors[23,5] = 'RGB(255,20,147)'
		aColors[23,6] = 9639167
		aColors[24,1] = 'MediumvioletRed'
		aColors[24,2] = '199'
		aColors[24,3] = '21'
		aColors[24,4] = '133'
		aColors[24,5] = 'RGB(199,21,133)'
		aColors[24,6] = 8721863
		aColors[25,1] = 'Orchid'
		aColors[25,2] = '218'
		aColors[25,3] = '112'
		aColors[25,4] = '214'
		aColors[25,5] = 'RGB(218,112,214)'
		aColors[25,6] = 14053594
		aColors[26,1] = 'Thistle'
		aColors[26,2] = '216'
		aColors[26,3] = '191'
		aColors[26,4] = '216'
		aColors[26,5] = 'RGB(216,191,216)'
		aColors[26,6] = 14204888
		aColors[27,1] = 'Violet'
		aColors[27,2] = '238'
		aColors[27,3] = '130'
		aColors[27,4] = '238'
		aColors[27,5] = 'RGB(238,130,238)'
		aColors[27,6] = 15631086
		aColors[28,1] = 'Fuchsia'
		aColors[28,2] = '255'
		aColors[28,3] = '0'
		aColors[28,4] = '255'
		aColors[28,5] = 'RGB(255,0,255)'
		aColors[28,6] = 16711935
		aColors[29,1] = 'Magenta'
		aColors[29,2] = '255'
		aColors[29,3] = '0'
		aColors[29,4] = '255'
		aColors[29,5] = 'RGB(255,0,255)'
		aColors[29,6] = 16711935
		aColors[30,1] = 'DarkMagenta'
		aColors[30,2] = '139'
		aColors[30,3] = '0'
		aColors[30,4] = '139'
		aColors[30,5] = 'RGB(139,0,139)'
		aColors[30,6] = 9109643
		aColors[31,1] = 'Purple'
		aColors[31,2] = '128'
		aColors[31,3] = '0'
		aColors[31,4] = '128'
		aColors[31,5] = 'RGB(128,0,128)'
		aColors[31,6] = 8388736
		aColors[32,1] = 'MediumOrchid'
		aColors[32,2] = '186'
		aColors[32,3] = '85'
		aColors[32,4] = '211'
		aColors[32,5] = 'RGB(186,85,211)'
		aColors[32,6] = 13850042
		aColors[33,1] = 'DarkViolet'
		aColors[33,2] = '148'
		aColors[33,3] = '0'
		aColors[33,4] = '211'
		aColors[33,5] = 'RGB(148,0,211)'
		aColors[33,6] = 13828244
		aColors[34,1] = 'DarkOrchid'
		aColors[34,2] = '153'
		aColors[34,3] = '50'
		aColors[34,4] = '204'
		aColors[34,5] = 'RGB(153,50,204)'
		aColors[34,6] = 13382297
		aColors[35,1] = 'Indigo'
		aColors[35,2] = '75'
		aColors[35,3] = '0'
		aColors[35,4] = '130'
		aColors[35,5] = 'RGB(75,0,130)'
		aColors[35,6] = 8519755
		aColors[36,1] = 'BlueViolet'
		aColors[36,2] = '138'
		aColors[36,3] = '43'
		aColors[36,4] = '226'
		aColors[36,5] = 'RGB(138,43,226)'
		aColors[36,6] = 14822282
		aColors[37,1] = 'MediumPurple'
		aColors[37,2] = '147'
		aColors[37,3] = '112'
		aColors[37,4] = '219'
		aColors[37,5] = 'RGB(147,112,219)'
		aColors[37,6] = 14381203
		aColors[38,1] = 'SlateBlue'
		aColors[38,2] = '106'
		aColors[38,3] = '90'
		aColors[38,4] = '205'
		aColors[38,5] = 'RGB(106,90,205)'
		aColors[38,6] = 13458026
		aColors[39,1] = 'DarkSlateBlue'
		aColors[39,2] = '72'
		aColors[39,3] = '61'
		aColors[39,4] = '139'
		aColors[39,5] = 'RGB(72,61,139)'
		aColors[39,6] = 9125192
		aColors[40,1] = 'MediumSlateBlue'
		aColors[40,2] = '123'
		aColors[40,3] = '104'
		aColors[40,4] = '238'
		aColors[40,5] = 'RGB(123,104,238)'
		aColors[40,6] = 15624315
		aColors[41,1] = 'GhostWhite'
		aColors[41,2] = '248'
		aColors[41,3] = '248'
		aColors[41,4] = '255'
		aColors[41,5] = 'RGB(248,248,255)'
		aColors[41,6] = 16775416
		aColors[42,1] = 'Lavender'
		aColors[42,2] = '230'
		aColors[42,3] = '230'
		aColors[42,4] = '250'
		aColors[42,5] = 'RGB(230,230,250)'
		aColors[42,6] = 16443110
		aColors[43,1] = 'MidnightBlue'
		aColors[43,2] = '25'
		aColors[43,3] = '25'
		aColors[43,4] = '112'
		aColors[43,5] = 'RGB(25,25,112)'
		aColors[43,6] = 7346457
		aColors[44,1] = 'Blue'
		aColors[44,2] = '0'
		aColors[44,3] = '0'
		aColors[44,4] = '255'
		aColors[44,5] = 'RGB(0,0,255)'
		aColors[44,6] = 16711680
		aColors[45,1] = 'MediumBlue'
		aColors[45,2] = '0'
		aColors[45,3] = '0'
		aColors[45,4] = '205'
		aColors[45,5] = 'RGB(0,0,205)'
		aColors[45,6] = 13434880
		aColors[46,1] = 'DarkBlue'
		aColors[46,2] = '0'
		aColors[46,3] = '0'
		aColors[46,4] = '139'
		aColors[46,5] = 'RGB(0,0,139)'
		aColors[46,6] = 9109504
		aColors[47,1] = 'Navy'
		aColors[47,2] = '0'
		aColors[47,3] = '0'
		aColors[47,4] = '128'
		aColors[47,5] = 'RGB(0,0,128)'
		aColors[47,6] = 8388608
		aColors[48,1] = 'RoyalBlue'
		aColors[48,2] = '65'
		aColors[48,3] = '105'
		aColors[48,4] = '225'
		aColors[48,5] = 'RGB(65,105,225)'
		aColors[48,6] = 14772545
		aColors[49,1] = 'CornflowerBlue'
		aColors[49,2] = '100'
		aColors[49,3] = '149'
		aColors[49,4] = '237'
		aColors[49,5] = 'RGB(100,149,237)'
		aColors[49,6] = 15570276
		aColors[50,1] = 'LightSteelBlue'
		aColors[50,2] = '176'
		aColors[50,3] = '196'
		aColors[50,4] = '222'
		aColors[50,5] = 'RGB(176,196,222)'
		aColors[50,6] = 14599344
		aColors[51,1] = 'LightSlateGray'
		aColors[51,2] = '119'
		aColors[51,3] = '136'
		aColors[51,4] = '153'
		aColors[51,5] = 'RGB(119,136,153)'
		aColors[51,6] = 10061943
		aColors[52,1] = 'SlateGray'
		aColors[52,2] = '112'
		aColors[52,3] = '128'
		aColors[52,4] = '144'
		aColors[52,5] = 'RGB(112,128,144)'
		aColors[52,6] = 9470064
		aColors[53,1] = 'DodgerBlue'
		aColors[53,2] = '30'
		aColors[53,3] = '144'
		aColors[53,4] = '255'
		aColors[53,5] = 'RGB(30,144,255)'
		aColors[53,6] = 16748574
		aColors[54,1] = 'AliceBlue'
		aColors[54,2] = '240'
		aColors[54,3] = '248'
		aColors[54,4] = '255'
		aColors[54,5] = 'RGB(240,248,255)'
		aColors[54,6] = 16775408
		aColors[55,1] = 'SteelBlue'
		aColors[55,2] = '70'
		aColors[55,3] = '130'
		aColors[55,4] = '180'
		aColors[55,5] = 'RGB(70,130,180)'
		aColors[55,6] = 11829830
		aColors[56,1] = 'LightSkyBlue'
		aColors[56,2] = '135'
		aColors[56,3] = '206'
		aColors[56,4] = '250'
		aColors[56,5] = 'RGB(135,206,250)'
		aColors[56,6] = 16436871
		aColors[57,1] = 'SkyBlue'
		aColors[57,2] = '135'
		aColors[57,3] = '206'
		aColors[57,4] = '235'
		aColors[57,5] = 'RGB(135,206,235)'
		aColors[57,6] = 15453831
		aColors[58,1] = 'DeepSkyBlue'
		aColors[58,2] = '0'
		aColors[58,3] = '191'
		aColors[58,4] = '255'
		aColors[58,5] = 'RGB(0,191,255)'
		aColors[58,6] = 16760576
		aColors[59,1] = 'LightBlue'
		aColors[59,2] = '173'
		aColors[59,3] = '216'
		aColors[59,4] = '230'
		aColors[59,5] = 'RGB(173,216,230)'
		aColors[59,6] = 15128749
		aColors[60,1] = 'PowderBlue'
		aColors[60,2] = '176'
		aColors[60,3] = '224'
		aColors[60,4] = '230'
		aColors[60,5] = 'RGB(176,224,230)'
		aColors[60,6] = 15130800
		aColors[61,1] = 'CadetBlue'
		aColors[61,2] = '95'
		aColors[61,3] = '158'
		aColors[61,4] = '160'
		aColors[61,5] = 'RGB(95,158,160)'
		aColors[61,6] = 10526303
		aColors[62,1] = 'DarkTurquoise'
		aColors[62,2] = '0'
		aColors[62,3] = '206'
		aColors[62,4] = '209'
		aColors[62,5] = 'RGB(0,206,209)'
		aColors[62,6] = 13749760
		aColors[63,1] = 'Azure'
		aColors[63,2] = '240'
		aColors[63,3] = '255'
		aColors[63,4] = '255'
		aColors[63,5] = 'RGB(240,255,255)'
		aColors[63,6] = 16777200
		aColors[64,1] = 'LightCyan'
		aColors[64,2] = '224'
		aColors[64,3] = '255'
		aColors[64,4] = '255'
		aColors[64,5] = 'RGB(224,255,255)'
		aColors[64,6] = 16777184
		aColors[65,1] = 'PaleTurquoise'
		aColors[65,2] = '175'
		aColors[65,3] = '238'
		aColors[65,4] = '238'
		aColors[65,5] = 'RGB(175,238,238)'
		aColors[65,6] = 15658671
		aColors[66,1] = 'DarkSlateGray'
		aColors[66,2] = '47'
		aColors[66,3] = '79'
		aColors[66,4] = '79'
		aColors[66,5] = 'RGB(47,79,79)'
		aColors[66,6] = 5197615
		aColors[67,1] = 'Aqua'
		aColors[67,2] = '0'
		aColors[67,3] = '255'
		aColors[67,4] = '255'
		aColors[67,5] = 'RGB(0,255,255)'
		aColors[67,6] = 16776960
		aColors[68,1] = 'DarkCyan'
		aColors[68,2] = '0'
		aColors[68,3] = '139'
		aColors[68,4] = '139'
		aColors[68,5] = 'RGB(0,139,139)'
		aColors[68,6] = 9145088
		aColors[69,1] = 'Teal'
		aColors[69,2] = '0'
		aColors[69,3] = '128'
		aColors[69,4] = '128'
		aColors[69,5] = 'RGB(0,128,128)'
		aColors[69,6] = 8421376
		aColors[70,1] = 'MediumTurquoise'
		aColors[70,2] = '72'
		aColors[70,3] = '209'
		aColors[70,4] = '204'
		aColors[70,5] = 'RGB(72,209,204)'
		aColors[70,6] = 13422920
		aColors[71,1] = 'LightSeaGreen'
		aColors[71,2] = '32'
		aColors[71,3] = '178'
		aColors[71,4] = '170'
		aColors[71,5] = 'RGB(32,178,170)'
		aColors[71,6] = 11186720
		aColors[72,1] = 'Turquoise'
		aColors[72,2] = '64'
		aColors[72,3] = '224'
		aColors[72,4] = '208'
		aColors[72,5] = 'RGB(64,224,208)'
		aColors[72,6] = 13688896
		aColors[73,1] = 'Aquamarine'
		aColors[73,2] = '127'
		aColors[73,3] = '205'
		aColors[73,4] = '170'
		aColors[73,5] = 'RGB(127,205,170)'
		aColors[73,6] = 11193727
		aColors[74,1] = 'MediumAquamarine'
		aColors[74,2] = '102'
		aColors[74,3] = '205'
		aColors[74,4] = '170'
		aColors[74,5] = 'RGB(102,205,170)'
		aColors[74,6] = 11193702
		aColors[75,1] = 'MediumSpringGreen'
		aColors[75,2] = '0'
		aColors[75,3] = '250'
		aColors[75,4] = '154'
		aColors[75,5] = 'RGB(0,250,154)'
		aColors[75,6] = 10156544
		aColors[76,1] = 'MintCream'
		aColors[76,2] = '245'
		aColors[76,3] = '255'
		aColors[76,4] = '250'
		aColors[76,5] = 'RGB(245,255,250)'
		aColors[76,6] = 16449525
		aColors[77,1] = 'SpringGreen'
		aColors[77,2] = '0'
		aColors[77,3] = '255'
		aColors[77,4] = '127'
		aColors[77,5] = 'RGB(0,255,127)'
		aColors[77,6] = 8388352
		aColors[78,1] = 'MediumSeaGreen'
		aColors[78,2] = '60'
		aColors[78,3] = '179'
		aColors[78,4] = '113'
		aColors[78,5] = 'RGB(60,179,113)'
		aColors[78,6] = 7451452
		aColors[79,1] = 'SeaGreen'
		aColors[79,2] = '46'
		aColors[79,3] = '139'
		aColors[79,4] = '87'
		aColors[79,5] = 'RGB(46,139,87)'
		aColors[79,6] = 5737262
		aColors[80,1] = 'honeydew'
		aColors[80,2] = '240'
		aColors[80,3] = '255'
		aColors[80,4] = '240'
		aColors[80,5] = 'RGB(240,255,240)'
		aColors[80,6] = 15794160
		aColors[81,1] = 'DarkSeaGreen'
		aColors[81,2] = '143'
		aColors[81,3] = '188'
		aColors[81,4] = '143'
		aColors[81,5] = 'RGB(143,188,143)'
		aColors[81,6] = 9419919
		aColors[82,1] = 'PaleGreen'
		aColors[82,2] = '152'
		aColors[82,3] = '251'
		aColors[82,4] = '152'
		aColors[82,5] = 'RGB(152,251,152)'
		aColors[82,6] = 10025880
		aColors[83,1] = 'LightGreen'
		aColors[83,2] = '144'
		aColors[83,3] = '238'
		aColors[83,4] = '144'
		aColors[83,5] = 'RGB(144,238,144)'
		aColors[83,6] = 9498256
		aColors[84,1] = 'ForestGreen'
		aColors[84,2] = '34'
		aColors[84,3] = '139'
		aColors[84,4] = '34'
		aColors[84,5] = 'RGB(34,139,34)'
		aColors[84,6] = 2263842
		aColors[85,1] = 'LimeGreen'
		aColors[85,2] = '50'
		aColors[85,3] = '205'
		aColors[85,4] = '50'
		aColors[85,5] = 'RGB(50,205,50)'
		aColors[85,6] = 3329330
		aColors[86,1] = 'Lime'
		aColors[86,2] = '0'
		aColors[86,3] = '255'
		aColors[86,4] = '0'
		aColors[86,5] = 'RGB(0,255,0)'
		aColors[86,6] = 65280
		aColors[87,1] = 'Green'
		aColors[87,2] = '0'
		aColors[87,3] = '128'
		aColors[87,4] = '0'
		aColors[87,5] = 'RGB(0,128,0)'
		aColors[87,6] = 32768
		aColors[88,1] = 'DarkGreen'
		aColors[88,2] = '0'
		aColors[88,3] = '100'
		aColors[88,4] = '0'
		aColors[88,5] = 'RGB(0,100,0)'
		aColors[88,6] = 25600
		aColors[89,1] = 'LawnGreen'
		aColors[89,2] = '124'
		aColors[89,3] = '252'
		aColors[89,4] = '0'
		aColors[89,5] = 'RGB(124,252,0)'
		aColors[89,6] = 64636
		aColors[90,1] = 'Chartreuse'
		aColors[90,2] = '127'
		aColors[90,3] = '255'
		aColors[90,4] = '0'
		aColors[90,5] = 'RGB(127,255,0)'
		aColors[90,6] = 65407
		aColors[91,1] = 'GreenYellow'
		aColors[91,2] = '173'
		aColors[91,3] = '255'
		aColors[91,4] = '47'
		aColors[91,5] = 'RGB(173,255,47)'
		aColors[91,6] = 3145645
		aColors[92,1] = 'DarkOliveGreen'
		aColors[92,2] = '85'
		aColors[92,3] = '107'
		aColors[92,4] = '47'
		aColors[92,5] = 'RGB(85,107,47)'
		aColors[92,6] = 3107669
		aColors[93,1] = 'YellowGreen'
		aColors[93,2] = '154'
		aColors[93,3] = '205'
		aColors[93,4] = '50'
		aColors[93,5] = 'RGB(154,205,50)'
		aColors[93,6] = 3329434
		aColors[94,1] = 'OliveDrab'
		aColors[94,2] = '107'
		aColors[94,3] = '142'
		aColors[94,4] = '35'
		aColors[94,5] = 'RGB(107,142,35)'
		aColors[94,6] = 2330219
		aColors[95,1] = 'Ivory'
		aColors[95,2] = '255'
		aColors[95,3] = '255'
		aColors[95,4] = '240'
		aColors[95,5] = 'RGB(255,255,240)'
		aColors[95,6] = 15794175
		aColors[96,1] = 'Beige'
		aColors[96,2] = '245'
		aColors[96,3] = '245'
		aColors[96,4] = '220'
		aColors[96,5] = 'RGB(245,245,220)'
		aColors[96,6] = 14480885
		aColors[97,1] = 'LightYellow'
		aColors[97,2] = '255'
		aColors[97,3] = '255'
		aColors[97,4] = '224'
		aColors[97,5] = 'RGB(255,255,224)'
		aColors[97,6] = 14745599
		aColors[98,1] = 'LightGoldenrodYellow'
		aColors[98,2] = '250'
		aColors[98,3] = '250'
		aColors[98,4] = '210'
		aColors[98,5] = 'RGB(250,250,210)'
		aColors[98,6] = 13826810
		aColors[99,1] = 'Yellow'
		aColors[99,2] = '255'
		aColors[99,3] = '255'
		aColors[99,4] = '0'
		aColors[99,5] = 'RGB(255,255,0)'
		aColors[99,6] = 65535
		aColors[100,1] = 'Olive'
		aColors[100,2] = '128'
		aColors[100,3] = '128'
		aColors[100,4] = '0'
		aColors[100,5] = 'RGB(128,128,0)'
		aColors[100,6] = 32896
		aColors[101,1] = 'DarkKhaki'
		aColors[101,2] = '189'
		aColors[101,3] = '183'
		aColors[101,4] = '107'
		aColors[101,5] = 'RGB(189,183,107)'
		aColors[101,6] = 7059389
		aColors[102,1] = 'PaleGoldenrod'
		aColors[102,2] = '238'
		aColors[102,3] = '232'
		aColors[102,4] = '170'
		aColors[102,5] = 'RGB(238,232,170)'
		aColors[102,6] = 11200750
		aColors[103,1] = 'LemonChiffon'
		aColors[103,2] = '255'
		aColors[103,3] = '250'
		aColors[103,4] = '205'
		aColors[103,5] = 'RGB(255,250,205)'
		aColors[103,6] = 13499135
		aColors[104,1] = 'Khaki'
		aColors[104,2] = '240'
		aColors[104,3] = '230'
		aColors[104,4] = '140'
		aColors[104,5] = 'RGB(240,230,140)'
		aColors[104,6] = 9234160
		aColors[105,1] = 'Cornsilk'
		aColors[105,2] = '255'
		aColors[105,3] = '248'
		aColors[105,4] = '220'
		aColors[105,5] = 'RGB(255,248,220)'
		aColors[105,6] = 14481663
		aColors[106,1] = 'Goldenrod'
		aColors[106,2] = '218'
		aColors[106,3] = '165'
		aColors[106,4] = '32'
		aColors[106,5] = 'RGB(218,165,32)'
		aColors[106,6] = 2139610
		aColors[107,1] = 'DarkGoldenrod'
		aColors[107,2] = '184'
		aColors[107,3] = '134'
		aColors[107,4] = '11'
		aColors[107,5] = 'RGB(184,134,11)'
		aColors[107,6] = 755384
		aColors[108,1] = 'FloralWhite'
		aColors[108,2] = '255'
		aColors[108,3] = '250'
		aColors[108,4] = '240'
		aColors[108,5] = 'RGB(255,250,240)'
		aColors[108,6] = 15792895
		aColors[109,1] = 'OldLace'
		aColors[109,2] = '253'
		aColors[109,3] = '245'
		aColors[109,4] = '230'
		aColors[109,5] = 'RGB(253,245,230)'
		aColors[109,6] = 15136253
		aColors[110,1] = 'Wheat'
		aColors[110,2] = '245'
		aColors[110,3] = '222'
		aColors[110,4] = '179'
		aColors[110,5] = 'RGB(245,222,179)'
		aColors[110,6] = 11788021
		aColors[111,1] = 'Orange'
		aColors[111,2] = '255'
		aColors[111,3] = '165'
		aColors[111,4] = '0'
		aColors[111,5] = 'RGB(255,165,0)'
		aColors[111,6] = 42495
		aColors[112,1] = 'Moccasin'
		aColors[112,2] = '255'
		aColors[112,3] = '228'
		aColors[112,4] = '181'
		aColors[112,5] = 'RGB(255,228,181)'
		aColors[112,6] = 11920639
		aColors[113,1] = 'PapayaWhip'
		aColors[113,2] = '255'
		aColors[113,3] = '239'
		aColors[113,4] = '213'
		aColors[113,5] = 'RGB(255,239,213)'
		aColors[113,6] = 14020607
		aColors[114,1] = 'BlanchedAlmond'
		aColors[114,2] = '255'
		aColors[114,3] = '235'
		aColors[114,4] = '205'
		aColors[114,5] = 'RGB(255,235,205)'
		aColors[114,6] = 13495295
		aColors[115,1] = 'NavajoWhite'
		aColors[115,2] = '255'
		aColors[115,3] = '222'
		aColors[115,4] = '173'
		aColors[115,5] = 'RGB(255,222,173)'
		aColors[115,6] = 11394815
		aColors[116,1] = 'AntiqueWhite'
		aColors[116,2] = '250'
		aColors[116,3] = '235'
		aColors[116,4] = '215'
		aColors[116,5] = 'RGB(250,235,215)'
		aColors[116,6] = 14150650
		aColors[117,1] = 'Burlywood'
		aColors[117,2] = '222'
		aColors[117,3] = '184'
		aColors[117,4] = '135'
		aColors[117,5] = 'RGB(222,184,135)'
		aColors[117,6] = 8894686
		aColors[118,1] = 'DarkOrange'
		aColors[118,2] = '255'
		aColors[118,3] = '140'
		aColors[118,4] = '0'
		aColors[118,5] = 'RGB(255,140,0)'
		aColors[118,6] = 36095
		aColors[119,1] = 'Bisque'
		aColors[119,2] = '255'
		aColors[119,3] = '228'
		aColors[119,4] = '196'
		aColors[119,5] = 'RGB(255,228,196)'
		aColors[119,6] = 12903679
		aColors[120,1] = 'Linen'
		aColors[120,2] = '250'
		aColors[120,3] = '240'
		aColors[120,4] = '230'
		aColors[120,5] = 'RGB(250,240,230)'
		aColors[120,6] = 15134970
		aColors[121,1] = 'PeachPuff'
		aColors[121,2] = '255'
		aColors[121,3] = '218'
		aColors[121,4] = '185'
		aColors[121,5] = 'RGB(255,218,185)'
		aColors[121,6] = 12180223
		aColors[122,1] = 'SandyBrown'
		aColors[122,2] = '244'
		aColors[122,3] = '164'
		aColors[122,4] = '96'
		aColors[122,5] = 'RGB(244,164,96)'
		aColors[122,6] = 6333684
		aColors[123,1] = 'Seashell'
		aColors[123,2] = '255'
		aColors[123,3] = '245'
		aColors[123,4] = '238'
		aColors[123,5] = 'RGB(255,245,238)'
		aColors[123,6] = 15660543
		aColors[124,1] = 'Chocolate'
		aColors[124,2] = '210'
		aColors[124,3] = '105'
		aColors[124,4] = '30'
		aColors[124,5] = 'RGB(210,105,30)'
		aColors[124,6] = 1993170
		aColors[125,1] = 'SaddleBrown'
		aColors[125,2] = '139'
		aColors[125,3] = '69'
		aColors[125,4] = '19'
		aColors[125,5] = 'RGB(139,69,19)'
		aColors[125,6] = 1262987
		aColors[126,1] = 'Sienna'
		aColors[126,2] = '160'
		aColors[126,3] = '82'
		aColors[126,4] = '45'
		aColors[126,5] = 'RGB(160,82,45)'
		aColors[126,6] = 2970272
		aColors[127,1] = 'LightSalmon'
		aColors[127,2] = '255'
		aColors[127,3] = '160'
		aColors[127,4] = '122'
		aColors[127,5] = 'RGB(255,160,122)'
		aColors[127,6] = 8036607
		aColors[128,1] = 'Coral'
		aColors[128,2] = '255'
		aColors[128,3] = '127'
		aColors[128,4] = '80'
		aColors[128,5] = 'RGB(255,127,80)'
		aColors[128,6] = 5275647
		aColors[129,1] = 'OrangeRed'
		aColors[129,2] = '255'
		aColors[129,3] = '69'
		aColors[129,4] = '0'
		aColors[129,5] = 'RGB(255,69,0)'
		aColors[129,6] = 17919
		aColors[130,1] = 'DarkSalmon'
		aColors[130,2] = '233'
		aColors[130,3] = '150'
		aColors[130,4] = '122'
		aColors[130,5] = 'RGB(233,150,122)'
		aColors[130,6] = 8034025
		aColors[131,1] = 'Tomato'
		aColors[131,2] = '255'
		aColors[131,3] = '99'
		aColors[131,4] = '71'
		aColors[131,5] = 'RGB(255,99,71)'
		aColors[131,6] = 4678655
		aColors[132,1] = 'MistyRose'
		aColors[132,2] = '255'
		aColors[132,3] = '228'
		aColors[132,4] = '225'
		aColors[132,5] = 'RGB(255,228,225)'
		aColors[132,6] = 14804223
		aColors[133,1] = 'Salmon'
		aColors[133,2] = '250'
		aColors[133,3] = '128'
		aColors[133,4] = '114'
		aColors[133,5] = 'RGB(250,128,114)'
		aColors[133,6] = 7504122
		DIMENSION THISFORM.paColors[ALEN(aColors,1),6]
		=ACOPY(aColors,THISFORM.paColors)
	ENDPROC


	PROCEDURE colorlist.Init
		PUBLIC ColorPopup
		DEFINE POPUP ColorPopup
		DEFINE BAR 1 OF ColorPopup ;
		    PROMPT 'White'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,255,255)
		DEFINE BAR 2 OF ColorPopup ;
		    PROMPT 'WhiteSmoke'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,245,245,245)
		DEFINE BAR 3 OF ColorPopup ;
		    PROMPT 'Gainsboro'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,220,220,220)
		DEFINE BAR 4 OF ColorPopup ;
		    PROMPT 'LightGrey'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,211,211,211)
		DEFINE BAR 5 OF ColorPopup ;
		    PROMPT 'Silver'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,192,192,192)
		DEFINE BAR 6 OF ColorPopup ;
		    PROMPT 'DarkGray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,169,169,169)
		DEFINE BAR 7 OF ColorPopup ;
		    PROMPT 'Gray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,128,128,128)
		DEFINE BAR 8 OF ColorPopup ;
		    PROMPT 'DimGray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,105,105,105)
		DEFINE BAR 9 OF ColorPopup ;
		    PROMPT 'Black'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,0,0)
		DEFINE BAR 10 OF ColorPopup ;
		    PROMPT 'RosyBrown'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,188,143,143)
		DEFINE BAR 11 OF ColorPopup ;
		    PROMPT 'Lightcoral'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,240,128,128)
		DEFINE BAR 12 OF ColorPopup ;
		    PROMPT 'IndianRed'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,205,92,92)
		DEFINE BAR 13 OF ColorPopup ;
		    PROMPT 'Brown'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,165,42,42)
		DEFINE BAR 14 OF ColorPopup ;
		    PROMPT 'FireBrick'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,178,34,34)
		DEFINE BAR 15 OF ColorPopup ;
		    PROMPT 'Red'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,0,0)
		DEFINE BAR 16 OF ColorPopup ;
		    PROMPT 'DarkRed'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,139,0,0)
		DEFINE BAR 17 OF ColorPopup ;
		    PROMPT 'Maroon'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,128,0,0)
		DEFINE BAR 18 OF ColorPopup ;
		    PROMPT 'LightPink'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,182,193)
		DEFINE BAR 19 OF ColorPopup ;
		    PROMPT 'Crimson'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,220,20,60)
		DEFINE BAR 20 OF ColorPopup ;
		    PROMPT 'PalevioletRed'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,219,112,147)
		DEFINE BAR 21 OF ColorPopup ;
		    PROMPT 'LavenderBlush'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,240,245)
		DEFINE BAR 22 OF ColorPopup ;
		    PROMPT 'HotPink'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,105,180)
		DEFINE BAR 23 OF ColorPopup ;
		    PROMPT 'DeepPink'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,20,147)
		DEFINE BAR 24 OF ColorPopup ;
		    PROMPT 'MediumvioletRed'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,199,21,133)
		DEFINE BAR 25 OF ColorPopup ;
		    PROMPT 'Orchid'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,218,112,214)
		DEFINE BAR 26 OF ColorPopup ;
		    PROMPT 'Thistle'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,216,191,216)
		DEFINE BAR 27 OF ColorPopup ;
		    PROMPT 'Violet'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,238,130,238)
		DEFINE BAR 28 OF ColorPopup ;
		    PROMPT 'Fuchsia'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,0,255)
		DEFINE BAR 29 OF ColorPopup ;
		    PROMPT 'Magenta'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,0,255)
		DEFINE BAR 30 OF ColorPopup ;
		    PROMPT 'DarkMagenta'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,139,0,139)
		DEFINE BAR 31 OF ColorPopup ;
		    PROMPT 'Purple'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,128,0,128)
		DEFINE BAR 32 OF ColorPopup ;
		    PROMPT 'MediumOrchid'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,186,85,211)
		DEFINE BAR 33 OF ColorPopup ;
		    PROMPT 'DarkViolet'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,148,0,211)
		DEFINE BAR 34 OF ColorPopup ;
		    PROMPT 'DarkOrchid'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,153,50,204)
		DEFINE BAR 35 OF ColorPopup ;
		    PROMPT 'Indigo'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,75,0,130)
		DEFINE BAR 36 OF ColorPopup ;
		    PROMPT 'BlueViolet'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,138,43,226)
		DEFINE BAR 37 OF ColorPopup ;
		    PROMPT 'MediumPurple'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,147,112,219)
		DEFINE BAR 38 OF ColorPopup ;
		    PROMPT 'SlateBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,106,90,205)
		DEFINE BAR 39 OF ColorPopup ;
		    PROMPT 'DarkSlateBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,72,61,139)
		DEFINE BAR 40 OF ColorPopup ;
		    PROMPT 'MediumSlateBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,123,104,238)
		DEFINE BAR 41 OF ColorPopup ;
		    PROMPT 'GhostWhite'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,248,248,255)
		DEFINE BAR 42 OF ColorPopup ;
		    PROMPT 'Lavender'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,230,230,250)
		DEFINE BAR 43 OF ColorPopup ;
		    PROMPT 'MidnightBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,25,25,112)
		DEFINE BAR 44 OF ColorPopup ;
		    PROMPT 'Blue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,0,255)
		DEFINE BAR 45 OF ColorPopup ;
		    PROMPT 'MediumBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,0,205)
		DEFINE BAR 46 OF ColorPopup ;
		    PROMPT 'DarkBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,0,139)
		DEFINE BAR 47 OF ColorPopup ;
		    PROMPT 'Navy'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,0,128)
		DEFINE BAR 48 OF ColorPopup ;
		    PROMPT 'RoyalBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,65,105,225)
		DEFINE BAR 49 OF ColorPopup ;
		    PROMPT 'CornflowerBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,100,149,237)
		DEFINE BAR 50 OF ColorPopup ;
		    PROMPT 'LightSteelBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,176,196,222)
		DEFINE BAR 51 OF ColorPopup ;
		    PROMPT 'LightSlateGray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,119,136,153)
		DEFINE BAR 52 OF ColorPopup ;
		    PROMPT 'SlateGray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,112,128,144)
		DEFINE BAR 53 OF ColorPopup ;
		    PROMPT 'DodgerBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,30,144,255)
		DEFINE BAR 54 OF ColorPopup ;
		    PROMPT 'AliceBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,240,248,255)
		DEFINE BAR 55 OF ColorPopup ;
		    PROMPT 'SteelBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,70,130,180)
		DEFINE BAR 56 OF ColorPopup ;
		    PROMPT 'LightSkyBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,135,206,250)
		DEFINE BAR 57 OF ColorPopup ;
		    PROMPT 'SkyBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,135,206,235)
		DEFINE BAR 58 OF ColorPopup ;
		    PROMPT 'DeepSkyBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,191,255)
		DEFINE BAR 59 OF ColorPopup ;
		    PROMPT 'LightBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,173,216,230)
		DEFINE BAR 60 OF ColorPopup ;
		    PROMPT 'PowderBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,176,224,230)
		DEFINE BAR 61 OF ColorPopup ;
		    PROMPT 'CadetBlue'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,95,158,160)
		DEFINE BAR 62 OF ColorPopup ;
		    PROMPT 'DarkTurquoise'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,206,209)
		DEFINE BAR 63 OF ColorPopup ;
		    PROMPT 'Azure'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,240,255,255)
		DEFINE BAR 64 OF ColorPopup ;
		    PROMPT 'LightCyan'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,224,255,255)
		DEFINE BAR 65 OF ColorPopup ;
		    PROMPT 'PaleTurquoise'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,175,238,238)
		DEFINE BAR 66 OF ColorPopup ;
		    PROMPT 'DarkSlateGray'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,47,79,79)
		DEFINE BAR 67 OF ColorPopup ;
		    PROMPT 'Aqua'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,255,255)
		DEFINE BAR 68 OF ColorPopup ;
		    PROMPT 'DarkCyan'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,139,139)
		DEFINE BAR 69 OF ColorPopup ;
		    PROMPT 'Teal'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,128,128)
		DEFINE BAR 70 OF ColorPopup ;
		    PROMPT 'MediumTurquoise'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,72,209,204)
		DEFINE BAR 71 OF ColorPopup ;
		    PROMPT 'LightSeaGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,32,178,170)
		DEFINE BAR 72 OF ColorPopup ;
		    PROMPT 'Turquoise'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,64,224,208)
		DEFINE BAR 73 OF ColorPopup ;
		    PROMPT 'Aquamarine'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,127,205,170)
		DEFINE BAR 74 OF ColorPopup ;
		    PROMPT 'MediumAquamarine'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,102,205,170)
		DEFINE BAR 75 OF ColorPopup ;
		    PROMPT 'MediumSpringGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,250,154)
		DEFINE BAR 76 OF ColorPopup ;
		    PROMPT 'MintCream'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,245,255,250)
		DEFINE BAR 77 OF ColorPopup ;
		    PROMPT 'SpringGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,255,127)
		DEFINE BAR 78 OF ColorPopup ;
		    PROMPT 'MediumSeaGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,60,179,113)
		DEFINE BAR 79 OF ColorPopup ;
		    PROMPT 'SeaGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,46,139,87)
		DEFINE BAR 80 OF ColorPopup ;
		    PROMPT 'honeydew'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,240,255,240)
		DEFINE BAR 81 OF ColorPopup ;
		    PROMPT 'DarkSeaGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,143,188,143)
		DEFINE BAR 82 OF ColorPopup ;
		    PROMPT 'PaleGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,152,251,152)
		DEFINE BAR 83 OF ColorPopup ;
		    PROMPT 'LightGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,144,238,144)
		DEFINE BAR 84 OF ColorPopup ;
		    PROMPT 'ForestGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,34,139,34)
		DEFINE BAR 85 OF ColorPopup ;
		    PROMPT 'LimeGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,50,205,50)
		DEFINE BAR 86 OF ColorPopup ;
		    PROMPT 'Lime'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,0,255,0)
		DEFINE BAR 87 OF ColorPopup ;
		    PROMPT 'Green'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,128,0)
		DEFINE BAR 88 OF ColorPopup ;
		    PROMPT 'DarkGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,0,100,0)
		DEFINE BAR 89 OF ColorPopup ;
		    PROMPT 'LawnGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,124,252,0)
		DEFINE BAR 90 OF ColorPopup ;
		    PROMPT 'Chartreuse'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,127,255,0)
		DEFINE BAR 91 OF ColorPopup ;
		    PROMPT 'GreenYellow'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,173,255,47)
		DEFINE BAR 92 OF ColorPopup ;
		    PROMPT 'DarkOliveGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,85,107,47)
		DEFINE BAR 93 OF ColorPopup ;
		    PROMPT 'YellowGreen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,154,205,50)
		DEFINE BAR 94 OF ColorPopup ;
		    PROMPT 'OliveDrab'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,107,142,35)
		DEFINE BAR 95 OF ColorPopup ;
		    PROMPT 'Ivory'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,255,240)
		DEFINE BAR 96 OF ColorPopup ;
		    PROMPT 'Beige'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,245,245,220)
		DEFINE BAR 97 OF ColorPopup ;
		    PROMPT 'LightYellow'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,255,224)
		DEFINE BAR 98 OF ColorPopup ;
		    PROMPT 'LightGoldenrodYellow'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,250,250,210)
		DEFINE BAR 99 OF ColorPopup ;
		    PROMPT 'Yellow'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,255,0)
		DEFINE BAR 100 OF ColorPopup ;
		    PROMPT 'Olive'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,128,128,0)
		DEFINE BAR 101 OF ColorPopup ;
		    PROMPT 'DarkKhaki'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,189,183,107)
		DEFINE BAR 102 OF ColorPopup ;
		    PROMPT 'PaleGoldenrod'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,238,232,170)
		DEFINE BAR 103 OF ColorPopup ;
		    PROMPT 'LemonChiffon'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,250,205)
		DEFINE BAR 104 OF ColorPopup ;
		    PROMPT 'Khaki'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,240,230,140)
		DEFINE BAR 105 OF ColorPopup ;
		    PROMPT 'Cornsilk'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,248,220)
		DEFINE BAR 106 OF ColorPopup ;
		    PROMPT 'Goldenrod'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,218,165,32)
		DEFINE BAR 107 OF ColorPopup ;
		    PROMPT 'DarkGoldenrod'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,184,134,11)
		DEFINE BAR 108 OF ColorPopup ;
		    PROMPT 'FloralWhite'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,250,240)
		DEFINE BAR 109 OF ColorPopup ;
		    PROMPT 'OldLace'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,253,245,230)
		DEFINE BAR 110 OF ColorPopup ;
		    PROMPT 'Wheat'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,245,222,179)
		DEFINE BAR 111 OF ColorPopup ;
		    PROMPT 'Orange'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,165,0)
		DEFINE BAR 112 OF ColorPopup ;
		    PROMPT 'Moccasin'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,228,181)
		DEFINE BAR 113 OF ColorPopup ;
		    PROMPT 'PapayaWhip'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,239,213)
		DEFINE BAR 114 OF ColorPopup ;
		    PROMPT 'BlanchedAlmond'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,235,205)
		DEFINE BAR 115 OF ColorPopup ;
		    PROMPT 'NavajoWhite'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,222,173)
		DEFINE BAR 116 OF ColorPopup ;
		    PROMPT 'AntiqueWhite'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,250,235,215)
		DEFINE BAR 117 OF ColorPopup ;
		    PROMPT 'Burlywood'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,222,184,135)
		DEFINE BAR 118 OF ColorPopup ;
		    PROMPT 'DarkOrange'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,140,0)
		DEFINE BAR 119 OF ColorPopup ;
		    PROMPT 'Bisque'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,228,196)
		DEFINE BAR 120 OF ColorPopup ;
		    PROMPT 'Linen'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,250,240,230)
		DEFINE BAR 121 OF ColorPopup ;
		    PROMPT 'PeachPuff'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,218,185)
		DEFINE BAR 122 OF ColorPopup ;
		    PROMPT 'SandyBrown'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,244,164,96)
		DEFINE BAR 123 OF ColorPopup ;
		    PROMPT 'Seashell'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,245,238)
		DEFINE BAR 124 OF ColorPopup ;
		    PROMPT 'Chocolate'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,210,105,30)
		DEFINE BAR 125 OF ColorPopup ;
		    PROMPT 'SaddleBrown'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,139,69,19)
		DEFINE BAR 126 OF ColorPopup ;
		    PROMPT 'Sienna'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,160,82,45)
		DEFINE BAR 127 OF ColorPopup ;
		    PROMPT 'LightSalmon'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,160,122)
		DEFINE BAR 128 OF ColorPopup ;
		    PROMPT 'Coral'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,127,80)
		DEFINE BAR 129 OF ColorPopup ;
		    PROMPT 'OrangeRed'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,69,0)
		DEFINE BAR 130 OF ColorPopup ;
		    PROMPT 'DarkSalmon'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,233,150,122)
		DEFINE BAR 131 OF ColorPopup ;
		    PROMPT 'Tomato'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,255,99,71)
		DEFINE BAR 132 OF ColorPopup ;
		    PROMPT 'MistyRose'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(0,0,0,255,228,225)
		DEFINE BAR 133 OF ColorPopup ;
		    PROMPT 'Salmon'; 
		    FONT 'Arial',9 style 'B' ;
		   COLOR , RGB(255,255,255,250,128,114)

		this.RowSource = "ColorPopup"
	ENDPROC

	PROCEDURE Destroy
		CLEAR EVENTS
	ENDPROC
	
	PROCEDURE colorlist.DblClick
		thisform.text1.value = this.list[this.listindex]
		thisform.text2.value = thisform.paColors[this.listindex,5]
		thisform.text3.value = thisform.paColors[this.listindex,6]
	ENDPROC


ENDDEFINE
.·*´¨)
.·`TCH
(..·*

010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"
Next
Reply
Map
View

Click here to load this message in the networking platform