Chip 1999 January/Chip_1999-01_cd.bin/zkuste/Globy/_SETUP.1/Sazeni3D.exe/0/RCDATA/TKVSADIT/TKVSADIT.txt

Text File | 1994-11-07 | 14KB | 621 lines

object KVsadit: TKVsadit
  Left = 190
  Top = 72
  Width = 551
  Height = 432
  HelpContext = 199
  HorzScrollBar.Range = 1200
  HorzScrollBar.Visible = False
  VertScrollBar.Range = 2000
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Kolik vsadit, abyste vyhr�li ?'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Scaled = False
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 14
  object Label1: TLabel
    Left = 25
    Top = 5
    Width = 301
    Height = 13
    Caption = 'Vsazena kombinace ��sel :                     (1-10 ��sel)'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 25
    Top = 28
    Width = 174
    Height = 12
    Caption = 'N�sobek vkladu pro p��t� den'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 261
    Top = 29
    Width = 85
    Height = 13
    Caption = '(1,000 - 2,500)'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 25
    Top = 51
    Width = 112
    Height = 13
    Caption = 'Celkem zobrazit dn�'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label5: TLabel
    Left = 261
    Top = 53
    Width = 56
    Height = 13
    Caption = '(10 - 999)'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 25
    Top = 72
    Width = 94
    Height = 13
    Caption = 'Po��te�n� vklad'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Button1: TButton
    Left = 471
    Top = 66
    Width = 67
    Height = 25
    Cancel = True
    Caption = '&Opustit'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnClick = Button1Click
  end
  object StringGrid: TStringGrid
    Left = 2
    Top = 94
    Width = 540
    Height = 310
    Hint = 'Prav� tla��tko my�i = vyvol�n� skryt�ho menu'
    ColCount = 8
    DefaultRowHeight = 17
    FixedCols = 0
    RowCount = 2
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goRowSelect]
    ParentFont = False
    ParentShowHint = False
    PopupMenu = PopupMenu1
    ScrollBars = ssVertical
    ShowHint = True
    TabOrder = 5
    Visible = False
    OnSelectCell = StringGridSelectCell
    ColWidths = (
      27
      64
      77
      60
      69
      51
      93
      64)
  end
  object Edit1: TEdit
    Left = 208
    Top = 2
    Width = 35
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxLength = 2
    ParentFont = False
    TabOrder = 0
    OnExit = Edit1Exit
    OnKeyPress = Edit1KeyPress
  end
  object Edit2: TEdit
    Left = 208
    Top = 24
    Width = 49
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxLength = 5
    ParentFont = False
    TabOrder = 1
    OnExit = Edit2Exit
    OnKeyPress = Edit2KeyPress
  end
  object Button2: TButton
    Left = 471
    Top = 7
    Width = 67
    Height = 25
    Caption = 'V�&po�et'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = Button2Click
  end
  object Edit3: TEdit
    Left = 208
    Top = 47
    Width = 35
    Height = 21
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxLength = 3
    ParentFont = False
    TabOrder = 2
    OnExit = Edit3Exit
    OnKeyPress = Edit3KeyPress
  end
  object ComboBox: TComboBox
    Left = 208
    Top = 69
    Width = 60
    Height = 21
    Style = csDropDownList
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      '5     K�'
      '10   K�'
      '15   K�'
      '20   K�'
      '25   K�'
      '30   K�'
      '35   K�'
      '40   K�'
      '45   K�'
      '50   K�'
      '55   K�'
      '60   K�'
      '65   K�'
      '70   K�'
      '75   K�'
      '80   K�'
      '85   K�'
      '90   K�'
      '95   K�'
      '100 K�')
    ParentFont = False
    TabOrder = 3
    OnKeyPress = ComboBoxKeyPress
  end
  object ScrollBox1: TScrollBox
    Left = 559
    Top = 20
    Width = 673
    Height = 245
    TabOrder = 8
    object QRBand1: TQRBand
      Left = 0
      Top = 0
      Width = 669
      Height = 17
      Align = alTop
      BandType = rbPageHeader
      Color = clWhite
      ForceNewPage = False
      Frame.Width = 0
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Ruler = qrrNone
    end
    object QRBand2: TQRBand
      Left = 0
      Top = 17
      Width = 669
      Height = 96
      Align = alTop
      BandType = rbPageHeader
      Color = clWhite
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ForceNewPage = False
      Frame.Width = 0
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      ParentFont = False
      Ruler = qrrNone
      object QRLabel1: TQRLabel
        Left = 16
        Top = 41
        Width = 114
        Height = 16
        Caption = 'Kombinace 10 ��sel'
        AlignToBand = False
      end
      object QRLabel2: TQRLabel
        Left = 155
        Top = 41
        Width = 206
        Height = 16
        Caption = 'N�sobek vkladu pro p��t� den je 2,1'
        AlignToBand = False
      end
      object QRLabel3: TQRLabel
        Left = 391
        Top = 41
        Width = 83
        Height = 16
        Caption = 'Celkem dn� 10'
        AlignToBand = False
      end
      object QRLabel4: TQRLabel
        Left = 513
        Top = 41
        Width = 122
        Height = 16
        Caption = 'Po��te�n� vklad 5 K�'
        AlignToBand = False
      end
      object QRLabel6: TQRLabel
        Left = 20
        Top = 71
        Width = 23
        Height = 16
        Caption = 'Den'
        AlignToBand = False
      end
      object QRLabel7: TQRLabel
        Left = 67
        Top = 71
        Width = 38
        Height = 16
        Caption = 'Datum'
        AlignToBand = False
      end
      object QRLabel8: TQRLabel
        Left = 238
        Top = 71
        Width = 34
        Height = 16
        Caption = 'V�hra'
        AlignToBand = False
      end
      object QRLabel9: TQRLabel
        Left = 323
        Top = 71
        Width = 24
        Height = 16
        Caption = 'Zisk'
        AlignToBand = False
      end
      object QRLabel10: TQRLabel
        Left = 366
        Top = 71
        Width = 49
        Height = 16
        Caption = 'Zisk v %'
        AlignToBand = False
      end
      object QRLabel11: TQRLabel
        Left = 456
        Top = 70
        Width = 82
        Height = 16
        Caption = 'Celkem ve h�e'
        AlignToBand = False
      end
      object QRShape1: TQRShape
        Left = 11
        Top = 91
        width = 637
        Height = 4
        Shape = qrsHorLine
      end
      object QRLabel5: TQRLabel
        Left = 23
        Top = 8
        Width = 532
        Height = 22
        Caption = 'Tabulka v�sledk� syst�mu n�sobn� s�zky - ��astn�ch 10'
        AlignToBand = False
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object QRSysData1: TQRSysData
        Left = 614
        Top = 10
        Width = 49
        Height = 17
        AlignToBand = False
        Data = qrsPageNumber
      end
      object QRLabel12: TQRLabel
        Left = 572
        Top = 11
        Width = 38
        Height = 16
        Caption = 'Strana'
        AlignToBand = False
      end
      object QRLabel13: TQRLabel
        Left = 132
        Top = 71
        Width = 51
        Height = 16
        Caption = 'Vsazeno'
        AlignToBand = False
      end
      object QRLabel14: TQRLabel
        Left = 560
        Top = 70
        Width = 89
        Height = 16
        Caption = 'Skute�n� v�hra'
        AlignToBand = False
      end
    end
    object QRBand3: TQRBand
      Left = 0
      Top = 113
      Width = 669
      Height = 14
      Align = alTop
      BandType = rbDetail
      Color = clWhite
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ForceNewPage = False
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      ParentFont = False
      Ruler = qrrNone
      object QRDBText1: TQRDBText
        Left = 16
        Top = -1
        Width = 29
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C1'
      end
      object QRDBText2: TQRDBText
        Left = 58
        Top = -1
        Width = 62
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C2'
      end
      object QRDBText3: TQRDBText
        Left = 199
        Top = -1
        Width = 73
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C4'
      end
      object QRDBText4: TQRDBText
        Left = 282
        Top = -1
        Width = 75
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C5'
      end
      object QRDBText5: TQRDBText
        Left = 366
        Top = -1
        Width = 43
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C6'
      end
      object QRDBText6: TQRDBText
        Left = 437
        Top = -1
        Width = 98
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'Por1'
      end
      object QRDBText7: TQRDBText
        Left = 132
        Top = -1
        Width = 55
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'C3'
      end
      object QRDBText8: TQRDBText
        Left = 553
        Top = -2
        Width = 85
        Height = 17
        Alignment = taRightJustify
        AlignToBand = False
        DataSource = DataM.DTable
        DataField = 'Por2'
      end
    end
  end
  object Button4: TButton
    Left = 472
    Top = 36
    Width = 66
    Height = 25
    Caption = '&Nahr�t'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = Button4Click
  end
  object MSOfficeCaption1: TMSOfficeCaption
    AppNameText.FontKind = fkSystemB
    AppNameText.Visible = True
    CaptionText.Caption = 'Kolik vsadit, abyste vyhr�li ?'
    CaptionText.ColorActive = clYellow
    CaptionText.ColorInactive = clGray
    CaptionText.FontKind = fkSystem
    CaptionText.Visible = True
    CompanyText.FontKind = fkSystemBI
    CompanyText.Visible = True
    Color = clMaroon
    Left = 152
    Top = 160
  end
  object QuickReport1: TQuickReport
    DataSource = DataM.DTable
    ColumnMarginInches = 0
    ColumnMarginMM = 0
    Columns = 1
    DisplayPrintDialog = False
    LeftMarginInches = 0
    LeftMarginMM = 0
    Orientation = poPortrait
    PageFrame.DrawTop = False
    PageFrame.DrawBottom = False
    PageFrame.DrawLeft = False
    PageFrame.DrawRight = False
    PaperLength = 0
    PaperSize = qrpDefault
    PaperWidth = 0
    RestartData = True
    ShowProgress = False
    SQLCompatible = False
    TitleBeforeHeader = False
    Left = 96
    Top = 160
  end
  object PopupMenu1: TPopupMenu
    Left = 124
    Top = 160
    object Doplnitvhru1: TMenuItem
      Caption = '&Doplnit v�hru'
      ShortCut = 86
      OnClick = Doplnitvhru1Click
    end
    object Doplnitdatum1: TMenuItem
      Caption = 'D&oplnit datum'
      ShortCut = 68
      OnClick = Doplnitdatum1Click
    end
    object Zmnitvklad1: TMenuItem
      Caption = 'Zm�nit vklad'
      ShortCut = 75
      OnClick = Zmnitvklad1Click
    end
    object Uloitszku1: TMenuItem
      Caption = '&Ulo�it s�zku'
      ShortCut = 85
      OnClick = Uloitszku1Click
    end
    object Nahrtszku1: TMenuItem
      Caption = '&Nahr�t s�zku'
      ShortCut = 72
      OnClick = Nahrtszku1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Tiskszky1: TMenuItem
      Caption = '&Tisk s�zky'
      ShortCut = 0
      OnClick = Tiskszky1Click
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'kvs'
    FileEditStyle = fsEdit
    Filter = 'Kolik vsadit ��astn�ch 10|*.kvs'
    Options = [ofOverwritePrompt]
    Left = 180
    Top = 160
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'kvs'
    FileEditStyle = fsEdit
    Filter = 'Kolik vsadit ��astn�ch 10|*.kvs'
    Left = 208
    Top = 160
  end
end