object Fvypis: TFvypis Left = 200 Top = 112 BorderIcons = [biSystemMenu, biMaximize] BorderStyle = bsSingle Caption = 'V�pis transakc� na ��tu' ClientHeight = 288 ClientWidth = 432 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate OnDeactivate = FormDeactivate OnHide = FormDeactivate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 229 Top = 5 Width = 48 Height = 13 Caption = 'Druhy Od:' end object Label2: TLabel Left = 313 Top = 5 Width = 17 Height = 13 Caption = 'Do:' end object Lucet: TLabel Left = 8 Top = 5 Width = 26 Height = 13 Caption = '��et:' end object SBdatum: TSpeedButton Left = 176 Top = 0 Width = 49 Height = 17 Hint = 'filtr podle datumu' AllowAllUp = True GroupIndex = 1 Caption = '&Datum' ParentShowHint = False ShowHint = True OnClick = SBdatumClick end object Memo1: TMemo Left = 80 Top = 88 Width = 41 Height = 17 TabStop = False Lines.Strings = ( '��et 1') ReadOnly = True TabOrder = 5 Visible = False end object Bzobrazit: TButton Left = 344 Top = 0 Width = 81 Height = 17 Caption = '&Zobrazit' Default = True TabOrder = 4 TabStop = False OnClick = BzobrazitClick end object SGtransakce: TStringGrid Left = 8 Top = 50 Width = 417 Height = 231 ColCount = 4 DefaultRowHeight = 15 FixedCols = 0 RowCount = 2 Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Courier' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goRangeSelect, goColSizing, goRowSelect] ParentFont = False ScrollBars = ssVertical TabOrder = 3 OnColumnMoved = SGtransakceColumnMoved ColWidths = ( 72 17 241 93) end object LBoddruh: TListBox Left = 229 Top = 20 Width = 80 Height = 23 Hint = 'vyberte prvn� druh, kter� se m� zobrazovat' Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = LBoddruhClick end object LBdodruh: TListBox Left = 313 Top = 20 Width = 80 Height = 23 Hint = 'vyberte posledn� druh, kter� se m� zobrazovat' Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = LBdodruhClick end object Btisk: TButton Left = 140 Top = 0 Width = 30 Height = 17 Hint = 'export do souboru print.txt' Caption = '&Tisk' ParentShowHint = False ShowHint = True TabOrder = 6 TabStop = False OnClick = BtiskClick end object LBucet: TListBox Left = 8 Top = 20 Width = 217 Height = 23 Hint = 'vyberte ��et' Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = LBucetClick OnEnter = LBucetEnter OnExit = LBucetExit end object Msuma: TMemo Left = 432 Top = 0 Width = 205 Height = 45 TabStop = False Color = clBtnFace Font.Charset = EASTEUROPE_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 7 OnClick = MsumaClick end object Bnastavenitisk: TButton Left = 44 Top = 0 Width = 85 Height = 17 Hint = 'Nastaven� tisku(resp.exportu do souboru)' Caption = '&Nastaven� tisku' ParentShowHint = False ShowHint = True TabOrder = 8 TabStop = False OnClick = BnastavenitiskClick end object BBdatum: TBitBtn Left = 408 Top = 24 Width = 49 Height = 17 Hint = 'filtr podle datumu' Caption = '&Datum' ParentShowHint = False ShowHint = True TabOrder = 9 TabStop = False Visible = False OnClick = BBdatumClick end object Edodatum: TEdit Left = 128 Top = 168 Width = 57 Height = 21 TabStop = False MaxLength = 8 ReadOnly = True TabOrder = 10 Text = '99999999' Visible = False end object Eoddatum: TEdit Left = 128 Top = 136 Width = 57 Height = 21 TabStop = False MaxLength = 8 ReadOnly = True TabOrder = 11 Text = '00000000' Visible = False end end