home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 October / Chip_2000-10_cd1.bin / ctenari / Mojdis / statistika.exe / 0 / RCDATA / TFMAIN / TFMAIN.txt
Encoding:
Text File  |  2000-08-20  |  16.1 KB  |  669 lines
  1. object fMain: TfMain
  2.   Left = 127
  3.   Top = 91
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = '∩┐╜tatistika pripojenia na internet'
  7.   ClientHeight = 459
  8.   ClientWidth = 644
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   Menu = MainMenu1
  16.   OldCreateOrder = False
  17.   Position = poScreenCenter
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object Bevel1: TBevel
  23.     Left = 403
  24.     Top = 250
  25.     Width = 232
  26.     Height = 183
  27.     Shape = bsFrame
  28.   end
  29.   object Label5: TLabel
  30.     Left = 533
  31.     Top = 271
  32.     Width = 28
  33.     Height = 13
  34.     Caption = 'Rok :'
  35.     Font.Charset = EASTEUROPE_CHARSET
  36.     Font.Color = clWindowText
  37.     Font.Height = -11
  38.     Font.Name = 'Tahoma'
  39.     Font.Style = [fsBold]
  40.     ParentFont = False
  41.   end
  42.   object Label6: TLabel
  43.     Left = 421
  44.     Top = 271
  45.     Width = 45
  46.     Height = 13
  47.     Caption = 'Mesiac :'
  48.     Font.Charset = EASTEUROPE_CHARSET
  49.     Font.Color = clWindowText
  50.     Font.Height = -11
  51.     Font.Name = 'Tahoma'
  52.     Font.Style = [fsBold]
  53.     ParentFont = False
  54.   end
  55.   object Bevel2: TBevel
  56.     Left = 412
  57.     Top = 372
  58.     Width = 215
  59.     Height = 5
  60.     Shape = bsBottomLine
  61.   end
  62.   object Bevel3: TBevel
  63.     Left = 413
  64.     Top = 333
  65.     Width = 215
  66.     Height = 5
  67.     Shape = bsBottomLine
  68.   end
  69.   object RzURLLabel1: TRzURLLabel
  70.     Left = 461
  71.     Top = 407
  72.     Width = 116
  73.     Height = 13
  74.     Caption = 'http://dumeter.miesto.sk'
  75.     Font.Charset = DEFAULT_CHARSET
  76.     Font.Color = clHighlight
  77.     Font.Height = -11
  78.     Font.Name = 'MS Sans Serif'
  79.     Font.Style = [fsUnderline]
  80.     ParentFont = False
  81.     FrameSides = []
  82.     URL = 'http://dumeter.miesto.sk'
  83.   end
  84.   object RzURLLabel2: TRzURLLabel
  85.     Left = 473
  86.     Top = 384
  87.     Width = 93
  88.     Height = 13
  89.     BiDiMode = bdLeftToRight
  90.     Caption = 'dumeter@miesto.sk'
  91.     Color = clBtnFace
  92.     Font.Charset = DEFAULT_CHARSET
  93.     Font.Color = clHighlight
  94.     Font.Height = -11
  95.     Font.Name = 'MS Sans Serif'
  96.     Font.Style = [fsUnderline]
  97.     ParentBiDiMode = False
  98.     ParentColor = False
  99.     ParentFont = False
  100.     ParentShowHint = False
  101.     ShowHint = False
  102.     FrameSides = []
  103.     URL = 'mailto:dumeter@miesto.sk?subject=Odoslane z programu DialUpMeter'
  104.   end
  105.   object lDnes: TRxLabel
  106.     Left = 456
  107.     Top = 349
  108.     Width = 125
  109.     Height = 16
  110.     Caption = 'Dnes je 20. m∩┐╜j 2000'
  111.     Font.Charset = EASTEUROPE_CHARSET
  112.     Font.Color = clWindowText
  113.     Font.Height = -13
  114.     Font.Name = 'Tahoma'
  115.     Font.Style = []
  116.     ParentFont = False
  117.   end
  118.   object SpeedButton1: TSpeedButton
  119.     Left = 615
  120.     Top = 0
  121.     Width = 19
  122.     Height = 14
  123.     Hint = 'AutoSize'
  124.     Caption = '∩┐╜ '
  125.     Flat = True
  126.     Font.Charset = SYMBOL_CHARSET
  127.     Font.Color = clWindowText
  128.     Font.Height = -11
  129.     Font.Name = 'Symbol'
  130.     Font.Style = []
  131.     ParentFont = False
  132.     ParentShowHint = False
  133.     ShowHint = True
  134.     OnClick = SpeedButton1Click
  135.   end
  136.   object StatusBar1: TStatusBar
  137.     Left = 0
  138.     Top = 440
  139.     Width = 644
  140.     Height = 19
  141.     Font.Charset = EASTEUROPE_CHARSET
  142.     Font.Color = clBlue
  143.     Font.Height = -11
  144.     Font.Name = 'MS Sans Serif'
  145.     Font.Style = [fsBold]
  146.     Panels = <
  147.       item
  148.         Text = 'Celkovo prenesene'
  149.         Width = 230
  150.       end
  151.       item
  152.         Text = 'Cena za 1MB'
  153.         Width = 200
  154.       end
  155.       item
  156.         Text = 'Priemerny tok dat'
  157.         Width = 200
  158.       end>
  159.     SimplePanel = False
  160.     UseSystemFont = False
  161.   end
  162.   object Panel1: TPanel
  163.     Left = 8
  164.     Top = 250
  165.     Width = 382
  166.     Height = 184
  167.     BevelOuter = bvLowered
  168.     Color = 10008744
  169.     TabOrder = 4
  170.     object Shape2: TShape
  171.       Left = 18
  172.       Top = 80
  173.       Width = 345
  174.       Height = 24
  175.       Brush.Style = bsClear
  176.       Shape = stRoundRect
  177.     end
  178.     object Label2: TLabel
  179.       Left = 29
  180.       Top = 8
  181.       Width = 134
  182.       Height = 16
  183.       Caption = 'Z∩┐╜∩┐╜tovacie obdobie :'
  184.       Font.Charset = EASTEUROPE_CHARSET
  185.       Font.Color = clWindowText
  186.       Font.Height = -13
  187.       Font.Name = 'Tahoma'
  188.       Font.Style = [fsBold]
  189.       ParentFont = False
  190.     end
  191.     object Shape1: TShape
  192.       Left = 18
  193.       Top = 29
  194.       Width = 345
  195.       Height = 43
  196.       Brush.Style = bsClear
  197.       Shape = stRoundRect
  198.     end
  199.     object Label3: TLabel
  200.       Left = 29
  201.       Top = 33
  202.       Width = 78
  203.       Height = 14
  204.       Caption = 'Celkov∩┐╜ ∩┐╜as :'
  205.       Font.Charset = EASTEUROPE_CHARSET
  206.       Font.Color = clWindowText
  207.       Font.Height = -12
  208.       Font.Name = 'Tahoma'
  209.       Font.Style = [fsBold]
  210.       ParentFont = False
  211.     end
  212.     object Label4: TLabel
  213.       Left = 29
  214.       Top = 52
  215.       Width = 152
  216.       Height = 14
  217.       Caption = 'Celkov∩┐╜ po∩┐╜et impulzov :'
  218.       Font.Charset = EASTEUROPE_CHARSET
  219.       Font.Color = clWindowText
  220.       Font.Height = -12
  221.       Font.Name = 'Tahoma'
  222.       Font.Style = [fsBold]
  223.       ParentFont = False
  224.     end
  225.     object Label7: TLabel
  226.       Left = 29
  227.       Top = 84
  228.       Width = 91
  229.       Height = 14
  230.       Caption = 'Celkov∩┐╜ suma :'
  231.       Font.Charset = EASTEUROPE_CHARSET
  232.       Font.Color = clWindowText
  233.       Font.Height = -12
  234.       Font.Name = 'Tahoma'
  235.       Font.Style = [fsBold]
  236.       ParentFont = False
  237.     end
  238.     object Shape3: TShape
  239.       Left = 18
  240.       Top = 112
  241.       Width = 345
  242.       Height = 64
  243.       Brush.Style = bsClear
  244.       Shape = stRoundRect
  245.     end
  246.     object Label8: TLabel
  247.       Left = 29
  248.       Top = 119
  249.       Width = 100
  250.       Height = 14
  251.       Caption = 'Celkovo prijat∩┐╜ :'
  252.       Font.Charset = EASTEUROPE_CHARSET
  253.       Font.Color = clWindowText
  254.       Font.Height = -12
  255.       Font.Name = 'Tahoma'
  256.       Font.Style = [fsBold]
  257.       ParentFont = False
  258.     end
  259.     object Label9: TLabel
  260.       Left = 29
  261.       Top = 138
  262.       Width = 115
  263.       Height = 14
  264.       Caption = 'Celkovo odoslan∩┐╜ :'
  265.       Font.Charset = EASTEUROPE_CHARSET
  266.       Font.Color = clWindowText
  267.       Font.Height = -12
  268.       Font.Name = 'Tahoma'
  269.       Font.Style = [fsBold]
  270.       ParentFont = False
  271.     end
  272.     object Label10: TLabel
  273.       Left = 29
  274.       Top = 156
  275.       Width = 123
  276.       Height = 14
  277.       Caption = 'Priemern∩┐╜ r∩┐╜chlos∩┐╜ :'
  278.       Font.Charset = EASTEUROPE_CHARSET
  279.       Font.Color = clWindowText
  280.       Font.Height = -12
  281.       Font.Name = 'Tahoma'
  282.       Font.Style = [fsBold]
  283.       ParentFont = False
  284.     end
  285.     object Obdobie: TLabel
  286.       Left = 184
  287.       Top = 9
  288.       Width = 171
  289.       Height = 16
  290.       Alignment = taCenter
  291.       AutoSize = False
  292.       Caption = 'Janu∩┐╜r 2000'
  293.       Color = 8958104
  294.       Font.Charset = EASTEUROPE_CHARSET
  295.       Font.Color = clWindowText
  296.       Font.Height = -12
  297.       Font.Name = 'Tahoma'
  298.       Font.Style = [fsBold]
  299.       ParentColor = False
  300.       ParentFont = False
  301.     end
  302.     object lCelkovyCas: TLabel
  303.       Left = 184
  304.       Top = 33
  305.       Width = 169
  306.       Height = 15
  307.       Alignment = taCenter
  308.       AutoSize = False
  309.       Caption = '00:00:00'
  310.       Color = 8958104
  311.       Font.Charset = EASTEUROPE_CHARSET
  312.       Font.Color = clLime
  313.       Font.Height = -12
  314.       Font.Name = 'Tahoma'
  315.       Font.Style = [fsBold]
  316.       ParentColor = False
  317.       ParentFont = False
  318.     end
  319.     object Impulzy: TLabel
  320.       Left = 184
  321.       Top = 53
  322.       Width = 169
  323.       Height = 15
  324.       Alignment = taCenter
  325.       AutoSize = False
  326.       Caption = '0'
  327.       Color = 8958104
  328.       Font.Charset = EASTEUROPE_CHARSET
  329.       Font.Color = clBlack
  330.       Font.Height = -12
  331.       Font.Name = 'Tahoma'
  332.       Font.Style = [fsBold]
  333.       ParentColor = False
  334.       ParentFont = False
  335.     end
  336.     object CelkovaSuma: TLabel
  337.       Left = 184
  338.       Top = 85
  339.       Width = 169
  340.       Height = 14
  341.       Alignment = taCenter
  342.       AutoSize = False
  343.       Caption = '000,00 Sk'
  344.       Color = 8958104
  345.       Font.Charset = EASTEUROPE_CHARSET
  346.       Font.Color = clYellow
  347.       Font.Height = -12
  348.       Font.Name = 'Tahoma'
  349.       Font.Style = [fsBold]
  350.       ParentColor = False
  351.       ParentFont = False
  352.     end
  353.     object CelkovoPrijate: TLabel
  354.       Left = 184
  355.       Top = 119
  356.       Width = 169
  357.       Height = 15
  358.       Alignment = taCenter
  359.       AutoSize = False
  360.       Caption = '000,00 kB'
  361.       Color = 8958104
  362.       Font.Charset = EASTEUROPE_CHARSET
  363.       Font.Color = clAqua
  364.       Font.Height = -12
  365.       Font.Name = 'Tahoma'
  366.       Font.Style = [fsBold]
  367.       ParentColor = False
  368.       ParentFont = False
  369.     end
  370.     object CelkovoOdoslane: TLabel
  371.       Left = 184
  372.       Top = 137
  373.       Width = 169
  374.       Height = 15
  375.       Alignment = taCenter
  376.       AutoSize = False
  377.       Caption = '000,00 kB'
  378.       Color = 8958104
  379.       Font.Charset = EASTEUROPE_CHARSET
  380.       Font.Color = clAqua
  381.       Font.Height = -12
  382.       Font.Name = 'Tahoma'
  383.       Font.Style = [fsBold]
  384.       ParentColor = False
  385.       ParentFont = False
  386.     end
  387.     object PriemRychlost: TLabel
  388.       Left = 184
  389.       Top = 155
  390.       Width = 169
  391.       Height = 15
  392.       Alignment = taCenter
  393.       AutoSize = False
  394.       Caption = '00 000 bps'
  395.       Color = 8958104
  396.       Font.Charset = EASTEUROPE_CHARSET
  397.       Font.Color = 8388863
  398.       Font.Height = -12
  399.       Font.Name = 'Tahoma'
  400.       Font.Style = [fsBold]
  401.       ParentColor = False
  402.       ParentFont = False
  403.     end
  404.   end
  405.   object ComboBox1: TComboBox
  406.     Left = 421
  407.     Top = 288
  408.     Width = 90
  409.     Height = 21
  410.     Style = csDropDownList
  411.     Color = 14737632
  412.     DropDownCount = 13
  413.     Font.Charset = DEFAULT_CHARSET
  414.     Font.Color = 16737894
  415.     Font.Height = -11
  416.     Font.Name = 'MS Sans Serif'
  417.     Font.Style = [fsBold]
  418.     ItemHeight = 13
  419.     ParentFont = False
  420.     TabOrder = 1
  421.     OnChange = ComboBox1Change
  422.     Items.Strings = (
  423.       'Cel∩┐╜ rok ...'
  424.       'Janu∩┐╜r'
  425.       'Febru∩┐╜r'
  426.       'Marec'
  427.       'Apr∩┐╜l'
  428.       'M∩┐╜j'
  429.       'J∩┐╜n'
  430.       'J∩┐╜l'
  431.       'August'
  432.       'September'
  433.       'Okt∩┐╜ber'
  434.       'November'
  435.       'December')
  436.   end
  437.   object RxRok: TRxSpinEdit
  438.     Left = 533
  439.     Top = 288
  440.     Width = 90
  441.     Height = 21
  442.     EditorEnabled = False
  443.     MaxValue = 9999.000000000000000000
  444.     MinValue = 1000.000000000000000000
  445.     Value = 2000.000000000000000000
  446.     Color = 14737632
  447.     Font.Charset = DEFAULT_CHARSET
  448.     Font.Color = 12615680
  449.     Font.Height = -11
  450.     Font.Name = 'MS Sans Serif'
  451.     Font.Style = [fsBold]
  452.     MaxLength = 4
  453.     ParentFont = False
  454.     TabOrder = 2
  455.     OnChange = ComboBox1Change
  456.   end
  457.   object StringGrid1: TAdvStringGrid
  458.     Left = 8
  459.     Top = 14
  460.     Width = 625
  461.     Height = 225
  462.     Color = 14737632
  463.     ColCount = 10
  464.     DefaultRowHeight = 18
  465.     FixedCols = 0
  466.     RowCount = 2
  467.     Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goColSizing, goRowSelect]
  468.     TabOrder = 0
  469.     OnSelectCell = StringGrid1SelectCell
  470.     AutoNumAlign = False
  471.     AutoSize = False
  472.     VAlignment = vtaTop
  473.     EnhTextSize = False
  474.     EnhRowColMove = False
  475.     SortFixedCols = False
  476.     SortNormalCellsOnly = False
  477.     SizeWithForm = False
  478.     Multilinecells = False
  479.     SortDirection = sdAscending
  480.     SortFull = False
  481.     SortAutoFormat = True
  482.     SortShow = False
  483.     EnableGraphics = False
  484.     SortColumn = 0
  485.     HintColor = clYellow
  486.     SelectionColor = clHighlight
  487.     SelectionTextColor = clHighlightText
  488.     SelectionRectangle = False
  489.     SelectionRTFKeep = False
  490.     HintShowCells = False
  491.     PrintSettings.FooterSize = 0
  492.     PrintSettings.HeaderSize = 0
  493.     PrintSettings.Time = ppNone
  494.     PrintSettings.Date = ppNone
  495.     PrintSettings.DateFormat = 'dd/mm/yyyy'
  496.     PrintSettings.PageNr = ppNone
  497.     PrintSettings.Title = ppNone
  498.     PrintSettings.Font.Charset = DEFAULT_CHARSET
  499.     PrintSettings.Font.Color = clWindowText
  500.     PrintSettings.Font.Height = -11
  501.     PrintSettings.Font.Name = 'MS Sans Serif'
  502.     PrintSettings.Font.Style = []
  503.     PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
  504.     PrintSettings.HeaderFont.Color = clWindowText
  505.     PrintSettings.HeaderFont.Height = -11
  506.     PrintSettings.HeaderFont.Name = 'MS Sans Serif'
  507.     PrintSettings.HeaderFont.Style = []
  508.     PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
  509.     PrintSettings.FooterFont.Color = clWindowText
  510.     PrintSettings.FooterFont.Height = -11
  511.     PrintSettings.FooterFont.Name = 'MS Sans Serif'
  512.     PrintSettings.FooterFont.Style = []
  513.     PrintSettings.Borders = pbNoborder
  514.     PrintSettings.BorderStyle = psSolid
  515.     PrintSettings.Centered = False
  516.     PrintSettings.RepeatFixedRows = False
  517.     PrintSettings.RepeatFixedCols = False
  518.     PrintSettings.LeftSize = 0
  519.     PrintSettings.RightSize = 0
  520.     PrintSettings.ColumnSpacing = 0
  521.     PrintSettings.RowSpacing = 0
  522.     PrintSettings.TitleSpacing = 0
  523.     PrintSettings.Orientation = poPortrait
  524.     PrintSettings.FixedWidth = 0
  525.     PrintSettings.FixedHeight = 0
  526.     PrintSettings.UseFixedHeight = False
  527.     PrintSettings.UseFixedWidth = False
  528.     PrintSettings.FitToPage = fpNever
  529.     PrintSettings.PageNumSep = '/'
  530.     PrintSettings.NoAutoSize = False
  531.     PrintSettings.PrintGraphics = False
  532.     HTMLSettings.Width = 100
  533.     Navigation.AllowInsertRow = False
  534.     Navigation.AllowDeleteRow = False
  535.     Navigation.AdvanceOnEnter = False
  536.     Navigation.AdvanceInsert = False
  537.     Navigation.AutoGotoWhenSorted = False
  538.     Navigation.AutoGotoIncremental = False
  539.     Navigation.AutoComboDropSize = False
  540.     Navigation.AdvanceDirection = adLeftRight
  541.     Navigation.AllowClipboardShortCuts = False
  542.     Navigation.AllowSmartClipboard = False
  543.     Navigation.AllowRTFClipboard = False
  544.     Navigation.AdvanceAuto = False
  545.     Navigation.InsertPosition = pInsertBefore
  546.     Navigation.CursorWalkEditor = False
  547.     Navigation.MoveRowOnSort = False
  548.     Navigation.ImproveMaskSel = False
  549.     Navigation.AlwaysEdit = False
  550.     ColumnSize.Save = False
  551.     ColumnSize.Stretch = False
  552.     ColumnSize.Location = clRegistry
  553.     CellNode.Color = clSilver
  554.     CellNode.NodeType = cnFlat
  555.     CellNode.NodeColor = clBlack
  556.     SizeWhileTyping.Height = False
  557.     SizeWhileTyping.Width = False
  558.     MouseActions.AllSelect = False
  559.     MouseActions.ColSelect = False
  560.     MouseActions.RowSelect = False
  561.     MouseActions.DirectEdit = False
  562.     MouseActions.DirectComboDrop = False
  563.     MouseActions.DisjunctRowSelect = False
  564.     MouseActions.AllColumnSize = False
  565.     MouseActions.AllRowSize = False
  566.     MouseActions.CaretPositioning = False
  567.     IntelliPan = ipVertical
  568.     URLColor = clBlue
  569.     URLShow = False
  570.     URLFull = False
  571.     URLEdit = False
  572.     ScrollType = ssNormal
  573.     ScrollColor = clNone
  574.     ScrollWidth = 16
  575.     ScrollProportional = False
  576.     ScrollHints = shNone
  577.     OemConvert = False
  578.     FixedFooters = 0
  579.     FixedRightCols = 0
  580.     FixedColWidth = 105
  581.     FixedRowHeight = 18
  582.     FixedFont.Charset = DEFAULT_CHARSET
  583.     FixedFont.Color = clWindowText
  584.     FixedFont.Height = -11
  585.     FixedFont.Name = 'MS Sans Serif'
  586.     FixedFont.Style = []
  587.     FixedAsButtons = False
  588.     FloatFormat = '%.2f'
  589.     WordWrap = False
  590.     Lookup = False
  591.     LookupCaseSensitive = False
  592.     LookupHistory = False
  593.     HideFocusRect = False
  594.     BackGround.Top = 0
  595.     BackGround.Left = 0
  596.     BackGround.Display = bdTile
  597.     Hovering = False
  598.     Filter = <>
  599.     FilterActive = False
  600.     ColWidths = (
  601.       105
  602.       40
  603.       50
  604.       54
  605.       50
  606.       64
  607.       64
  608.       64
  609.       64
  610.       64)
  611.     RowHeights = (
  612.       18
  613.       18)
  614.   end
  615.   object MainMenu1: TMainMenu
  616.     Left = 528
  617.     Top = 80
  618.     object Grafy1: TMenuItem
  619.       Caption = 'Grafy'
  620.       OnClick = Grafy1Click
  621.     end
  622.     object Sluby1: TMenuItem
  623.       Caption = '&Slu∩┐╜by'
  624.       object Export1: TMenuItem
  625.         Caption = '&Export'
  626.         object Doc1: TMenuItem
  627.           Caption = 'MS Word'
  628.           OnClick = Doc1Click
  629.         end
  630.         object xls1: TMenuItem
  631.           Caption = 'MS Excel'
  632.           OnClick = xls1Click
  633.         end
  634.         object html1: TMenuItem
  635.           Caption = 'S∩┐╜bor html'
  636.           OnClick = html1Click
  637.         end
  638.       end
  639.       object Tla1: TMenuItem
  640.         Caption = '&Tla∩┐╜...'
  641.         OnClick = Tla1Click
  642.       end
  643.     end
  644.     object Nastavenie1: TMenuItem
  645.       Caption = '&Nastavenie'
  646.       OnClick = Nastavenie1Click
  647.     end
  648.     object Oprograme1: TMenuItem
  649.       Caption = '&O programe'
  650.       OnClick = Oprograme1Click
  651.     end
  652.   end
  653.   object SaveDialog1: TSaveDialog
  654.     Left = 568
  655.     Top = 80
  656.   end
  657.   object AdvGridPrintSettingsDialog1: TAdvGridPrintSettingsDialog
  658.     Grid = StringGrid1
  659.     Options = [psBorders, psGeneral, psFonts, psDateTime, psTitle, psPages, psMargins, psSpacing, psOrientation]
  660.     PrintPreview = True
  661.     Left = 608
  662.     Top = 80
  663.   end
  664.   object PrinterSetupDialog1: TPrinterSetupDialog
  665.     Left = 592
  666.     Top = 120
  667.   end
  668. end
  669.