PC World Plus! (NZ) 2001 June/HDC50.iso/Runimage/Delphi50/Bin/CORIDE50.BPL/0/RCDATA/TRUNPARAMSDLG/TRUNPARAMSDLG.txt

Text File | 1999-08-11 | 5.4 KB | 234 lines

object RunParamsDlg: TRunParamsDlg
  Left = 253
  Top = 148
  HelpContext = 1628
  ActiveControl = ParamInput
  BorderStyle = bsDialog
  Caption = 'Run Parameters'
  ClientHeight = 253
  ClientWidth = 441
  Color = clBtnFace
  ParentFont = True
  OldCreateOrder = True
  PopupMenu = PopupMenu1
  Position = poScreenCenter
  OnCreate = FormCreate
  OnShow = RunParamsDlgShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 212
    Width = 441
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    Caption = 'Panel1'
    TabOrder = 1
    object LoadProcButton: TButton
      Left = 120
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Load'
      ModalResult = 6
      TabOrder = 0
      OnClick = OKButtonClick
    end
    object OKButton: TButton
      Left = 200
      Top = 8
      Width = 75
      Height = 25
      Caption = 'OK'
      Default = True
      ModalResult = 1
      TabOrder = 1
      OnClick = OKButtonClick
    end
    object CancelButton: TButton
      Left = 280
      Top = 8
      Width = 75
      Height = 25
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 2
    end
    object HelpButton: TButton
      Left = 360
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Help'
      TabOrder = 3
      OnClick = HelpButtonClick
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 441
    Height = 212
    ActivePage = LocalPage
    Align = alClient
    TabOrder = 0
    OnChange = HostAppInputChange
    OnChanging = PageControl1Changing
    object LocalPage: TTabSheet
      Caption = 'Local'
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 417
        Height = 53
        Caption = ' Host &Application '
        TabOrder = 0
        object HostAppInput: THistoryPropComboBox
          Left = 8
          Top = 20
          Width = 321
          Height = 21
          Enabled = False
          ItemHeight = 13
          TabOrder = 0
          OnChange = HostAppInputChange
          HistoryManager = EnvironmentOptions.HistoryLists
          HistoryList = 'hlHostApplication'
        end
        object BrowseButton: TButton
          Left = 334
          Top = 18
          Width = 75
          Height = 25
          Caption = '&Browse'
          Enabled = False
          TabOrder = 1
          OnClick = BrowseButtonClick
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 67
        Width = 417
        Height = 57
        Caption = ' &Parameters '
        TabOrder = 1
        object ParamInput: THistoryPropComboBox
          Left = 8
          Top = 20
          Width = 401
          Height = 21
          ItemHeight = 13
          TabOrder = 0
          HistoryManager = EnvironmentOptions.HistoryLists
          HistoryList = 'hlRunParameters'
        end
      end
      object ExecuteStartup: TCheckBox
        Left = 8
        Top = 160
        Width = 377
        Height = 17
        Caption = '&Execute startup code on Load'
        TabOrder = 2
      end
    end
    object RemotePage: TTabSheet
      Caption = 'Remote'
      object GroupBox3: TGroupBox
        Left = 8
        Top = 8
        Width = 417
        Height = 81
        Caption = ' Remote '
        TabOrder = 0
        object Label1: TLabel
          Left = 8
          Top = 23
          Width = 65
          Height = 13
          Caption = '&Remote Path:'
          FocusControl = RemotePath
        end
        object Label2: TLabel
          Left = 8
          Top = 51
          Width = 65
          Height = 13
          Caption = 'Remote H&ost:'
          FocusControl = RemoteHost
        end
        object RemotePath: THistoryPropComboBox
          Left = 80
          Top = 20
          Width = 329
          Height = 21
          ItemHeight = 13
          TabOrder = 0
          OnChange = HostAppInputChange
          HistoryManager = EnvironmentOptions.HistoryLists
          HistoryList = 'hlRemotePath'
        end
        object RemoteHost: THistoryPropComboBox
          Left = 80
          Top = 48
          Width = 329
          Height = 21
          ItemHeight = 13
          TabOrder = 1
          HistoryManager = EnvironmentOptions.HistoryLists
          HistoryList = 'hlRemoteHost'
        end
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 95
        Width = 417
        Height = 57
        Caption = ' &Parameters '
        TabOrder = 1
        object RemoteParams: THistoryPropComboBox
          Left = 8
          Top = 20
          Width = 401
          Height = 21
          ItemHeight = 13
          TabOrder = 0
          HistoryManager = EnvironmentOptions.HistoryLists
          HistoryList = 'hlRunParameters'
        end
      end
      object RemoteDebug: TCheckBox
        Left = 8
        Top = 160
        Width = 377
        Height = 17
        Caption = '&Debug project on remote machine'
        TabOrder = 2
      end
    end
  end
  object BrowseDialog: TOpenDialog
    Filter = 'Executable files (*.exe)|*.exe'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 32
    Top = 216
  end
  object PopupMenu1: TPopupMenu
    Left = 82
    Top = 218
    object dNextPage: TMenuItem
      Caption = 'Next Page'
      Visible = False
      OnClick = dNextPageClick
    end
    object dPrevpage: TMenuItem
      Caption = 'Prev Page'
      Visible = False
      OnClick = dPrevpageClick
    end
  end
end