home *** CD-ROM | disk | FTP | other *** search
- object Btnciszak: TBtnciszak
- Left = 124
- Top = 115
- HelpContext = 20
- ActiveControl = dxButton1
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = '��seln�k z�kazn�k�'
- ClientHeight = 406
- ClientWidth = 478
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 216
- Width = 465
- Height = 153
- Shape = bsFrame
- IsControl = True
- end
- object Label2: TLabel
- Left = 128
- Top = 224
- Width = 87
- Height = 13
- Caption = 'N�ze&v spole�nosti'
- FocusControl = EFirma
- end
- object Label3: TLabel
- Left = 264
- Top = 224
- Width = 24
- Height = 13
- Caption = '&Ulice'
- FocusControl = EUlice
- end
- object Label4: TLabel
- Left = 400
- Top = 224
- Width = 21
- Height = 13
- Caption = 'PS&�'
- FocusControl = EPSC
- end
- object Label8: TLabel
- Left = 376
- Top = 272
- Width = 17
- Height = 13
- Caption = '&Fax'
- FocusControl = EFAx
- end
- object Label7: TLabel
- Left = 280
- Top = 272
- Width = 36
- Height = 13
- Caption = 'Tele&fon'
- FocusControl = ETel
- end
- object Label6: TLabel
- Left = 192
- Top = 272
- Width = 18
- Height = 13
- Caption = '&DI�'
- FocusControl = EDIC
- end
- object Label5: TLabel
- Left = 104
- Top = 272
- Width = 18
- Height = 13
- Caption = '&I�O'
- FocusControl = EICO
- end
- object Label13: TLabel
- Left = 24
- Top = 272
- Width = 29
- Height = 13
- Caption = '&M�sto'
- FocusControl = EMesto
- end
- object Label9: TLabel
- Left = 24
- Top = 320
- Width = 27
- Height = 13
- Caption = 'e-&mail'
- FocusControl = EEmail
- end
- object Label10: TLabel
- Left = 248
- Top = 320
- Width = 120
- Height = 13
- Caption = 'Domovsk� str�nka (U&RL)'
- FocusControl = EURL
- end
- object Label1: TLabel
- Left = 24
- Top = 224
- Width = 61
- Height = 13
- Caption = '�. z�kazn�ka'
- end
- object Label11: TLabel
- Left = 8
- Top = 8
- Width = 90
- Height = 13
- Caption = '&Seznam z�kazn�k�'
- FocusControl = SzZak
- end
- object EFirma: TEdit
- Left = 128
- Top = 240
- Width = 129
- Height = 21
- TabOrder = 2
- Text = 'EFirma'
- OnExit = EFirmaExit
- end
- object EUlice: TEdit
- Left = 264
- Top = 240
- Width = 129
- Height = 21
- TabOrder = 3
- Text = 'EUlice'
- OnExit = EUliceExit
- end
- object EPSC: TEdit
- Left = 400
- Top = 240
- Width = 57
- Height = 21
- TabOrder = 4
- Text = 'EPSC'
- OnExit = EPSCExit
- end
- object EFAx: TEdit
- Left = 376
- Top = 288
- Width = 81
- Height = 21
- TabOrder = 9
- Text = 'fax'
- OnExit = EFAxExit
- end
- object ETel: TEdit
- Left = 280
- Top = 288
- Width = 89
- Height = 21
- TabOrder = 8
- Text = 'ETel'
- OnExit = ETelExit
- end
- object EDIC: TEdit
- Left = 192
- Top = 288
- Width = 81
- Height = 21
- TabOrder = 7
- Text = 'EDIC'
- OnExit = EDICExit
- end
- object EICO: TEdit
- Left = 104
- Top = 288
- Width = 81
- Height = 21
- TabOrder = 6
- Text = 'EICO'
- OnExit = EICOExit
- end
- object EMesto: TEdit
- Left = 24
- Top = 288
- Width = 73
- Height = 21
- TabOrder = 5
- Text = 'EMesto'
- OnExit = EMestoExit
- end
- object EEmail: TEdit
- Left = 24
- Top = 336
- Width = 217
- Height = 21
- TabOrder = 10
- Text = 'EEmail'
- OnExit = EEmailExit
- end
- object EURL: TEdit
- Left = 248
- Top = 336
- Width = 209
- Height = 21
- TabOrder = 11
- Text = 'EURL'
- OnExit = EURLExit
- end
- object ECislo: TEdit
- Left = 24
- Top = 240
- Width = 97
- Height = 21
- MaxLength = 8
- TabOrder = 1
- Text = 'ECislo'
- OnExit = ECisloExit
- OnKeyPress = ECisloKeyPress
- end
- object SzZak: TListBox
- Left = 9
- Top = 24
- Width = 234
- Height = 185
- Hint = 'Kompletn� seznam z�kazn�ku s jejich identifika�n�mi ��sly'
- BorderStyle = bsNone
- ItemHeight = 13
- TabOrder = 0
- OnClick = SzZakClick
- OnDblClick = SzZakDblClick
- end
- object GroupBox1: TGroupBox
- Left = 248
- Top = 18
- Width = 225
- Height = 191
- Caption = ' �prava/editace ��seln�ku '
- TabOrder = 12
- object Label15: TLabel
- Left = 8
- Top = 100
- Width = 147
- Height = 13
- Caption = 'Vy&hled�n� dle ��sla z�kazn�ka :'
- FocusControl = EID
- end
- object Label12: TLabel
- Left = 88
- Top = 22
- Width = 42
- Height = 13
- Caption = 'P�ed�&�sl�'
- end
- object Label14: TLabel
- Left = 8
- Top = 56
- Width = 183
- Height = 13
- Caption = 'Vyhled�n� dle ��sti n�vzu spole�nosti :'
- end
- object EID: TEdit
- Left = 8
- Top = 117
- Width = 208
- Height = 21
- Hint = 'Vyhled� z�kazn�ka podle vlo�en�ho identifika�n�ho ��sla'
- MaxLength = 8
- TabOrder = 3
- OnChange = EIDChange
- end
- object BitBtn1: TdxButton
- Left = 8
- Top = 16
- Hint =
- 'Vlo�en� nov�ho z�kazn�ka '#13#10'Anuluje edita�n� pole a dle nastaven�' +
- 'ho p�ed��sl� vyhled� nejvy��� '#13#10'volnou pozici ��sla z�kazn�ka'
- ParentShowHint = False
- ShowHint = True
- About = 'Design eXperience. � 2002 M. Hoffmann'
- Version = '1.0.2g'
- OnClick = BitBtn1Click
- Caption = 'P&�iprav'
- TabOrder = 0
- end
- object Epredc: TEdit
- Left = 144
- Top = 17
- Width = 72
- Height = 21
- Hint =
- 'P�i nevypln�n� tohoto pole bude p�i�azeno nejv�t�� neobsazen� ��' +
- 'slo'
- MaxLength = 6
- TabOrder = 1
- end
- object EVyhled: TEdit
- Left = 8
- Top = 72
- Width = 209
- Height = 21
- Hint =
- 'Zadejte �et�zec pro vyhled�n� v n�zvu spole�nosti z�kazn�ka a st' +
- 'iskn�te F10'#13#10'Op�tovn�m stiskem kl�vesy F10 se p�esunete na dal��' +
- ' v�skyt �et�zce.'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnChange = EVyhledChange
- OnKeyDown = EVyhledKeyDown
- end
- object btSmaz: TdxButton
- Left = 8
- Top = 152
- Width = 208
- Hint =
- 'Trvale odtran� vybran�ho z�kazn�ka z datab�ze a uvoln� jeho ��sl' +
- 'o'
- ParentShowHint = False
- ShowHint = True
- About = 'Design eXperience. � 2002 M. Hoffmann'
- Version = '1.0.2g'
- OnClick = btSmazClick
- Caption = 'Smazat pr�v� vybran�ho z�kazn�ka'
- TabOrder = 4
- end
- end
- object dxButton1: TdxButton
- Left = 154
- Top = 376
- Width = 82
- About = 'Design eXperience. � 2002 M. Hoffmann'
- Version = '1.0.2g'
- OnClick = OKBtnClick
- Caption = 'OK'
- TabOrder = 13
- Default = True
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000800000
- 8000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF00000000800000FF0000FF00008000000000FF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000800000FF0000FF0000
- FF0000FF00008000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- 00000000800000FF00FFFFFF00000000FF0000FF0000FF00008000000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000FF00FFFFFF000000FF00FF00
- 000000FF0000FF0000FF00008000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FF000000000000FF00FFFF00FFFF00FF00000000FF0000FF0000FF000080
- 00000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FF00000000FF0000FF0000FF00008000000000FF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000FF0000FF
- 0000FF00000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FF00000000FF0000FF00000000FF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000
- 00000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- end
- object dxButton2: TdxButton
- Left = 243
- Top = 376
- Width = 81
- Hint = 'Zav�en� dialogov�ho okna bez ulo�en� zm�n'
- About = 'Design eXperience. � 2002 M. Hoffmann'
- Version = '1.0.2g'
- OnClick = dxButton2Click
- Caption = 'Storno'
- TabOrder = 14
- Cancel = True
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 1800000000000003000000000000000000000000000000000000FF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FF000000000000000000FF00FFFF00FFFF00FFFF00FF0000000000000000
- 00FF00FFFF00FFFF00FFFF00FFFF00FF0000000000FF0000FF000080000000FF
- 00FFFF00FF000000000080000080000080000000FF00FFFF00FFFF00FFFF00FF
- 000000FFFFFF0000FF0000FF0000800000000000000000800000FF0000FF0000
- 80000000FF00FFFF00FFFF00FFFF00FFFF00FF000000FFFFFF0000FF0000FF00
- 00800000800000FF0000FF000080000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF0000000000FF0000FF0000FF0000FF0000FF000080000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000FF00
- 00FF0000FF000080000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FF0000000000FF0000FF0000FF0000FF0000FF000080000000FF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000FF0000FF0000FF00
- 00FF0000FF0000FF0000FF000080000000FF00FFFF00FFFF00FFFF00FFFF00FF
- 000000FFFFFF0000FF0000FF0000FF0000000000000000FF0000FF0000FF0000
- 80000000FF00FFFF00FFFF00FF000000FFFFFF0000FF0000FF0000FF000000FF
- 00FFFF00FF0000000000FF0000FF000080000000FF00FFFF00FFFF00FF000000
- 0000FF0000FF0000FF000000FF00FFFF00FFFF00FFFF00FF0000000000FF0000
- 80000000FF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FF
- FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
- FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
- 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
- end
- end
-