home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 A / CHIP_HITWARE6_A.iso / edukacja / AstroMart / _SETUP.1 / Astro5.exe / 0 / RCDATA / TANAEDITDLG / TANAEDITDLG.txt
Encoding:
Text File  |  1998-05-13  |  12.1 KB  |  461 lines
  1. object AnaEditDlg: TAnaEditDlg
  2.   Left = 179
  3.   Top = 24
  4.   BorderIcons = []
  5.   BorderStyle = bsSingle
  6.   Caption = 'Analysis file'
  7.   ClientHeight = 449
  8.   ClientWidth = 635
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   OnClose = FormClose
  15.   PixelsPerInch = 96
  16.   TextHeight = 13
  17.   object OkBtn: TButton
  18.     Left = 413
  19.     Top = 396
  20.     Width = 81
  21.     Height = 41
  22.     Caption = 'Ok'
  23.     Default = True
  24.     ModalResult = 1
  25.     TabOrder = 0
  26.   end
  27.   object HelpBtn: TButton
  28.     Left = 333
  29.     Top = 407
  30.     Width = 60
  31.     Height = 30
  32.     Caption = 'Help'
  33.     TabOrder = 1
  34.     OnClick = HelpBtnClick
  35.   end
  36.   object RichEdit: TRichEdit
  37.     Left = 0
  38.     Top = 56
  39.     Width = 633
  40.     Height = 225
  41.     Font.Color = clBlack
  42.     Font.Height = -15
  43.     Font.Name = 'MS Sans Serif'
  44.     Font.Style = []
  45.     HideSelection = False
  46.     ParentFont = False
  47.     ScrollBars = ssVertical
  48.     TabOrder = 2
  49.     OnSelectionChange = RichEditSelectionChange
  50.   end
  51.   object TypeCB: TComboBox
  52.     Left = 8
  53.     Top = 32
  54.     Width = 121
  55.     Height = 21
  56.     ItemHeight = 13
  57.     TabOrder = 3
  58.     OnChange = TypeCBChange
  59.   end
  60.   object Planet1CB: TComboBox
  61.     Left = 136
  62.     Top = 32
  63.     Width = 121
  64.     Height = 21
  65.     ItemHeight = 13
  66.     TabOrder = 4
  67.     OnChange = CrtlsChanged
  68.   end
  69.   object Planet2CB: TComboBox
  70.     Left = 264
  71.     Top = 32
  72.     Width = 121
  73.     Height = 21
  74.     ItemHeight = 13
  75.     TabOrder = 5
  76.     OnChange = CrtlsChanged
  77.   end
  78.   object AspectCB: TComboBox
  79.     Left = 392
  80.     Top = 32
  81.     Width = 121
  82.     Height = 21
  83.     ItemHeight = 13
  84.     TabOrder = 6
  85.     OnChange = CrtlsChanged
  86.   end
  87.   object DBNavigator1: TDBNavigator
  88.     Left = 0
  89.     Top = 400
  90.     Width = 306
  91.     Height = 49
  92.     DataSource = Data1.AnaSource
  93.     VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
  94.     TabOrder = 7
  95.   end
  96.   object Panel1: TPanel
  97.     Left = 0
  98.     Top = 0
  99.     Width = 635
  100.     Height = 29
  101.     Align = alTop
  102.     TabOrder = 8
  103.     object CutBtn: TSpeedButton
  104.       Left = 6
  105.       Top = 2
  106.       Width = 25
  107.       Height = 25
  108.       Hint = 'Cut'
  109.       Glyph.Data = {
  110.         06020000424D0602000000000000760000002800000028000000140000000100
  111.         0400000000009001000000000000000000001000000000000000000000000000
  112.         80000080000000808000800000008000800080800000C0C0C000808080000000
  113.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  114.         3333333333333333333333333333333333333333333333333333FFFF333333FF
  115.         FF33333844833333384483333338888FF33338888FF333843348333384334833
  116.         3388F388F333883388F3338433343333433348333388F338F3338F3388F33384
  117.         33343333433348333388FF38FF338F3388333338433483384334833333388FF8
  118.         8FF88FF883333333844448844448333333338888888888883333333333444444
  119.         4433333333333388888888333333333333346FF6433333333333333883F88F33
  120.         333333333330F00F0333333333333338388383F333333333330FFFF0F0333333
  121.         3333338333F8383F3333333330FFF00FFF033333333338333883F383F3333333
  122.         0FFF0330FFF033333333833383383F383F333330FFF033330FFF033333383338
  123.         333383F383F3330FFF03333330FFF033338F33833333383F38F3330FF0333333
  124.         330FF033338F383333333383F8F3330F033333333330F033338F833333333338
  125.         38F3330033333333333300333388333333333333883333333333333333333333
  126.         33333333333333333333}
  127.       NumGlyphs = 2
  128.       OnClick = CutBtnClick
  129.     end
  130.     object CopyBtn: TSpeedButton
  131.       Left = 30
  132.       Top = 2
  133.       Width = 25
  134.       Height = 25
  135.       Hint = 'Copy'
  136.       Glyph.Data = {
  137.         06020000424D0602000000000000760000002800000028000000140000000100
  138.         0400000000009001000000000000000000001000000000000000000000000000
  139.         80000080000000808000800000008000800080800000C0C0C000808080000000
  140.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  141.         3333333333333333FFFFFFFFFF33333333300000000003333333333888888888
  142.         8F3333333330FFFFFFFF033333333338F33333338F3333333330BFBFBFBF0333
  143.         33333338F3FFFFFF8F3333333330F888888F033333333338F88888838F333333
  144.         3330BFBFBFBF0333333FFFF8F3FFFFFF8F3333000000F888888F033333888888
  145.         F88888838F33330FFFF0BFBFBFBF0333338F3338F3FFFFFF8F33330FFFF0F888
  146.         888F0333338F3338F88888838F33330F7770BFBFBFBF0333338F3338F333333F
  147.         8F33330FFFF0FFFFFF000333338F3338F33333888333330F7770BFBFBF003333
  148.         338F3338FFFFFF883333330FFFF0000000033333338F3338888888833333330F
  149.         777777F033333333338F33333338F3333333330FFFFFFFF033333333338F3333
  150.         33F8F3333333330FFFFFF00033333333338F3333388833333333330FFFFFF003
  151.         33333333338FFFFFF88333333333330000000033333333333388888888333333
  152.         3333333333333333333333333333333333333333333333333333333333333333
  153.         33333333333333333333}
  154.       NumGlyphs = 2
  155.       OnClick = CopyBtnClick
  156.     end
  157.     object PasteBtn: TSpeedButton
  158.       Left = 54
  159.       Top = 2
  160.       Width = 25
  161.       Height = 25
  162.       Hint = 'Paste'
  163.       Glyph.Data = {
  164.         06020000424D0602000000000000760000002800000028000000140000000100
  165.         0400000000009001000000000000000000001000000000000000000000000000
  166.         80000080000000808000800000008000800080800000C0C0C000808080000000
  167.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  168.         3333333333333333333FFFFFFFFF333333333300000000033333333333888888
  169.         888F33333333330BFBFBFB03333FFFFFFF8F3FFFFF8F33000000000F88888F03
  170.         33888888888F8888838F307F7F7F7F0BFBFBFB0338F33333338F333FFF8F30F7
  171.         F7F7F70F77888F0338F33333338FFF88838F307F7F7F74444BFBFB0338F33333
  172.         38888F3FFF8F30F7F7F7F7C447888F0338F3333333888F88838F307F7F7F744C
  173.         4BFBFB0338F3333338888F333F8F30F7F7F7444F4FFF880338F33333888F8333
  174.         8883307F7F74440BFBFB803338F33338888FFFFF883330F7F744470000000333
  175.         38F33388838888888333307F7F747F7F0333333338F3333833338F33333330F7
  176.         F7F7F7F70333333338F3333333338F333333307F7F7F7F7F0333333338F33FFF
  177.         FFF38F33333330F7444444F703333333383F888888FF833333333300ECCCC400
  178.         33333333338838888888333333333333ECCCC433333333333333388888333333
  179.         333333333EEEE333333333333333333333333333333333333333333333333333
  180.         33333333333333333333}
  181.       NumGlyphs = 2
  182.       OnClick = PasteBtnClick
  183.     end
  184.     object FontBtn: TSpeedButton
  185.       Left = 326
  186.       Top = 2
  187.       Width = 25
  188.       Height = 25
  189.       Hint = 'Font'
  190.       Glyph.Data = {
  191.         76010000424D7601000000000000760000002800000020000000100000000100
  192.         04000000000000010000130B0000130B00000000000000000000000000000000
  193.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  194.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  195.         3333333333333333333333333333333333333333FFF33FFFFF33333300033000
  196.         00333337773377777333333330333300033333337FF33777F333333330733300
  197.         0333333377FFF777F33333333700000073333333777777773333333333033000
  198.         3333333337FF777F333333333307300033333333377F777F3333333333703007
  199.         33333333377F7773333333333330000333333333337777F33333333333300003
  200.         33333333337777F3333333333337007333333333337777333333333333330033
  201.         3333333333377333333333333333033333333333333733333333333333333333
  202.         3333333333333333333333333333333333333333333333333333}
  203.       NumGlyphs = 2
  204.       OnClick = FontBtnClick
  205.     end
  206.     object BoldBtn: TSpeedButton
  207.       Left = 358
  208.       Top = 2
  209.       Width = 25
  210.       Height = 25
  211.       Hint = 'Font'
  212.       AllowAllUp = True
  213.       GroupIndex = 1
  214.       Caption = 'b'
  215.       Font.Color = clBlack
  216.       Font.Height = -16
  217.       Font.Name = 'MS Sans Serif'
  218.       Font.Style = [fsBold]
  219.       NumGlyphs = 2
  220.       ParentFont = False
  221.       OnClick = BoldBtnClick
  222.     end
  223.     object ItalicBtn: TSpeedButton
  224.       Left = 382
  225.       Top = 2
  226.       Width = 25
  227.       Height = 25
  228.       Hint = 'Font'
  229.       AllowAllUp = True
  230.       GroupIndex = 2
  231.       Caption = 'i'
  232.       Font.Color = clBlack
  233.       Font.Height = -16
  234.       Font.Name = 'MS Sans Serif'
  235.       Font.Style = [fsItalic]
  236.       NumGlyphs = 2
  237.       ParentFont = False
  238.       OnClick = ItalicBtnClick
  239.     end
  240.     object UnderlineBtn: TSpeedButton
  241.       Left = 406
  242.       Top = 2
  243.       Width = 25
  244.       Height = 25
  245.       Hint = 'Font'
  246.       AllowAllUp = True
  247.       GroupIndex = 3
  248.       Caption = 'u'
  249.       Font.Color = clBlack
  250.       Font.Height = -16
  251.       Font.Name = 'MS Sans Serif'
  252.       Font.Style = [fsUnderline]
  253.       NumGlyphs = 2
  254.       ParentFont = False
  255.       OnClick = UnderlineBtnClick
  256.     end
  257.     object NormalBtn: TSpeedButton
  258.       Left = 430
  259.       Top = 2
  260.       Width = 25
  261.       Height = 25
  262.       Hint = 'Font'
  263.       Caption = 'N'
  264.       Font.Color = clBlack
  265.       Font.Height = -16
  266.       Font.Name = 'MS Sans Serif'
  267.       Font.Style = []
  268.       NumGlyphs = 2
  269.       ParentFont = False
  270.       OnClick = NormalBtnClick
  271.     end
  272.     object ComboBox1: TComboBox
  273.       Left = 464
  274.       Top = 4
  275.       Width = 89
  276.       Height = 21
  277.       ItemHeight = 13
  278.       Items.Strings = (
  279.         '[|]'
  280.         '[$N]'
  281.         '[$F]'
  282.         '[$B]'
  283.         '[$C]'
  284.         '[$S]'
  285.         '[$D]'
  286.         '[$T]'
  287.         '[$PS1]'
  288.         '[$PS2]'
  289.         '[$PS3]'
  290.         '[$PS4]'
  291.         '[$PS5]'
  292.         '[$PS6]'
  293.         '[$PS7]'
  294.         '[$PS8]'
  295.         '[$PS9]'
  296.         '[$PS10]'
  297.         '[$PS11]'
  298.         '[$PS12]'
  299.         '[$PS13]'
  300.         '[$PS22]'
  301.         '[$HS1]'
  302.         '[$HS2]'
  303.         '[$HS3]'
  304.         '[$HS4]'
  305.         '[$HS5]'
  306.         '[$HS6]'
  307.         '[$HS7]'
  308.         '[$HS8]'
  309.         '[$HS9]'
  310.         '[$HS10]'
  311.         '[$HS11]'
  312.         '[$HS12]'
  313.         '[$HS13]'
  314.         '[$HS22]'
  315.         '[?PS1,1 text]'
  316.         '[?PS2,1 text]'
  317.         '[?PS3,1 text]'
  318.         '[?PS4,1 text]'
  319.         '[?PS5,1 text]'
  320.         '[?PS6,1 text]'
  321.         '[?PS7,1 text]'
  322.         '[?PS8,1 text]'
  323.         '[?PS9,1 text]'
  324.         '[?PS10,1 text]'
  325.         '[?PS11,1 text]'
  326.         '[?PS12,1 text]'
  327.         '[?PS13,1 text]'
  328.         '[?PS22,1 text]'
  329.         '[?HS1,1 text]'
  330.         '[?HS2,1 text]'
  331.         '[?HS3,1 text]'
  332.         '[?HS4,1 text]'
  333.         '[?HS5,1 text]'
  334.         '[?HS6,1 text]'
  335.         '[?HS7,1 text]'
  336.         '[?HS8,1 text]'
  337.         '[?HS9,1 text]'
  338.         '[?HS10,1 text]'
  339.         '[?HS11,1 text]'
  340.         '[?HS12,1 text]'
  341.         '[?HS13,1 text]'
  342.         '[?HS22,1 text]')
  343.       TabOrder = 0
  344.       OnChange = ComboBox1Change
  345.     end
  346.     object FontName: TComboBox
  347.       Left = 82
  348.       Top = 4
  349.       Width = 131
  350.       Height = 21
  351.       ItemHeight = 13
  352.       Sorted = True
  353.       TabOrder = 1
  354.       OnChange = FontNameChange
  355.     end
  356.     object FontSize: TSpinEdit
  357.       Left = 280
  358.       Top = 4
  359.       Width = 41
  360.       Height = 22
  361.       MaxValue = 256
  362.       MinValue = 6
  363.       TabOrder = 2
  364.       Value = 6
  365.       OnChange = FontSizeChange
  366.     end
  367.     object CharSet: TComboBox
  368.       Left = 214
  369.       Top = 4
  370.       Width = 67
  371.       Height = 21
  372.       ItemHeight = 13
  373.       TabOrder = 3
  374.       OnChange = CharSetChange
  375.     end
  376.   end
  377.   object DBGrid1: TDBGrid
  378.     Left = 0
  379.     Top = 320
  380.     Width = 305
  381.     Height = 81
  382.     Columns = <
  383.       item
  384.         FieldName = 'Type'
  385.       end
  386.       item
  387.         FieldName = 'Planet1'
  388.       end
  389.       item
  390.         FieldName = 'Planet2'
  391.       end
  392.       item
  393.         FieldName = 'Aspect'
  394.       end>
  395.     DataSource = Data1.AnaSource
  396.     ReadOnly = True
  397.     TabOrder = 9
  398.     TitleFont.Color = clWindowText
  399.     TitleFont.Height = -11
  400.     TitleFont.Name = 'MS Sans Serif'
  401.     TitleFont.Style = []
  402.     OnDblClick = DBGrid1DblClick
  403.   end
  404.   object AcceptBtn: TButton
  405.     Left = 413
  406.     Top = 340
  407.     Width = 81
  408.     Height = 41
  409.     Caption = 'Accept'
  410.     TabOrder = 10
  411.     OnClick = AcceptBtnClick
  412.   end
  413.   object DBGrid2: TDBGrid
  414.     Left = 0
  415.     Top = 280
  416.     Width = 561
  417.     Height = 41
  418.     Columns = <
  419.       item
  420.         FieldName = 'Intellect'
  421.       end
  422.       item
  423.         FieldName = 'Action'
  424.       end
  425.       item
  426.         FieldName = 'Sensibility'
  427.       end
  428.       item
  429.         FieldName = 'Love'
  430.       end
  431.       item
  432.         FieldName = 'Health'
  433.       end
  434.       item
  435.         FieldName = 'Social'
  436.       end
  437.       item
  438.         FieldName = 'Work'
  439.       end
  440.       item
  441.         FieldName = 'Money'
  442.       end>
  443.     DataSource = Data1.ValueSource
  444.     TabOrder = 11
  445.     TitleFont.Color = clWindowText
  446.     TitleFont.Height = -11
  447.     TitleFont.Name = 'MS Sans Serif'
  448.     TitleFont.Style = []
  449.   end
  450.   object FontDialog1: TFontDialog
  451.     Font.Color = clWindowText
  452.     Font.Height = -15
  453.     Font.Name = 'Times New Roman'
  454.     Font.Style = []
  455.     MinFontSize = 0
  456.     MaxFontSize = 0
  457.     Left = 334
  458.     Top = 342
  459.   end
  460. end
  461.