home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-01-04 | 77.1 KB | 3,418 lines |
- object fMain: TfMain
- Left = 268
- Top = 30
- Width = 799
- Height = 600
- ActiveControl = Button64
- BorderIcons = [biSystemMenu, biMinimize]
- Caption =
- ' PostBank� - wersja demonstracyjna �JaPa Software ��d� tel. 0' +
- '42/ 650 58 59 e-mail: japasoft@polbox.com'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poDefault
- Scaled = False
- OnActivate = FormActivate
- OnClose = FormClose
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label73: TLabel
- Left = 500
- Top = 144
- Width = 278
- Height = 29
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label72: TLabel
- Left = 500
- Top = 108
- Width = 278
- Height = 29
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label71: TLabel
- Left = 500
- Top = 88
- Width = 278
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label75: TLabel
- Left = 108
- Top = 176
- Width = 278
- Height = 13
- Alignment = taRightJustify
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label63: TLabel
- Left = 108
- Top = 144
- Width = 278
- Height = 29
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label62: TLabel
- Left = 108
- Top = 108
- Width = 278
- Height = 29
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label61: TLabel
- Left = 108
- Top = 88
- Width = 278
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label64: TLabel
- Left = 416
- Top = 88
- Width = 44
- Height = 13
- Caption = 'Adresat'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label65: TLabel
- Left = 416
- Top = 108
- Width = 33
- Height = 13
- Caption = 'Adres'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label66: TLabel
- Left = 416
- Top = 144
- Width = 78
- Height = 13
- Caption = 'Bank i nr r-ku'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label67: TLabel
- Left = 20
- Top = 144
- Width = 78
- Height = 13
- Caption = 'Bank i nr r-ku'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label60: TLabel
- Left = 20
- Top = 108
- Width = 33
- Height = 13
- Caption = 'Adres'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label59: TLabel
- Left = 20
- Top = 88
- Width = 54
- Height = 13
- Caption = 'Nadawca'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label23: TLabel
- Left = 416
- Top = 200
- Width = 131
- Height = 13
- Caption = 'Poszukiwany ci�g znak�w :'
- end
- object Label24: TLabel
- Left = 20
- Top = 200
- Width = 131
- Height = 13
- Caption = 'Poszukiwany ci�g znak�w :'
- end
- object Label57: TLabel
- Left = 12
- Top = 8
- Width = 66
- Height = 16
- Caption = 'Nadawca'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label58: TLabel
- Left = 408
- Top = 8
- Width = 55
- Height = 16
- Caption = 'Adresat'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label76: TLabel
- Left = 20
- Top = 176
- Width = 44
- Height = 13
- Caption = 'Telefon'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label77: TLabel
- Left = 416
- Top = 176
- Width = 44
- Height = 13
- Caption = 'Telefon'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label78: TLabel
- Left = 500
- Top = 176
- Width = 278
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '-'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Klucz2: TLabel
- Left = 600
- Top = 180
- Width = 32
- Height = 13
- Caption = 'Klucz2'
- Visible = False
- end
- object Klucz1: TLabel
- Left = 204
- Top = 180
- Width = 32
- Height = 13
- Caption = 'Klucz1'
- Visible = False
- end
- object Button64: TButton
- Left = 100
- Top = 4
- Width = 287
- Height = 21
- Caption = 'Zam�wienie programu PostBank� e-mail'#39'em'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 33
- OnClick = Button64Click
- OnEnter = Button64Enter
- OnExit = Button64Exit
- end
- object RadioGroup1: TRadioGroup
- Left = 8
- Top = 256
- Width = 381
- Height = 285
- Caption = ' Lista druk�w '
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Items.Strings = (
- 'przelew bankowy'
- 'wp�ata na konto/druk 3-cz.'
- 'wp�ata na konto/druk 4-cz.'
- 'potw. nadania listu poleconego'
- 'pobranie pocztowe - stare'
- 'pobranie pocztowe - nowe'
- 'koperta A4'
- 'koperta A5'
- 'koperta A6'
- 'koperta C6'
- 'paczka'
- 'przekaz telegraficzny'
- 'przekaz pocztowy'
- 'etykieta adresowa')
- ParentFont = False
- TabOrder = 13
- OnClick = RadioGroup1Click
- end
- object Memo3: TMemo
- Left = 112
- Top = 296
- Width = 45
- Height = 21
- Lines.Strings = (
- 'Memo3')
- TabOrder = 32
- Visible = False
- end
- object GroupBox3: TGroupBox
- Left = 404
- Top = 256
- Width = 381
- Height = 253
- Caption = ' Dodatkowe dane '
- TabOrder = 14
- object Label10: TLabel
- Left = 12
- Top = 20
- Width = 164
- Height = 13
- Caption = 'Kwota przelewu/przekazu z�otych'
- end
- object Label11: TLabel
- Left = 12
- Top = 40
- Width = 107
- Height = 13
- Caption = 'Tytu� wp�aty/przelewu'
- end
- object Label21: TLabel
- Left = 12
- Top = 60
- Width = 84
- Height = 13
- Caption = 'Zawarto�� paczki'
- end
- object Label22: TLabel
- Left = 12
- Top = 80
- Width = 112
- Height = 13
- Caption = 'Warto�� paczki z�otych'
- end
- object Edit10: TEdit
- Left = 204
- Top = 16
- Width = 169
- Height = 21
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 10
- ParentFont = False
- TabOrder = 0
- Text = '0,00'
- OnEnter = Edit10Enter
- OnExit = Edit10Exit
- end
- object Edit20: TComboBox
- Left = 204
- Top = 36
- Width = 169
- Height = 21
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 13
- MaxLength = 25
- ParentFont = False
- TabOrder = 2
- OnEnter = Edit20Enter
- OnExit = Edit20Exit
- end
- object Edit21: TComboBox
- Left = 204
- Top = 56
- Width = 169
- Height = 21
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 13
- MaxLength = 25
- ParentFont = False
- TabOrder = 4
- OnEnter = Edit21Enter
- OnExit = Edit21Exit
- end
- object Edit22: TEdit
- Left = 204
- Top = 76
- Width = 169
- Height = 21
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 10
- ParentFont = False
- TabOrder = 5
- Text = '0,00'
- OnEnter = Edit22Enter
- OnExit = Edit22Exit
- end
- object b_plus1: TButton
- Left = 184
- Top = 40
- Width = 17
- Height = 17
- Caption = '...'
- TabOrder = 1
- OnClick = b_plus1Click
- end
- object b_plus2: TButton
- Left = 184
- Top = 60
- Width = 17
- Height = 17
- Caption = '...'
- TabOrder = 3
- OnClick = b_plus2Click
- end
- end
- object p_ksiazka_nadawcza: TPanel
- Left = 404
- Top = 360
- Width = 381
- Height = 149
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 15
- object Label85: TLabel
- Left = 20
- Top = 5
- Width = 353
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Pocztowa Ksi��ka Nadawcza'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label29: TLabel
- Left = 12
- Top = 20
- Width = 133
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Adresat'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label86: TLabel
- Left = 252
- Top = 20
- Width = 57
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Warto��'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label87: TLabel
- Left = 312
- Top = 20
- Width = 61
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Pobranie'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label88: TLabel
- Left = 152
- Top = 20
- Width = 93
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Miejscowo��'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object ListPobranie: TListBox
- Left = 312
- Top = 36
- Width = 61
- Height = 73
- TabStop = False
- ItemHeight = 13
- TabOrder = 3
- end
- object ListWartosc: TListBox
- Left = 248
- Top = 36
- Width = 65
- Height = 73
- TabStop = False
- ItemHeight = 13
- TabOrder = 2
- end
- object ListAdres: TListBox
- Left = 148
- Top = 36
- Width = 101
- Height = 73
- TabStop = False
- ItemHeight = 13
- TabOrder = 1
- end
- object ListName: TListBox
- Left = 8
- Top = 36
- Width = 141
- Height = 73
- TabStop = False
- ItemHeight = 13
- TabOrder = 0
- end
- object b_ksiazka: TButton
- Left = 8
- Top = 116
- Width = 141
- Height = 25
- Caption = 'Dopisanie do Ksi��ki'
- TabOrder = 4
- OnClick = b_ksiazkaClick
- end
- object b_pokaz: TButton
- Left = 148
- Top = 116
- Width = 101
- Height = 25
- Caption = 'Druk Ksi��ki'
- TabOrder = 5
- OnClick = b_pokazClick
- end
- object b_clear: TButton
- Left = 248
- Top = 116
- Width = 125
- Height = 25
- Caption = 'Kasowanie zawarto�ci'
- TabOrder = 6
- OnClick = b_clearClick
- end
- end
- object Panel2: TPanel
- Left = 200
- Top = 264
- Width = 185
- Height = 273
- BevelOuter = bvNone
- Color = clWhite
- TabOrder = 29
- object Image1: TImage
- Left = 4
- Top = 4
- Width = 177
- Height = 265
- Center = True
- Picture.Data = {<image001.bmp>}
- end
- end
- object Button13: TButton
- Left = 404
- Top = 56
- Width = 381
- Height = 25
- Caption = 'Dodaj - usu� - zmie� wpis w Bazie adresat�w'
- TabOrder = 8
- OnClick = Button13Click
- end
- object Lista_adresatow: TComboBox
- Left = 404
- Top = 28
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clMaroon
- DropDownCount = 30
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- TabOrder = 7
- OnChange = Lista_adresatowChange
- OnClick = Lista_adresatowChange
- OnEnter = Lista_adresatowEnter
- end
- object Lista_nadawcow: TComboBox
- Left = 8
- Top = 28
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clTeal
- DropDownCount = 30
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- TabOrder = 0
- OnClick = Lista_nadawcowChange
- OnEnter = Lista_nadawcowEnter
- end
- object Button12: TButton
- Left = 8
- Top = 56
- Width = 381
- Height = 25
- Caption = 'Dodaj - usu� - zmie� wpis w Bazie nadawc�w'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Button12Click
- end
- object b_drukuj1: TButton
- Left = 8
- Top = 548
- Width = 126
- Height = 25
- Caption = 'Drukowanie bez druku'
- Enabled = False
- TabOrder = 17
- OnClick = b_drukuj1Click
- end
- object b_drukuj2: TButton
- Left = 133
- Top = 548
- Width = 130
- Height = 25
- Caption = 'Drukowanie na druku'
- TabOrder = 18
- OnClick = b_drukuj2Click
- end
- object ciag_2: TEdit
- Left = 556
- Top = 196
- Width = 133
- Height = 21
- TabStop = False
- MaxLength = 30
- TabOrder = 9
- OnEnter = ciag_2Enter
- OnExit = ciag_2Exit
- end
- object ciag_1: TEdit
- Left = 160
- Top = 196
- Width = 133
- Height = 21
- TabStop = False
- MaxLength = 30
- TabOrder = 2
- OnEnter = ciag_1Enter
- OnExit = ciag_1Exit
- end
- object b_szukaj1: TButton
- Left = 300
- Top = 196
- Width = 89
- Height = 21
- Caption = 'Szukaj'
- TabOrder = 3
- TabStop = False
- OnClick = b_szukaj1Click
- end
- object b_szukaj2: TButton
- Left = 696
- Top = 196
- Width = 89
- Height = 21
- Caption = 'Szukaj'
- TabOrder = 10
- TabStop = False
- OnClick = b_szukaj2Click
- end
- object find1: TComboBox
- Left = 8
- Top = 224
- Width = 381
- Height = 24
- TabStop = False
- Style = csDropDownList
- Color = clTeal
- DropDownCount = 13
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- Sorted = True
- TabOrder = 11
- OnChange = find1Change
- end
- object find2: TComboBox
- Left = 404
- Top = 224
- Width = 381
- Height = 24
- TabStop = False
- Style = csDropDownList
- Color = clMaroon
- DropDownCount = 13
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- Sorted = True
- TabOrder = 12
- OnChange = find2Change
- end
- object b_odwrotny: TButton
- Left = 262
- Top = 548
- Width = 99
- Height = 25
- Caption = 'Druk odwrotny'
- TabOrder = 19
- OnClick = b_odwrotnyClick
- end
- object p_opcje: TPanel
- Left = 484
- Top = 88
- Width = 165
- Height = 45
- BevelOuter = bvNone
- TabOrder = 24
- Visible = False
- object Label28: TLabel
- Left = 28
- Top = 20
- Width = 127
- Height = 20
- Caption = 'Panel ustawie�'
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Drukarka: TRadioGroup
- Left = 24
- Top = 48
- Width = 141
- Height = 105
- Caption = ' Wybierz rodzaj drukarki '
- ItemIndex = 1
- Items.Strings = (
- 'ig�owa'
- 'atramentowa'
- 'laserowa')
- TabOrder = 0
- end
- object MultiLineBtn1: TMultiLineBtn
- Left = 24
- Top = 176
- Width = 141
- Height = 25
- Caption = 'Ustawienia drukarki'
- TabOrder = 1
- OnClick = MultiLineBtn1Click
- end
- object Button2: TButton
- Left = 24
- Top = 220
- Width = 141
- Height = 25
- Caption = 'Zamknij panel ustawie�'
- TabOrder = 2
- OnClick = Button2Click
- end
- end
- object b_drukuj_seria: TButton
- Left = 360
- Top = 548
- Width = 181
- Height = 25
- Caption = 'Lista druku seryjnego'
- TabOrder = 20
- OnClick = b_drukuj_seriaClick
- end
- object b_urzedy: TButton
- Left = 544
- Top = 4
- Width = 81
- Height = 21
- Caption = 'Urz�dy'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- OnClick = b_urzedyClick
- end
- object b_opcje: TButton
- Left = 540
- Top = 548
- Width = 137
- Height = 25
- Caption = 'Drukarka'
- TabOrder = 21
- TabStop = False
- OnClick = b_opcjeClick
- end
- object b_zamknij: TButton
- Left = 676
- Top = 548
- Width = 109
- Height = 25
- Caption = 'Zamknij'
- TabOrder = 22
- OnClick = b_zamknijClick
- end
- object b_firmy: TButton
- Left = 624
- Top = 4
- Width = 81
- Height = 21
- Caption = 'Firmy'
- TabOrder = 5
- OnClick = b_firmyClick
- end
- object b_prywatne: TButton
- Left = 704
- Top = 4
- Width = 81
- Height = 21
- Caption = 'Prywatne'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = b_prywatneClick
- end
- object Memo2: TMemo
- Left = 200
- Top = 261
- Width = 189
- Height = 280
- TabStop = False
- Alignment = taCenter
- Lines.Strings = (
- 'PostBank�'
- 'JaPa Software ��d�'
- 'tel. 042/ 650 58 59'
- 'e-mail:japasoft@polbox.com'
- '==========================='
- 'PostBank� - to program do '
- 'adresowania kopert, etykiet '
- 'adresowych, wype�niania wszelkich '
- 'druk�w pocztowych i bankowych '
- 'oraz prowadzenia Bazy '
- 'teleadresowej. Pozwala na '
- 'uporz�dkowanie ca�ej '
- 'korespondencji wychodz�cej z '
- 'firmy, biura lub domu. Prostota '
- 'obs�ugi - to co� co wyr�nia ten '
- 'program. Kontrolowanie '
- 'poprawno�ci pocztowych numer�w '
- 'adresowych (kod�w), pozwoli na '
- 'bezb��dne adresowanie przesy�ek - '
- 'a co za tym idzie - na szybsze jej '
- 'dostarczenie do adresata. Program '
- 'obs�uguje drukowanie seryjne, np. '
- 'etykiet adresowych, kopert i innych. '
- 'Jest przeznaczony do pracy w '
- 'rozdzielczo�ci min. 800x600. '
- 'Wsp�pracuje z drukarkami '
- 'atramentowymi i laserowymi. Jest '
- 'przystosowany do nowego podzia�u '
- 'terytorialnego kraju. '
- '"Przygotowany" na rok 2000 - '
- 'zapewnia bezb��dn� prac� po '
- 'wkroczeniu w nowe tysi�clecie. '
- 'Wsp�pracuje z naszymi '
- 'programami ksi�gowymi. '
- 'Cena pe�nej wersji programu to '
- 'tylko'
- '69,00 z� z VAT.'
- 'Prezent !!! Do ka�dego programu '
- 'jest dodawana nieodp�atnie '
- 'Ksi��ka Kodowa: Polska.'
- 'Wystawiamy faktury VAT.'
- '==========================='
- 'Inne opcje programu (np. dla '
- 'drukarek ig�owych, z inn� ksi��k� '
- 'kodow� itd.) - po uzgodnieniu '
- 'telefonicznym lub mail'#39'owym.'
- 'W ofercie posiadamy aktualnie '
- 'Ksi��ki Kodowe : Czechy, '
- 'Szwajcaria, Dania, Rumunia, '
- 'Bu�garia, Holandia, Chorwacja, '
- 'S�owenia, W�ochy, Australia (cena '
- 'jednostkowa 19,00 z� z VAT). '
- 'Uwaga! Oferta specjalna dla '
- 'klient�w zamawiaj�cych wersj� ze '
- 'wszystkimi ksi��kami kodowymi: '
- '99,00 z� z VAT.'
- ''
- 'INSTRUKCJA OBS�UGI'
- ''
- '1. Dodawanie nadawcy :'
- '- nacisn�� "Dodaj - Usu� ..." po '
- 'stronie: Nadawca;'
- '- w nowo otwartym okienku '
- 'nacisn�� "Nowy";'
- '- wype�ni� kolejne rubryki;'
- '- nacisn�� "Dodaj do rejestru '
- 'nadawc�w";'
- '- zamkn�� okienko naciskaj�c '
- '"Powr�t".'
- ''
- '2. Dodawanie adresata :'
- '- nacisn�� "Dodaj - Usu� ..." po '
- 'stronie: Adresat;'
- '- w nowo otwartym okienku '
- 'nacisn�� "Nowy";'
- '- wype�ni� kolejne rubryki;'
- '- nacisn�� "Dodaj do rejestru '
- 'adresat�w";'
- '- wybra� grup�, w kt�rej dokonany '
- 'wpis b�dzie przechowywany '
- '(mo�na doda� tego samego '
- 'adresata do wszystkich grup '
- 'naciskaj�c ponownie "Dodaj do '
- 'rejestru ..." i wybieraj�c inn� grup�);'
- '- zamkn�� okienko naciskaj�c '
- '"Powr�t".'
- ''
- '3. Aby wybra� ��danego Nadawc� '
- 'nale�y wybra� go z listy : '
- '"Nadawca". Po wybraniu '
- 'odpowiednie rubryki (Nadawca, '
- 'Adres ...) powinny zosta� '
- 'wype�nione.'
- ''
- '4. Aby wybra� ��danego Adresata '
- 'nale�y nacisn�� przycisk '
- 'odpowiadaj�cy grupie, z kt�rej '
- 'chcemy pobra� dane adresata, a '
- 'nast�pnie wybra� go z listy : '
- '"Adresat". Po wybraniu - '
- 'odpowiednie rubryki (Nadawca, '
- 'Adres ...) powinny zosta� '
- 'wype�nione (program domy�lnie po '
- 'uruchomieniu wczytuje grup�: '
- '"Prywatne", co jest uwidocznione '
- 'poprzez pogrubienie napisu na '
- 'okre�lonym klawiszu).'
- ''
- '5. Zmiany w adresie nadawcy lub '
- 'adresata.'
- 'Aby tego dokona� nale�y po '
- 'wybraniu ��danego '
- 'Nadawcy/Adresata nacisn�� '
- '"Dodaj - Usu� ..." i po '
- 'wprowadzeniu odpowiednich zmian '
- 'nacisn�� "Zapisz zmiany".'
- ''
- '6. Wyszukiwanie '
- 'nadawcy/adresata wg okre�lonego '
- 'ci�gu znak�w.'
- 'Procedur� wyszukiwania nale�y '
- 'zacz�� od wpisania w pole '
- '"Poszukiwany ci�g znak�w": '
- 'klucza, wg kt�rego program ma '
- 'wyszuka� Nadawc�/Adresata '
- '(Uwaga! Wa�na jest wielko�� '
- 'wprowadzanych liter). Kluczem tym '
- 'mo�e by� dowolny ci�g znak�w '
- '(np. Wars). Po naci�ni�ciu "Szukaj" '
- '- program odnajdzie ��dane adresy '
- 'zawieraj�ce ci�g liter: Wars (np. '
- 'adresy zawieraj�ce : miasto '
- 'Warszawa, ulica Warszawska lub '
- 'firm� o nazwie Wars). Nale�y przy '
- 'tym pami�ta�, i� w przypadku '
- 'adresat�w program dokonuje '
- 'przeszukania tylko w aktywnej '
- 'grupie (np. "Prywatne"). Znaleziona '
- 'lista nadawc�w/adresat�w zostanie '
- 'wczytana do listy poni�ej klawisza '
- '"Szukaj". Wykaz znalezionych '
- 'adresat�w zostaje r�wnie� '
- 'automatycznie zapisany na li�cie '
- '"Drukowania seryjnego".'
- ''
- '7. Adresowanie.'
- 'Po wybraniu (z listy) nadawcy '
- 'przesy�ki, nale�y wybra� adresata '
- 'oraz zaznaczy�, jakiego typu '
- 'blankiet lub koperta b�dzie '
- 'wype�niany. W tym okienku pojawi '
- 'si� w�wczas schematyczny rysunek '
- 'blankietu wraz z opisem sposobu '
- 'podawania go do '
- 'drukarki.Poniewa� na niekt�rych '
- 'formularzach konieczne jest '
- 'umieszczenie dodatkowych danych '
- 'mo�na je okre�li� wykorzystuj�c '
- 'przeznaczone do tego pola. Wpisa� '
- 'tu mo�emy:'
- '-kwot� przelewu lub przekazu '
- 'cyframi (w druku pojawi si� ona '
- 'r�wnie� w postaci s�ownej),'
- '-tytu� wp�aty b�d� przelewu na '
- 'konto (po klikni�ciu na odpowiedni '
- 'kwadracik z wielokropkiem mo�emy '
- 'uzupe�nia� wpisy dodatkowego '
- 'okienka, aby p�niej korzysta� z '
- 'niego rozwijaj�c utworzon� w ten '
- 'spos�b list� tytu��w),'
- '-zawarto�� paczki tworz�c '
- 'analogicznie jak poprzednio wykaz '
- 'towar�w w postaci listy do '
- 'rozwini�cia,'
- '-warto�� paczki cyframi '
- '(wydrukowana ona zostanie '
- 'rownie� s�ownie).'
- 'Po uzupe�nieniu powy�szych '
- 'danych nale�y w�o�y� do drukarki '
- 'odpowiedni typ druku lub koperty i '
- 'nacisn�� "Drukowanie na druku". '
- 'Je�eli nie posiadamy okre�lonego '
- 'typu blankietu potrzebny formularz '
- 'wype�niony okre�lonymi wcze�niej '
- 'danymi otrzymamy po naci�ni�ciu '
- '"Drukowanie bez druku" i podaniu '
- 'do drukarki czystej kartki '
- 'odpowiedniego formatu. Niniejszy '
- 'program umo�liwia wydrukowanie '
- 'wi�kszej ilo�ci kopert lub blankiet�w '
- 'jednego typu (oczywi�cie z r�nymi '
- 'adresatami przy zachowaniu '
- 'niezmienno�ci pozosta�ych wpis�w) '
- 'za pomoc� pojedynczej komendy. '
- 'S�u�y do tego klawisz "Lista druku '
- 'seryjnego". Po jego naci�ni�ciu '
- 'otwiera si� okno, z kt�rego '
- 'wybieramy zgodnie ze '
- 'wskaz�wkami dowoln� ilo�� '
- 'adresat�w (funkcjonuj�ce tu listy '
- 'adresat�w "prywatnych", '
- '"urz�dowych" i "firmowych" s� od '
- 'siebie ca�kowicie niezale�ne). '
- 'Klikni�cie na klawisz "Drukowanie '
- 'seryjne" uruchamia proces '
- 'drukowania zaordynowanej ilo�ci '
- 'kopert lub blankiet�w. Dotyczy to '
- 'r�wnie� druku seryjnego etykiet '
- '(naklejek) adresowych. W '
- 'przypadku drukowania '
- 'pojedynczych etykiet korzystamy z '
- 'dodatkowego okienka otwieranego '
- 'przy wyborze rodzaju druku '
- '("etykieta adresowa"). Ukazuje nam '
- 'si� wtedy uk�ad etykiet na arkuszu, '
- 'z kt�rego wybieramy jak�� pozycj�. '
- 'Pozwala to wykorzysta� pozosta�e '
- 'jeszcze naklejki na u�ywanych '
- 'wcze�niej arkuszach. W pe�nej '
- 'wersji program obs�uguje kilka '
- 'r�nych format�w etykiet '
- 'adresowych. Przydatna w wielu '
- 'firmach oka�e si� zapewne funkcja '
- '"drukowania odwrotnego". '
- 'Oznacza ona zamian� adres�w '
- 'nadawcy i adresata na wydrukach. '
- 'Cz�sto w celu u�atwienia klientom '
- 'dokonania czynno�ci wysy�kowych '
- 'lub p�atniczych na nasz� rzecz '
- 'do��czamy do przesy�ek koperty '
- 'zwrotne, wype�nione blankiety itp. '
- 'Mo�emy je z �atwo�ci� '
- 'wydrukowa�, bez dokonywania '
- 'ponownych wpis�w, klikaj�c na '
- 'klawisz "Druk odwrotny".'
- ''
- '8. Ksi��ka Nadawcza.'
- 'W trakcie adresowania mo�na '
- 'wybranego adresata b�d� ca�� ich '
- 'list� (w przypadku druku seryjnego) '
- 'doda� do Ksi��ki Nadawczej bez '
- 'konieczno�ci jej posiadania. '
- 'Program wydrukuje stron� Ksi��ki w '
- 'jej oryginalnym kszta�cie wraz z '
- 'wype�nionymi rubrykami. Nale�y '
- 'pami�ta�, i� strona Ksi��ki '
- 'Nadawczej musi by� wydrukowana '
- 'w 2 egzemplarzach. W tym celu '
- 'nale�y w�o�y� do drukarki arkusz '
- 'papieru A4 i po wydrukowaniu '
- 'jednej strony mo�na ten sam arkusz '
- 'w�o�y� powt�rnie do drukarki '
- '"okr�caj�c" go o 180 stopni. W '
- 'efekcie tego - z�o�enie kartki na '
- 'p� - spowoduje (po w�o�eniu kalki '
- 'lub zastosowaniu papieru '
- 'samokopiuj�cego) mo�liwo�� '
- 'jednorazowego wype�nienia strony '
- 'Ksi��ki przez pracownika Poczty. '
- 'Poniewa� ka�da strona Ksi��ki '
- 'Nadawczej zawiera tylko dziesi�� '
- 'pozycji - nale�y pami�ta�, aby w '
- 'drukarce umie�ci� odpowiedni� '
- 'ilo�� arkuszy papieru wystarczaj�c� '
- 'na wydrukowanie wszystkich '
- 'adresat�w.'
- ''
- '9.Ksi��ka kodowa.'
- 'Umo�liwia ona znalezienie '
- 'nieznanego wcze�niej numeru kodu '
- 'lub sprawdzenie kodu ju� '
- 'wpisanego zar�wno w adresie '
- 'nadawcy jak i adresata. Po '
- 'dokonaniu wyboru z listy nadawc�w '
- 'albo adresat�w i wci�ni�ciu '
- 'klawisza "Znajd�, sprawd�...", w '
- 'dw�ch wolnych bia�ych polach '
- 'pojawi si� nazwa miasta i nazwa '
- 'ulicy wybranego nadawcy lub '
- 'adresata. Po klikni�ciu w klawisz '
- '"Szukaj" poni�ej zostanie '
- 'utworzona lista adres�w '
- 'odpowiadaj�cych podanym '
- 'parametrom. Trzeba j� rozwin�� i '
- 'odszuka� interesuj�cy nas '
- 'dok�adny adres. Odpowiedni numer '
- 'kodu pocztowego zostanie '
- 'wczytany do pola "Kod pocztowy". '
- 'Teraz mo�na b�dzie go doda� do '
- 'konkretnego adresu wciskaj�c '
- 'klawisz "Dodaj kod do...". Kod '
- 'mo�emy znale�� r�wnie�:'
- '- wpisuj�c r�cznie nazw� miasta i '
- 'ulicy w wolne bia�e pola okna '
- 'post�puj�c nast�pnie tak jak '
- 'opisano powy�ej'
- '- rozwijaj�c list� miejscowo�ci z '
- 'jednym numerem kodowym i '
- 'dokonuj�c w jej ramach wyboru'
- '- wybieraj�c z nast�pnej listy miasto '
- 'i rozwijaj�c poni�sz� list� z nazwami '
- 'ulic w ramach tego miasta.'
- 'Aby przyspieszy� wyszukiwanie '
- 'kodu, przy listach umieszczone s� '
- 'litery alfabetu. Wybranie jednej z '
- 'nich (tej na kt�r� zaczyna si� '
- 'nazwa miejscowo�ci lub ulicy) '
- 'pozwoli na skr�cenie ca�ego '
- 'procesu wyszukiwania numeru '
- 'kodowego poprzez wczytanie do '
- 'listy tylko nazw zaczynaj�cych si� '
- 'na wskazan� liter�. Dwucz�onowe '
- 'nazwy miast nie zawieraj� my�lnika '
- '(np. Bielsko Bia�a). Nale�y pami�ta� '
- 'o tym przy wpisywaniu nowych '
- 'adresat�w i nadawc�w.')
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 30
- end
- object Button61: TButton
- Left = 180
- Top = 520
- Width = 17
- Height = 17
- Caption = '?'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 31
- TabStop = False
- OnClick = Button61Click
- end
- object p_et1: TPanel
- Left = 116
- Top = 92
- Width = 213
- Height = 33
- TabOrder = 25
- Visible = False
- object Ety: TRadioGroup
- Left = 16
- Top = 16
- Width = 181
- Height = 229
- Caption = ' Zaznacz etykiet� do druku '
- Columns = 2
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Items.Strings = (
- 'nr 01'
- 'nr 02'
- 'nr 03'
- 'nr 04'
- 'nr 05'
- 'nr 06'
- 'nr 07'
- 'nr 08'
- 'nr 09'
- 'nr 10'
- 'nr 11'
- 'nr 12'
- 'nr 13'
- 'nr 14'
- 'nr 15'
- 'nr 16')
- ParentFont = False
- TabOrder = 0
- end
- object Button3: TButton
- Left = 16
- Top = 256
- Width = 181
- Height = 25
- Caption = 'Drukuj etykiet� adresow�'
- TabOrder = 1
- OnClick = Button3Click
- end
- object Button5: TButton
- Left = 16
- Top = 280
- Width = 181
- Height = 25
- Caption = 'Drukuj rozkr�j'
- TabOrder = 2
- OnClick = Button5Click
- end
- object Button6: TButton
- Left = 16
- Top = 304
- Width = 181
- Height = 25
- Caption = 'Czcionka do druku'
- TabOrder = 3
- OnClick = Button6Click
- end
- object Button4: TButton
- Left = 16
- Top = 328
- Width = 181
- Height = 25
- Caption = 'Zamknij'
- TabOrder = 4
- OnClick = Button4Click
- end
- end
- object p_kody: TPanel
- Left = 44
- Top = 92
- Width = 509
- Height = 37
- BevelOuter = bvNone
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 26
- Visible = False
- object Label39: TLabel
- Left = 312
- Top = 4
- Width = 201
- Height = 20
- Caption = 'Ksi��ka kodowa: Polska'
- Font.Color = clNavy
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label49: TLabel
- Left = 376
- Top = 24
- Width = 69
- Height = 13
- Caption = 'wersja 1.1pl'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label50: TLabel
- Left = 404
- Top = 220
- Width = 206
- Height = 20
- Caption = 'Kod pocztowy .................'
- Font.Color = clNavy
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label51: TLabel
- Left = 20
- Top = 44
- Width = 205
- Height = 13
- Caption = 'Lista miejscowo�ci z jednolitym PNA'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label52: TLabel
- Left = 20
- Top = 168
- Width = 52
- Height = 13
- Caption = 'Lista ulic'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label53: TLabel
- Left = 20
- Top = 116
- Width = 61
- Height = 13
- Caption = 'Lista miast'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label54: TLabel
- Left = 412
- Top = 64
- Width = 171
- Height = 13
- Caption = 'Podaj nazw� szukanej miejscowo�ci'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label55: TLabel
- Left = 412
- Top = 88
- Width = 130
- Height = 13
- Caption = 'Podaj nazw� szukanej ulicy'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label56: TLabel
- Left = 412
- Top = 128
- Width = 146
- Height = 13
- Caption = 'Po wype�nieniu naci�nij Szukaj'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label68: TLabel
- Left = 452
- Top = 156
- Width = 284
- Height = 13
- Caption = 'Aby obejrze� wynik szukania rozwi� poni�sz� list�'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label80: TLabel
- Left = 306
- Top = 168
- Width = 65
- Height = 13
- Alignment = taRightJustify
- Caption = 'Liczba ulic : 0'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label81: TLabel
- Left = 292
- Top = 116
- Width = 79
- Height = 13
- Alignment = taRightJustify
- Caption = 'Liczba miast : 21'
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label82: TLabel
- Left = 368
- Top = 44
- Width = 3
- Height = 13
- Alignment = taRightJustify
- Font.Color = clPurple
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label83: TLabel
- Left = 12
- Top = 236
- Width = 100
- Height = 13
- Caption = 'p : = numery parzyste'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label84: TLabel
- Left = 148
- Top = 236
- Width = 114
- Height = 13
- Caption = 'n : = numery nieparzyste'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object ciag10: TLabel
- Left = 392
- Top = 44
- Width = 32
- Height = 11
- Caption = 'ciag10'
- Visible = False
- end
- object Button7: TButton
- Left = 8
- Top = 4
- Width = 269
- Height = 25
- Caption = 'Znajd�/sprawd� numer kodu Nadawcy'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Button7Click
- end
- object Button8: TButton
- Left = 552
- Top = 4
- Width = 233
- Height = 25
- Caption = 'Znajd�/sprawd� numer kodu Adresata'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Button8Click
- end
- object Lista_miejscowosci: TComboBox
- Left = 8
- Top = 88
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clNavy
- DropDownCount = 20
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- Sorted = True
- TabOrder = 25
- OnClick = Lista_miejscowosciClick
- end
- object Lista_miast: TComboBox
- Left = 8
- Top = 136
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clNavy
- DropDownCount = 21
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- Items.Strings = (
- 'Bia�ystok'
- 'Bielsko Bia�a'
- 'Bydgoszcz'
- 'Gda�sk'
- 'Gdynia'
- 'Katowice'
- 'Kielce'
- 'Koszalin'
- 'Krak�w'
- 'Lublin'
- '��d�'
- 'Olsztyn'
- 'Opole'
- 'Pozna�'
- 'Radom'
- 'Rzesz�w'
- 'Sopot'
- 'Szczecin'
- 'Warszawa'
- 'Wroc�aw'
- 'Zielona G�ra')
- MaxLength = 80
- ParentFont = False
- Sorted = True
- TabOrder = 26
- OnClick = Lista_miastClick
- end
- object Lista_ulic: TComboBox
- Left = 8
- Top = 212
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clNavy
- DropDownCount = 29
- Font.Color = clYellow
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- Sorted = True
- TabOrder = 51
- end
- object e_miasto: TEdit
- Left = 620
- Top = 60
- Width = 165
- Height = 21
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 54
- Text = 'e_miasto'
- end
- object e_ulica: TEdit
- Left = 620
- Top = 84
- Width = 165
- Height = 21
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 55
- Text = 'e_ulica'
- end
- object Button9: TButton
- Left = 620
- Top = 124
- Width = 165
- Height = 25
- Caption = 'Szukaj'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 56
- OnClick = Button9Click
- end
- object ComboBox4: TComboBox
- Left = 404
- Top = 176
- Width = 381
- Height = 24
- Style = csDropDownList
- Color = clNavy
- DropDownCount = 27
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemHeight = 16
- MaxLength = 80
- ParentFont = False
- TabOrder = 57
- OnClick = ComboBox4Click
- end
- object Button14: TButton
- Left = 8
- Top = 258
- Width = 189
- Height = 25
- Caption = 'Dodaj kod do adresu nadawcy'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 52
- OnClick = Button14Click
- end
- object Button15: TButton
- Left = 196
- Top = 258
- Width = 193
- Height = 25
- Caption = 'Dodaj kod do adresu adresata'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 53
- OnClick = Button15Click
- end
- object Button16: TButton
- Left = 8
- Top = 64
- Width = 17
- Height = 17
- Caption = 'A'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = Button16Click
- end
- object Button17: TButton
- Left = 24
- Top = 64
- Width = 17
- Height = 17
- Caption = 'B'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- OnClick = Button17Click
- end
- object Button18: TButton
- Left = 40
- Top = 64
- Width = 17
- Height = 17
- Caption = 'C'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- OnClick = Button18Click
- end
- object Button19: TButton
- Left = 56
- Top = 64
- Width = 17
- Height = 17
- Caption = 'D'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 5
- OnClick = Button19Click
- end
- object Button20: TButton
- Left = 72
- Top = 64
- Width = 17
- Height = 17
- Caption = 'E'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 6
- OnClick = Button20Click
- end
- object Button21: TButton
- Left = 88
- Top = 64
- Width = 17
- Height = 17
- Caption = 'F'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 7
- OnClick = Button21Click
- end
- object Button22: TButton
- Left = 104
- Top = 64
- Width = 17
- Height = 17
- Caption = 'G'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 8
- OnClick = Button22Click
- end
- object Button23: TButton
- Left = 120
- Top = 64
- Width = 17
- Height = 17
- Caption = 'H'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 9
- OnClick = Button23Click
- end
- object Button24: TButton
- Left = 136
- Top = 64
- Width = 17
- Height = 17
- Caption = 'I'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 10
- OnClick = Button24Click
- end
- object Button25: TButton
- Left = 152
- Top = 64
- Width = 17
- Height = 17
- Caption = 'J'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 11
- OnClick = Button25Click
- end
- object Button26: TButton
- Left = 168
- Top = 64
- Width = 17
- Height = 17
- Caption = 'K'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 12
- OnClick = Button26Click
- end
- object Button27: TButton
- Left = 184
- Top = 64
- Width = 17
- Height = 17
- Caption = 'L'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 13
- OnClick = Button27Click
- end
- object Button28: TButton
- Left = 200
- Top = 64
- Width = 17
- Height = 17
- Caption = '�'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 14
- OnClick = Button28Click
- end
- object Button29: TButton
- Left = 216
- Top = 64
- Width = 17
- Height = 17
- Caption = 'M'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 15
- OnClick = Button29Click
- end
- object Button30: TButton
- Left = 232
- Top = 64
- Width = 17
- Height = 17
- Caption = 'N'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 16
- OnClick = Button30Click
- end
- object Button31: TButton
- Left = 248
- Top = 64
- Width = 17
- Height = 17
- Caption = 'O'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 17
- OnClick = Button31Click
- end
- object Button32: TButton
- Left = 264
- Top = 64
- Width = 17
- Height = 17
- Caption = 'P'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 18
- OnClick = Button32Click
- end
- object Button33: TButton
- Left = 280
- Top = 64
- Width = 17
- Height = 17
- Caption = 'R'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 19
- OnClick = Button33Click
- end
- object Button34: TButton
- Left = 296
- Top = 64
- Width = 17
- Height = 17
- Caption = 'S'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 20
- OnClick = Button34Click
- end
- object Button35: TButton
- Left = 312
- Top = 64
- Width = 17
- Height = 17
- Caption = 'T'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 21
- OnClick = Button35Click
- end
- object Button36: TButton
- Left = 328
- Top = 64
- Width = 17
- Height = 17
- Caption = 'U'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 22
- OnClick = Button36Click
- end
- object Button38: TButton
- Left = 344
- Top = 64
- Width = 17
- Height = 17
- Caption = 'W'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 23
- OnClick = Button38Click
- end
- object Button39: TButton
- Left = 360
- Top = 64
- Width = 17
- Height = 17
- Caption = 'Z'
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 24
- OnClick = Button39Click
- end
- object Button40: TButton
- Left = 8
- Top = 188
- Width = 17
- Height = 17
- Caption = 'A'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 27
- OnClick = Button40Click
- end
- object Button41: TButton
- Left = 24
- Top = 188
- Width = 17
- Height = 17
- Caption = 'B'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 28
- OnClick = Button41Click
- end
- object Button42: TButton
- Left = 40
- Top = 188
- Width = 17
- Height = 17
- Caption = 'C'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 29
- OnClick = Button42Click
- end
- object Button43: TButton
- Left = 56
- Top = 188
- Width = 17
- Height = 17
- Caption = 'D'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 30
- OnClick = Button43Click
- end
- object Button44: TButton
- Left = 72
- Top = 188
- Width = 17
- Height = 17
- Caption = 'E'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 31
- OnClick = Button44Click
- end
- object Button45: TButton
- Left = 88
- Top = 188
- Width = 17
- Height = 17
- Caption = 'F'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 32
- OnClick = Button45Click
- end
- object Button46: TButton
- Left = 104
- Top = 188
- Width = 17
- Height = 17
- Caption = 'G'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 33
- OnClick = Button46Click
- end
- object Button47: TButton
- Left = 120
- Top = 188
- Width = 17
- Height = 17
- Caption = 'H'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 34
- OnClick = Button47Click
- end
- object Button48: TButton
- Left = 136
- Top = 188
- Width = 17
- Height = 17
- Caption = 'I'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 35
- OnClick = Button48Click
- end
- object Button49: TButton
- Left = 152
- Top = 188
- Width = 17
- Height = 17
- Caption = 'J'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 36
- OnClick = Button49Click
- end
- object Button50: TButton
- Left = 168
- Top = 188
- Width = 17
- Height = 17
- Caption = 'K'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 37
- OnClick = Button50Click
- end
- object Button51: TButton
- Left = 184
- Top = 188
- Width = 17
- Height = 17
- Caption = 'L'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 38
- OnClick = Button51Click
- end
- object Button52: TButton
- Left = 200
- Top = 188
- Width = 17
- Height = 17
- Caption = '�'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 39
- OnClick = Button52Click
- end
- object Button53: TButton
- Left = 216
- Top = 188
- Width = 17
- Height = 17
- Caption = 'M'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 40
- OnClick = Button53Click
- end
- object Button54: TButton
- Left = 232
- Top = 188
- Width = 17
- Height = 17
- Caption = 'N'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 41
- OnClick = Button54Click
- end
- object Button55: TButton
- Left = 248
- Top = 188
- Width = 17
- Height = 17
- Caption = 'O'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 42
- OnClick = Button55Click
- end
- object Button56: TButton
- Left = 264
- Top = 188
- Width = 17
- Height = 17
- Caption = 'P'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 43
- OnClick = Button56Click
- end
- object Button57: TButton
- Left = 280
- Top = 188
- Width = 17
- Height = 17
- Caption = 'R'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 44
- OnClick = Button57Click
- end
- object Button58: TButton
- Left = 296
- Top = 188
- Width = 17
- Height = 17
- Caption = 'S'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 45
- OnClick = Button58Click
- end
- object Button59: TButton
- Left = 312
- Top = 188
- Width = 17
- Height = 17
- Caption = 'T'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 46
- OnClick = Button59Click
- end
- object Button60: TButton
- Left = 328
- Top = 188
- Width = 17
- Height = 17
- Caption = 'U'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 47
- OnClick = Button60Click
- end
- object Button62: TButton
- Left = 344
- Top = 188
- Width = 17
- Height = 17
- Caption = 'W'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 48
- OnClick = Button62Click
- end
- object Button63: TButton
- Left = 360
- Top = 188
- Width = 17
- Height = 17
- Caption = 'Z'
- Enabled = False
- Font.Color = clNavy
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 49
- OnClick = Button63Click
- end
- object Panel1: TPanel
- Left = 612
- Top = 210
- Width = 173
- Height = 37
- BevelInner = bvLowered
- BevelOuter = bvLowered
- Color = clYellow
- TabOrder = 58
- end
- object kod: TEdit
- Left = 656
- Top = 214
- Width = 97
- Height = 29
- BorderStyle = bsNone
- Color = clYellow
- Ctl3D = True
- Font.Color = clRed
- Font.Height = -23
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 6
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 59
- Text = '00-000'
- end
- object Button37: TButton
- Left = 376
- Top = 188
- Width = 13
- Height = 17
- Caption = '...'
- Enabled = False
- TabOrder = 50
- OnClick = Button37Click
- end
- end
- object b_kody: TButton
- Left = 404
- Top = 516
- Width = 381
- Height = 25
- Caption = 'Ksi��ka kodowa'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 16
- OnClick = b_kodyClick
- end
- object p_drukuj_seria: TPanel
- Left = 52
- Top = 300
- Width = 49
- Height = 121
- BevelOuter = bvNone
- TabOrder = 23
- Visible = False
- object Label25: TLabel
- Left = 8
- Top = 4
- Width = 373
- Height = 45
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Aby rozpocz�� druk seryjny nale�y zaznaczy� na li�cie druk�w ��d' +
- 'any typ druku i wybra� Nadawc�. Nast�pnie prosz� wybra� adresat�' +
- 'w na poni�szej li�cie (Ctrl+mysz lub Shift+mysz) i nacisn�� Druk' +
- 'owanie seryjne.'
- end
- object Label26: TLabel
- Left = 8
- Top = 496
- Width = 183
- Height = 13
- Caption = 'Liczba wybranych adresat�w : 0'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object ListBox1: TListBox
- Left = 8
- Top = 48
- Width = 377
- Height = 441
- Color = clMaroon
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- Items.Strings = (
- '0000'
- '1010'
- '1111'
- '1111'
- '1212'
- '1313'
- '1414'
- '1515'
- '1616'
- '1717'
- '1818'
- '1919'
- '2020'
- '2121'
- '2222'
- '2222'
- '2323'
- '2424'
- '2525'
- '2626'
- '2727'
- '2828'
- '2929'
- '3030'
- '3333'
- '4444'
- '5555'
- '6666'
- '7777'
- '8888'
- '9999')
- MultiSelect = True
- ParentFont = False
- Style = lbOwnerDrawFixed
- TabOrder = 0
- OnClick = ListBox1Click
- end
- object Memo1: TMemo
- Left = 8
- Top = 348
- Width = 377
- Height = 141
- ScrollBars = ssVertical
- TabOrder = 4
- Visible = False
- end
- object b_druk_etykiet: TButton
- Left = 8
- Top = 516
- Width = 173
- Height = 25
- Caption = 'Druk na etykietach adresowych'
- TabOrder = 1
- OnClick = b_druk_etykietClick
- end
- object b_drukuj_panel: TButton
- Left = 180
- Top = 516
- Width = 137
- Height = 25
- Caption = 'Drukowanie seryjne'
- TabOrder = 2
- OnClick = b_drukuj_panelClick
- end
- object b_zamknij_panel: TButton
- Left = 316
- Top = 516
- Width = 69
- Height = 25
- Caption = 'Koniec'
- TabOrder = 3
- OnClick = b_zamknij_panelClick
- end
- end
- object p_adresat: TPanel
- Left = 248
- Top = 136
- Width = 69
- Height = 21
- TabOrder = 28
- Visible = False
- object GroupBox2: TGroupBox
- Left = 8
- Top = 4
- Width = 389
- Height = 257
- Caption = ' Adresat '
- TabOrder = 0
- object Label12: TLabel
- Left = 12
- Top = 20
- Width = 101
- Height = 13
- Caption = 'Imi� i nazwisko/Firma'
- end
- object Label13: TLabel
- Left = 12
- Top = 40
- Width = 114
- Height = 13
- Caption = 'Ulica, nr domu, nr lokalu'
- end
- object Label14: TLabel
- Left = 12
- Top = 60
- Width = 67
- Height = 13
- Caption = 'Kod pocztowy'
- end
- object Label15: TLabel
- Left = 12
- Top = 80
- Width = 61
- Height = 13
- Caption = 'Miejscowo��'
- end
- object Label16: TLabel
- Left = 12
- Top = 100
- Width = 32
- Height = 13
- Caption = 'Powiat'
- end
- object Label17: TLabel
- Left = 12
- Top = 120
- Width = 67
- Height = 13
- Caption = 'Wojew�dztwo'
- end
- object Label18: TLabel
- Left = 12
- Top = 140
- Width = 18
- Height = 13
- Caption = 'Kraj'
- end
- object Label19: TLabel
- Left = 12
- Top = 160
- Width = 25
- Height = 13
- Caption = 'Bank'
- end
- object Label20: TLabel
- Left = 12
- Top = 180
- Width = 79
- Height = 13
- Caption = 'Numer rachunku'
- end
- object Label74: TLabel
- Left = 12
- Top = 200
- Width = 36
- Height = 13
- Caption = 'Telefon'
- end
- object imie_i_nazwisko2: TEdit
- Left = 136
- Top = 16
- Width = 245
- Height = 21
- MaxLength = 80
- TabOrder = 0
- Text = 'imie_i_nazwisko2'
- OnEnter = imie_i_nazwisko2Enter
- OnExit = imie_i_nazwisko2Exit
- end
- object adres2: TEdit
- Left = 136
- Top = 36
- Width = 245
- Height = 21
- MaxLength = 80
- TabOrder = 1
- Text = 'adres2'
- OnEnter = adres2Enter
- OnExit = adres2Exit
- end
- object kod_pocztowy2: TEdit
- Left = 136
- Top = 56
- Width = 245
- Height = 21
- MaxLength = 10
- TabOrder = 2
- Text = 'kod_pocztowy2'
- OnEnter = kod_pocztowy2aEnter
- OnExit = kod_pocztowy2aExit
- end
- object miejscowosc2: TEdit
- Left = 136
- Top = 76
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 3
- Text = 'miejscowosc2'
- OnEnter = miejscowosc2Enter
- OnExit = miejscowosc2Exit
- end
- object powiat2: TEdit
- Left = 136
- Top = 96
- Width = 245
- Height = 21
- MaxLength = 25
- TabOrder = 4
- Text = 'powiat2'
- OnEnter = powiat2Enter
- OnExit = powiat2Exit
- end
- object wojewodztwo2: TEdit
- Left = 136
- Top = 116
- Width = 245
- Height = 21
- MaxLength = 25
- TabOrder = 5
- Text = 'wojewodztwo2'
- OnEnter = wojewodztwo2Enter
- OnExit = wojewodztwo2Exit
- end
- object kraj2: TEdit
- Left = 136
- Top = 136
- Width = 245
- Height = 21
- MaxLength = 25
- TabOrder = 6
- Text = 'kraj2'
- OnEnter = kraj2Enter
- OnExit = kraj2Exit
- end
- object bank2: TEdit
- Left = 136
- Top = 156
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 7
- Text = 'bank2'
- OnEnter = bank2Enter
- OnExit = bank2Exit
- end
- object numer_rachunku2: TEdit
- Left = 136
- Top = 176
- Width = 245
- Height = 21
- MaxLength = 30
- TabOrder = 8
- Text = 'numer_rachunku2'
- OnEnter = numer_rachunku2Enter
- OnExit = numer_rachunku2Exit
- end
- object b_nowy2: TButton
- Left = 8
- Top = 224
- Width = 69
- Height = 25
- Caption = 'Nowy'
- TabOrder = 10
- OnClick = b_nowy2Click
- end
- object b_usun2: TButton
- Left = 76
- Top = 224
- Width = 61
- Height = 25
- Caption = 'Usu�'
- TabOrder = 11
- OnClick = b_usun2Click
- end
- object b_zapis2: TButton
- Left = 136
- Top = 224
- Width = 157
- Height = 25
- Caption = 'Dodaj do rejestru adresat�w'
- TabOrder = 12
- OnClick = b_zapis2Click
- end
- object Button1: TButton
- Left = 72
- Top = 148
- Width = 63
- Height = 25
- Caption = 'Wczytaj'
- TabOrder = 14
- TabStop = False
- Visible = False
- OnClick = Button1Click
- end
- object b_korekta2: TButton
- Left = 292
- Top = 224
- Width = 89
- Height = 25
- Caption = 'Zapisz zmiany'
- TabOrder = 13
- OnClick = b_korekta2Click
- end
- object telefon2: TEdit
- Left = 136
- Top = 196
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 9
- Text = 'telefon2'
- OnEnter = telefon2Enter
- OnExit = telefon2Exit
- end
- object Panel4: TPanel
- Left = 288
- Top = 12
- Width = 93
- Height = 209
- Caption = 'Panel4'
- TabOrder = 15
- Visible = False
- object Label40: TLabel
- Left = 8
- Top = 8
- Width = 33
- Height = 13
- end
- object Label41: TLabel
- Left = 8
- Top = 28
- Width = 3
- Height = 13
- end
- object Label42: TLabel
- Left = 7
- Top = 48
- Width = 3
- Height = 13
- end
- object Label43: TLabel
- Left = 8
- Top = 68
- Width = 3
- Height = 13
- end
- object Label44: TLabel
- Left = 8
- Top = 88
- Width = 3
- Height = 13
- end
- object Label45: TLabel
- Left = 8
- Top = 108
- Width = 3
- Height = 13
- end
- object Label46: TLabel
- Left = 8
- Top = 128
- Width = 3
- Height = 13
- end
- object Label47: TLabel
- Left = 8
- Top = 148
- Width = 3
- Height = 13
- end
- object Label48: TLabel
- Left = 8
- Top = 168
- Width = 3
- Height = 13
- end
- object Label79: TLabel
- Left = 8
- Top = 188
- Width = 3
- Height = 13
- end
- end
- end
- object Button11: TButton
- Left = 16
- Top = 268
- Width = 373
- Height = 25
- Caption = 'Powr�t'
- TabOrder = 1
- OnClick = Button11Click
- end
- end
- object p_nadawca: TPanel
- Left = 132
- Top = 136
- Width = 77
- Height = 21
- TabOrder = 27
- Visible = False
- object Button10: TButton
- Left = 16
- Top = 268
- Width = 373
- Height = 25
- Caption = 'Powr�t'
- TabOrder = 1
- OnClick = Button10Click
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 4
- Width = 389
- Height = 257
- Caption = ' Nadawca '
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object Label1: TLabel
- Left = 12
- Top = 20
- Width = 101
- Height = 13
- Caption = 'Imi� i nazwisko/Firma'
- end
- object Label2: TLabel
- Left = 12
- Top = 40
- Width = 114
- Height = 13
- Caption = 'Ulica, nr domu, nr lokalu'
- end
- object Label3: TLabel
- Left = 12
- Top = 60
- Width = 67
- Height = 13
- Caption = 'Kod pocztowy'
- end
- object Label4: TLabel
- Left = 12
- Top = 80
- Width = 61
- Height = 13
- Caption = 'Miejscowo��'
- end
- object Label5: TLabel
- Left = 12
- Top = 100
- Width = 32
- Height = 13
- Caption = 'Powiat'
- end
- object Label6: TLabel
- Left = 12
- Top = 120
- Width = 67
- Height = 13
- Caption = 'Wojew�dztwo'
- end
- object Label7: TLabel
- Left = 12
- Top = 140
- Width = 24
- Height = 13
- Caption = 'Logo'
- end
- object Label8: TLabel
- Left = 12
- Top = 160
- Width = 25
- Height = 13
- Caption = 'Bank'
- end
- object Label9: TLabel
- Left = 12
- Top = 180
- Width = 79
- Height = 13
- Caption = 'Numer rachunku'
- end
- object Label70: TLabel
- Left = 12
- Top = 200
- Width = 36
- Height = 13
- Caption = 'Telefon'
- end
- object imie_i_nazwisko: TEdit
- Left = 136
- Top = 16
- Width = 245
- Height = 21
- MaxLength = 80
- TabOrder = 0
- Text = 'imie_i_nazwisko'
- OnEnter = imie_i_nazwiskoEnter
- OnExit = imie_i_nazwiskoExit
- end
- object adres: TEdit
- Left = 136
- Top = 36
- Width = 245
- Height = 21
- MaxLength = 80
- TabOrder = 1
- Text = 'adres'
- OnEnter = adresEnter
- OnExit = adresExit
- end
- object kod_pocztowy: TEdit
- Left = 136
- Top = 56
- Width = 245
- Height = 21
- MaxLength = 10
- TabOrder = 2
- Text = 'kod_pocztowy'
- OnEnter = kod_pocztowyEnter
- OnExit = kod_pocztowyExit
- end
- object miejscowosc: TEdit
- Left = 136
- Top = 76
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 3
- Text = 'miejscowosc'
- OnEnter = miejscowoscEnter
- OnExit = miejscowoscExit
- end
- object powiat: TEdit
- Left = 136
- Top = 96
- Width = 245
- Height = 21
- MaxLength = 25
- TabOrder = 4
- Text = 'powiat'
- OnEnter = powiatEnter
- OnExit = powiatExit
- end
- object wojewodztwo: TEdit
- Left = 136
- Top = 116
- Width = 245
- Height = 21
- MaxLength = 25
- TabOrder = 5
- Text = 'wojewodztwo'
- OnEnter = wojewodztwoEnter
- OnExit = wojewodztwoExit
- end
- object logo: TEdit
- Left = 136
- Top = 136
- Width = 245
- Height = 21
- MaxLength = 100
- TabOrder = 6
- Text = 'logo'
- OnEnter = logoEnter
- OnExit = logoExit
- end
- object bLogo: TButton
- Left = 358
- Top = 170
- Width = 21
- Height = 18
- Caption = '...'
- TabOrder = 7
- TabStop = False
- OnClick = bLogoClick
- end
- object bank: TEdit
- Left = 136
- Top = 156
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 8
- Text = 'bank'
- OnEnter = bankEnter
- OnExit = bankExit
- end
- object numer_rachunku: TEdit
- Left = 136
- Top = 176
- Width = 245
- Height = 21
- MaxLength = 30
- TabOrder = 9
- Text = 'numer_rachunku'
- OnEnter = numer_rachunkuEnter
- OnExit = numer_rachunkuExit
- end
- object b_nowy1: TButton
- Left = 8
- Top = 224
- Width = 69
- Height = 25
- Caption = 'Nowy'
- TabOrder = 11
- OnClick = b_nowy1Click
- end
- object b_usun1: TButton
- Left = 76
- Top = 224
- Width = 61
- Height = 25
- Caption = 'Usu�'
- TabOrder = 12
- OnClick = b_usun1Click
- end
- object b_zapis1: TButton
- Left = 136
- Top = 224
- Width = 157
- Height = 25
- Caption = 'Dodaj do rejestru nadawc�w'
- TabOrder = 13
- OnClick = b_zapis1Click
- end
- object b_korekta1: TButton
- Left = 292
- Top = 224
- Width = 89
- Height = 25
- Caption = 'Zapisz zmiany'
- TabOrder = 14
- OnClick = b_korekta1Click
- end
- object a1: TEdit
- Left = 96
- Top = 16
- Width = 21
- Height = 21
- TabOrder = 15
- Text = 'a1'
- Visible = False
- end
- object a2: TEdit
- Left = 96
- Top = 36
- Width = 21
- Height = 21
- TabOrder = 16
- Text = 'a2'
- Visible = False
- end
- object a3: TEdit
- Left = 96
- Top = 56
- Width = 21
- Height = 21
- TabOrder = 17
- Text = 'a3'
- Visible = False
- end
- object a4: TEdit
- Left = 96
- Top = 76
- Width = 21
- Height = 21
- TabOrder = 18
- Text = 'a4'
- Visible = False
- end
- object a5: TEdit
- Left = 96
- Top = 96
- Width = 21
- Height = 21
- TabOrder = 19
- Text = 'a5'
- Visible = False
- end
- object a6: TEdit
- Left = 96
- Top = 116
- Width = 21
- Height = 21
- TabOrder = 20
- Text = 'a6'
- Visible = False
- end
- object a7: TEdit
- Left = 96
- Top = 136
- Width = 21
- Height = 21
- TabOrder = 21
- Text = 'a7'
- Visible = False
- end
- object a8: TEdit
- Left = 96
- Top = 156
- Width = 21
- Height = 21
- TabOrder = 22
- Text = 'a8'
- Visible = False
- end
- object a9: TEdit
- Left = 96
- Top = 176
- Width = 21
- Height = 21
- TabOrder = 23
- Text = 'a9'
- Visible = False
- end
- object telefon: TEdit
- Left = 136
- Top = 196
- Width = 245
- Height = 21
- MaxLength = 50
- TabOrder = 10
- Text = 'telefon'
- OnEnter = telefonEnter
- OnExit = telefonExit
- end
- object Panel5: TPanel
- Left = 292
- Top = 12
- Width = 93
- Height = 209
- Caption = 'Panel5'
- TabOrder = 24
- Visible = False
- object Label30: TLabel
- Left = 12
- Top = 8
- Width = 3
- Height = 13
- end
- object Label31: TLabel
- Left = 12
- Top = 28
- Width = 3
- Height = 13
- end
- object Label32: TLabel
- Left = 12
- Top = 48
- Width = 3
- Height = 13
- end
- object Label33: TLabel
- Left = 12
- Top = 68
- Width = 3
- Height = 13
- end
- object Label34: TLabel
- Left = 12
- Top = 88
- Width = 3
- Height = 13
- end
- object Label35: TLabel
- Left = 12
- Top = 108
- Width = 3
- Height = 13
- end
- object Label36: TLabel
- Left = 12
- Top = 128
- Width = 3
- Height = 13
- end
- object Label37: TLabel
- Left = 12
- Top = 148
- Width = 3
- Height = 13
- end
- object Label38: TLabel
- Left = 12
- Top = 168
- Width = 3
- Height = 13
- end
- object Label69: TLabel
- Left = 8
- Top = 192
- Width = 3
- Height = 13
- end
- end
- object a10: TEdit
- Left = 96
- Top = 196
- Width = 25
- Height = 21
- TabStop = False
- TabOrder = 25
- Text = 'a10'
- Visible = False
- end
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Left = 16
- end
- object dsNadawca: TDataSource
- Left = 48
- Top = 32
- end
- object T_Adresat: TTable
- TableName = 'private.DB'
- Left = 412
- Top = 28
- end
- object dsAdresat: TDataSource
- DataSet = T_Adresat
- Left = 440
- Top = 28
- end
- object dsNadawca2: TDataSource
- Left = 56
- Top = 220
- end
- object Query1: TQuery
- DataSource = dsNadawca2
- Left = 28
- Top = 220
- end
- object Query2: TQuery
- DataSource = dsAdresat2
- Left = 420
- Top = 220
- end
- object dsAdresat2: TDataSource
- DataSet = T_Adresat
- Left = 448
- Top = 220
- end
- object PrintDialog1: TPrintDialog
- Left = 44
- end
- object FontDialog1: TFontDialog
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 72
- end
- object Query3: TQuery
- Left = 532
- Top = 256
- end
- object dsQuery3: TDataSource
- DataSet = Query3
- Left = 560
- Top = 256
- end
- object MarsCaption1: TMarsCaption
- ActiveBeginColor = clBlack
- ActiveEndColor = clBlue
- ActiveFontColor = clYellow
- InactiveBeginColor = clGray
- InactiveEndColor = clSilver
- InactiveFontColor = clBlack
- ApplicationNameFont.Color = clWindowText
- ApplicationNameFont.Height = -11
- ApplicationNameFont.Name = 'MS Sans Serif'
- ApplicationNameFont.Style = [fsBold]
- CaptionFont.Color = clWindowText
- CaptionFont.Height = -11
- CaptionFont.Name = 'MS Sans Serif'
- CaptionFont.Style = []
- NumColors = 64
- AutoSize = False
- Left = 100
- end
- object T_Nadawca: TTable
- TableName = 'nadawca.DB'
- Left = 20
- Top = 32
- end
- object dsMiejscowosci: TDataSource
- DataSet = T_Miejscowosci
- Left = 116
- Top = 220
- end
- object T_Miejscowosci: TTable
- TableName = 'miejsc.DB'
- Left = 88
- Top = 220
- end
- object T_Miasta: TTable
- TableName = 'miasta.db'
- Left = 152
- Top = 220
- end
- object dsMiasta: TDataSource
- DataSet = T_Miasta
- Left = 180
- Top = 220
- end
- object Q_Miasta: TQuery
- Left = 228
- Top = 220
- end
- object dsQ_Miasta: TDataSource
- DataSet = Q_Miasta
- Left = 256
- Top = 220
- end
- end
-