PC World Komputer 1998 April B/Pcwk4b98.iso/Internet/Joescgi/JOESCGI.EXE/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1997-04-19 | 15KB | 454 lines

object Form1: TForm1
  Left = 200
  Top = 108
  Width = 484
  Height = 376
  Caption = 'Joe'#39's CGI Editor'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 476
    Height = 57
    Align = alTop
    Shape = bsTopLine
  end
  object SpeedButton1: TSpeedButton
    Left = 8
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
      0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
      33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 32
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      5555555555555555555555555555555555555555555555555555555555555555
      555555555555555555555555555555555555555FFFFFFFFFF555550000000000
      55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
      B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
      000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
      555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
      55555575FFF75555555555700007555555555557777555555555555555555555
      55555555555555555555555555555555555555555555555555550000}
    NumGlyphs = 2
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 56
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
      7700333333337777777733333333008088003333333377F73377333333330088
      88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
      000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
      FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
      99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
    OnClick = SpeedButton3Click
  end
  object SpeedButton4: TSpeedButton
    Left = 88
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
      3333333777333777FF3333993333339993333377FF3333377FF3399993333339
      993337777FF3333377F3393999333333993337F777FF333337FF993399933333
      399377F3777FF333377F993339993333399377F33777FF33377F993333999333
      399377F333777FF3377F993333399933399377F3333777FF377F993333339993
      399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
      99333773FF3333777733339993333339933333773FFFFFF77333333999999999
      3333333777333777333333333999993333333333377777333333}
    NumGlyphs = 2
  end
  object SpeedButton5: TSpeedButton
    Left = 8
    Top = 29
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333FF3333333333333003333333333333377F33333333333307
      733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
      000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
      777077777777777777773CCCCC00000000003777777777777777333330030FFF
      FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
      FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
      0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
      0F03333333337FFF7F7333333333000000333333333377777733}
    NumGlyphs = 2
    OnClick = SpeedButton5Click
  end
  object SpeedButton6: TSpeedButton
    Left = 32
    Top = 29
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
      007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
      7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
      99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
    OnClick = SpeedButton6Click
  end
  object SpeedButton7: TSpeedButton
    Left = 56
    Top = 29
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
      FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
      FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
      FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
      0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
      9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
      9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
      99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
      93337777FF777777733370000000073333333777777773333333}
    NumGlyphs = 2
    OnClick = SpeedButton7Click
  end
  object Bevel2: TBevel
    Left = 176
    Top = 2
    Width = 9
    Height = 55
    Shape = bsLeftLine
  end
  object SpeedButton9: TSpeedButton
    Left = 144
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
      33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
      993337777F777F3377F3393999707333993337F77737333337FF993399933333
      399377F3777FF333377F993339903333399377F33737FF33377F993333707333
      399377F333377FF3377F993333101933399377F333777FFF377F993333000993
      399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
      99333773FF777F777733339993707339933333773FF7FFF77333333999999999
      3333333777333777333333333999993333333333377777333333}
    NumGlyphs = 2
    OnClick = SpeedButton9Click
  end
  object SpeedButton8: TSpeedButton
    Left = 88
    Top = 29
    Width = 25
    Height = 25
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
      300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
      330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
      333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
      339977FF777777773377000BFB03333333337773FF733333333F333000333333
      3300333777333333337733333333333333003333333333333377333333333333
      333333333333333333FF33333333333330003333333333333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = SpeedButton8Click
  end
  object SpeedButton10: TSpeedButton
    Left = 120
    Top = 5
    Width = 25
    Height = 25
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
      33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
      FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
      FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
      FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
      FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
      FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
      3333333773FFFF77333333333FBFBF33333333333777773333330000}
    NumGlyphs = 2
    OnClick = SpeedButton10Click
  end
  object SpeedButton11: TSpeedButton
    Left = 120
    Top = 29
    Width = 49
    Height = 25
    Caption = '&Font'
    OnClick = SpeedButton11Click
  end
  object Bevel3: TBevel
    Left = 464
    Top = 2
    Width = 9
    Height = 57
    Shape = bsLeftLine
  end
  object Memo1: TMemo
    Left = 0
    Top = 57
    Width = 476
    Height = 253
    Align = alClient
    Lines.Strings = (
      '#!/usr/bin/perl')
    ScrollBars = ssBoth
    TabOrder = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 310
    Width = 476
    Height = 20
    Panels = <>
    SimplePanel = False
  end
  object TabbedNotebook1: TTabbedNotebook
    Left = 184
    Top = 5
    Width = 273
    Height = 48
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 2
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Standard'
      object SpeedButton12: TSpeedButton
        Left = 0
        Top = 2
        Width = 57
        Height = 17
        Caption = 'Print'
        OnClick = SpeedButton12Click
      end
      object SpeedButton13: TSpeedButton
        Left = 64
        Top = 2
        Width = 57
        Height = 17
        Caption = 'Open'
        OnClick = SpeedButton13Click
      end
      object SpeedButton18: TSpeedButton
        Left = 128
        Top = 2
        Width = 65
        Height = 17
        Caption = 'Insert Value'
        OnClick = SpeedButton18Click
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Subs'
      object SpeedButton16: TSpeedButton
        Left = 0
        Top = 2
        Width = 65
        Height = 17
        Caption = 'New Sub'
        OnClick = SpeedButton16Click
      end
      object SpeedButton17: TSpeedButton
        Left = 72
        Top = 2
        Width = 65
        Height = 17
        Caption = 'End Sub'
        OnClick = SpeedButton17Click
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Content'
      object SpeedButton14: TSpeedButton
        Left = 0
        Top = 2
        Width = 57
        Height = 17
        Caption = 'Text'
        OnClick = SpeedButton14Click
      end
      object SpeedButton15: TSpeedButton
        Left = 64
        Top = 2
        Width = 57
        Height = 17
        Caption = 'HTML'
        OnClick = SpeedButton15Click
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 232
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object Open1: TMenuItem
        Caption = '&Open'
        ShortCut = 0
        OnClick = Open1Click
      end
      object New1: TMenuItem
        Caption = '&New'
        ShortCut = 0
        OnClick = New1Click
      end
      object SaveAs1: TMenuItem
        Caption = '&Save As...'
        ShortCut = 0
        OnClick = SaveAs1Click
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object ExitProgram1: TMenuItem
        Caption = 'E&xit Program'
        ShortCut = 0
        OnClick = ExitProgram1Click
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object Cut1: TMenuItem
        Caption = '&Cut'
        ShortCut = 16472
        OnClick = Cut1Click
      end
      object Copy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
      object Paste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = Paste1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Find1: TMenuItem
        Caption = '&Find'
        ShortCut = 0
        OnClick = Find1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 'CGI (*.cgi)|*.cgi|Perl (*.pl)|*.pl|All Files (*.*)|*.*'
    Left = 40
    Top = 232
  end
  object SaveDialog1: TSaveDialog
    FileEditStyle = fsEdit
    Filter = 'CGI (*.cgi)|*.cgi|Perl (*.pl)|*.pl|All Files (*.*)|*.*'
    Left = 72
    Top = 232
  end
  object FindDialog1: TFindDialog
    Left = 104
    Top = 232
  end
  object PopupMenu1: TPopupMenu
    Left = 136
    Top = 232
    object TypeHTML1: TMenuItem
      Caption = 'Type: HTML'
      ShortCut = 0
    end
    object TypePlainText1: TMenuItem
      Caption = 'Type: Plain Text'
      ShortCut = 0
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 168
    Top = 232
  end
end