home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / WEBSERVE / GSS / GSS32.EXE / 0 / RCDATA / TFMAIN / TFMAIN.txt < prev   
Text File  |  1997-03-14  |  2KB  |  105 lines
  1. object fMain: TfMain
  2.   Left = 523
  3.   Top = 139
  4.   Width = 430
  5.   Height = 254
  6.   Caption = 'GMUtant Simple Server'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   Icon.Data = {<image000.ico>}
  12.   Menu = menuMain
  13.   Position = poScreenCenter
  14.   OnClose = FormClose
  15.   OnCloseQuery = FormCloseQuery
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object sbarMain: TStatusBar
  20.     Left = 0
  21.     Top = 189
  22.     Width = 422
  23.     Height = 19
  24.     Panels = <
  25.       item
  26.         Text = 'Status'
  27.         Width = 250
  28.       end
  29.       item
  30.         Text = 'Time'
  31.         Width = 50
  32.       end>
  33.     SimplePanel = False
  34.     OnClick = sbarMainClick
  35.     OnResize = sbarMainResize
  36.   end
  37.   object memoMain: TMemo
  38.     Left = 0
  39.     Top = 0
  40.     Width = 422
  41.     Height = 189
  42.     Align = alClient
  43.     ScrollBars = ssVertical
  44.     TabOrder = 1
  45.   end
  46.   object menuMain: TMainMenu
  47.     Left = 208
  48.     Top = 16
  49.     object File1: TMenuItem
  50.       Caption = '&File'
  51.       ShortCut = 0
  52.       object maStart: TMenuItem
  53.         Caption = '&Start Server'
  54.         ShortCut = 0
  55.         OnClick = maStartClick
  56.       end
  57.       object maStop: TMenuItem
  58.         Caption = 'S&top Server'
  59.         ShortCut = 0
  60.         OnClick = maStopClick
  61.       end
  62.       object N2: TMenuItem
  63.         Caption = '-'
  64.         ShortCut = 0
  65.       end
  66.       object maClearLogs: TMenuItem
  67.         Caption = '&Clear Logs'
  68.         ShortCut = 0
  69.         OnClick = maClearLogsClick
  70.       end
  71.       object N1: TMenuItem
  72.         Caption = '-'
  73.         ShortCut = 0
  74.       end
  75.       object maExit: TMenuItem
  76.         Caption = '&Exit'
  77.         ShortCut = 16472
  78.         OnClick = maExitClick
  79.       end
  80.     end
  81.     object maConfig: TMenuItem
  82.       Caption = '&Configuration'
  83.       ShortCut = 0
  84.       OnClick = maConfigClick
  85.     end
  86.     object maAbout: TMenuItem
  87.       Caption = '&About'
  88.       ShortCut = 0
  89.       OnClick = maAboutClick
  90.     end
  91.   end
  92.   object timer1Sec: TTimer
  93.     OnTimer = timer1SecTimer
  94.     Left = 176
  95.     Top = 16
  96.   end
  97.   object timerAutoStart: TTimer
  98.     Enabled = False
  99.     Interval = 100
  100.     OnTimer = timerAutoStartTimer
  101.     Left = 240
  102.     Top = 16
  103.   end
  104. end
  105.