object Form3: TForm3 Left = 167 Top = 151 BorderStyle = bsDialog Caption = 'Podsumowanie ankiety' ClientHeight = 338 ClientWidth = 485 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 283 Width = 89 Height = 13 Caption = 'Plik wynik�w:' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Button1: TButton Left = 376 Top = 308 Width = 81 Height = 25 Caption = 'Koniec' TabOrder = 0 OnClick = Button1Click end object StringGrid1: TStringGrid Left = 26 Top = 15 Width = 431 Height = 257 Cursor = crNo TabStop = False Color = clWhite ColCount = 10 DefaultColWidth = 40 DefaultRowHeight = 22 RowCount = 11 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] ScrollBars = ssVertical TabOrder = 1 end object Button2: TButton Left = 200 Top = 308 Width = 89 Height = 25 Caption = 'Zapisz Tabel�' TabOrder = 2 OnClick = Button2Click end object Button3: TButton Left = 24 Top = 308 Width = 81 Height = 25 Caption = 'Drukuj' TabOrder = 3 OnClick = Button3Click end object Button4: TButton Left = 104 Top = 280 Width = 273 Height = 20 Caption = 'Zmie�' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = Button4Click end object SaveDialog1: TSaveDialog FileEditStyle = fsEdit Filter = 'Pliki tekstowe (*.txt)|*.txt' Title = 'Wpisz nazw� pliku z wynikami...' Left = 456 Top = 192 end object SaveDialog2: TSaveDialog FileEditStyle = fsEdit Filter = 'Plik wynik�w (*.kim)|*.kim' Title = 'Podaj now� nazw� pliku z wynikami...' Left = 464 Top = 72 end end