main.txt

来自「关于利用DELPHI来进行企业级方案解决的著作的附书源码」· 文本 代码 · 共 51 行

object Form1: TForm1
  Left = 200
  Top = 108
  Width = 435
  Height = 300
  Caption = 'Form1'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ListBox1: TListBox
    Left = 24
    Top = 8
    Width = 169
    Height = 233
    ItemHeight = 13
    TabOrder = 0
  end
  object ListBox2: TListBox
    Left = 248
    Top = 8
    Width = 169
    Height = 233
    ItemHeight = 13
    TabOrder = 1
  end
  object MainMenu1: TMainMenu
    Left = 208
    Top = 8
    object Options1: TMenuItem
      Caption = 'Options'
      ShortCut = 0
      object RunThread1: TMenuItem
        Caption = 'Run Thread'
        ShortCut = 0
        OnClick = RunThread1Click
      end
      object UseMutex1: TMenuItem
        Caption = 'Use Mutex'
        ShortCut = 0
        OnClick = UseMutex1Click
      end
    end
  end
end