object Form4: TForm4 Left = 185 Top = 209 BorderStyle = bsNone Caption = 'Komputerowy Katalog P�yt' ClientHeight = 167 ClientWidth = 448 Color = clTeal Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object ColorPanel1: TColorPanel Left = 0 Top = 0 Width = 448 Height = 167 Align = alClient BorderWidth = 5 BevelWidth = 2 BevelInner = bvRaised BevelOuter = bvNone Color = clTeal object LabelEffect1: TLabelEffect Left = 12 Top = 8 Width = 413 Height = 29 DepthShadow = 5 DirectionHighlight = edDownRight ColourHighlight = clBlack GraduateFrom = clWindowText EffectStyle = esFlying ColourScheme = csCustom Alignment = taCenter Caption = 'Komputerowy Katalog P�yt 1998' Font.Color = clYellow Font.Height = -21 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False end object LabelEffect2: TLabelEffect Left = 12 Top = 36 Width = 417 Height = 25 DepthShadow = 5 DirectionHighlight = edDownRight ColourHighlight = clBlack GraduateFrom = clWindowText EffectStyle = esFlying ColourScheme = csCustom Alignment = taCenter Caption = 'Pierwsze uruchomienie programu - rejestracja' Font.Color = clYellow Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LabelEffect3: TLabelEffect Left = 12 Top = 64 Width = 133 Height = 29 DepthShadow = 5 DirectionHighlight = edDownRight ColourHighlight = clBlack GraduateFrom = clWindowText EffectStyle = esFlying ColourScheme = csCustom Alignment = taRightJustify Caption = 'Imi� i nazwisko' Font.Color = clYellow Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LabelEffect4: TLabelEffect Left = 12 Top = 92 Width = 133 Height = 25 DepthShadow = 5 DirectionHighlight = edDownRight ColourHighlight = clBlack GraduateFrom = clWindowText EffectStyle = esFlying ColourScheme = csCustom Alignment = taRightJustify Caption = 'Firma' Font.Color = clYellow Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Edit1: TEdit Left = 160 Top = 64 Width = 257 Height = 21 TabOrder = 0 end object Edit2: TEdit Left = 160 Top = 92 Width = 257 Height = 21 TabOrder = 1 end object b_OK: TColorButton Left = 160 Top = 128 Width = 128 Height = 25 BevelSize = 1 Caption = 'OK' Color = clTeal Font.Color = clYellow Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Style = [bsCenter, bsShowFocus, bsShowKey] TabOrder = 2 TabStop = True OnClick = b_OKClick end end end