object PalForm: TPalForm Left = 231 Top = 231 Width = 519 Height = 396 Caption = 'Palette Editor' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 0 Top = 356 Width = 511 Height = 13 Align = alBottom end object ColDemo: TPaintBox Left = 8 Top = 160 Width = 25 Height = 25 end object Label2: TLabel Left = 8 Top = 200 Width = 3 Height = 13 end object Red: TLabel Left = 56 Top = 160 Width = 20 Height = 13 Caption = 'Red' end object Green: TLabel Left = 56 Top = 192 Width = 29 Height = 13 Caption = 'Green' end object Blue: TLabel Left = 56 Top = 224 Width = 21 Height = 13 Caption = 'Blue' end object PalSample: TImage Left = 0 Top = 0 Width = 511 Height = 145 Align = alTop OnMouseDown = PalSampleMouseDown OnMouseMove = PalSampleMouseMove end object ColSample: TImage Left = 8 Top = 216 Width = 25 Height = 25 end object Blend: TButton Left = 8 Top = 312 Width = 49 Height = 25 Caption = 'Blend' TabOrder = 0 OnClick = BlendClick end object Rndm: TButton Left = 64 Top = 312 Width = 57 Height = 25 Caption = 'Random' TabOrder = 1 OnClick = RndmClick end object Edit1: TEdit Left = 8 Top = 248 Width = 33 Height = 21 TabOrder = 2 Text = '0' OnKeyDown = Edit1KeyDown end object Refrsh: TButton Left = 216 Top = 312 Width = 57 Height = 25 Caption = 'Refresh' TabOrder = 3 OnClick = RefrshClick end object Blur: TButton Left = 128 Top = 312 Width = 33 Height = 25 Caption = 'Blur' TabOrder = 4 OnClick = BlurClick end object Move: TButton Left = 168 Top = 312 Width = 41 Height = 25 Caption = 'Move' TabOrder = 5 end object REdit: TEdit Left = 96 Top = 160 Width = 121 Height = 21 TabOrder = 6 Text = '0' OnKeyDown = REditKeyDown end object GEdit: TEdit Left = 96 Top = 192 Width = 121 Height = 21 TabOrder = 7 Text = '0' OnKeyDown = GEditKeyDown end object BEdit: TEdit Left = 96 Top = 224 Width = 121 Height = 21 TabOrder = 8 Text = '0' OnKeyDown = BEditKeyDown end object AppPal: TButton Left = 336 Top = 216 Width = 75 Height = 25 Caption = 'Apply Palette' TabOrder = 9 OnClick = AppPalClick end end