atscriptdebugform.dfm

来自「Suite of components to add scripting cap」· DFM 代码 · 共 1,381 行 · 第 1/5 页

      Action = acRunTo
    end
    object Rununtilreturn2: TMenuItem
      Action = acReturn
    end
    object Showexecutionpoint2: TMenuItem
      Action = acShowExec
    end
    object Pause1: TMenuItem
      Action = acPause
    end
    object Scriptreset1: TMenuItem
      Action = acReset
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Evaluatemodify1: TMenuItem
      Action = acEvaluate
    end
    object Addwatch2: TMenuItem
      Action = acAddWatch
    end
    object Viewwatches2: TMenuItem
      Action = acViewWatch
    end
    object Togglebreakpoint1: TMenuItem
      Action = acToggleBreak
    end
    object Viewbreakpoints2: TMenuItem
      Action = acViewBreak
    end
  end
  object AdvPascalMemoStyler1: TAdvPascalMemoStyler
    BlockStart = 'begin'
    BlockEnd = 'end'
    LineComment = '//'
    MultiCommentLeft = '{'
    MultiCommentRight = '}'
    CommentStyle.TextColor = clNavy
    CommentStyle.BkColor = clWhite
    CommentStyle.Style = [fsItalic]
    NumberStyle.TextColor = clFuchsia
    NumberStyle.BkColor = clWhite
    NumberStyle.Style = [fsBold]
    AllStyles = <
      item
        KeyWords.Strings = (
          'UNIT'
          'INTERFACE'
          'IMPLEMENTATION'
          'USES'
          'CONST'
          'PRIVATE'
          'PUBLIC'
          'PUBLISHED'
          'PROTECTED'
          'PROPERTY'
          'FUNCTION'
          'FINALISE'
          'INITIALISE'
          'VAR'
          'BEGIN'
          'WITH'
          'END'
          'FOR'
          'TO'
          'DO'
          'NOT'
          'IF'
          'THEN'
          'ELSE'
          'CLASS'
          'TYPE'
          'WHILE'
          'REPEAT'
          'UNTIL'
          'BREAK'
          'CONTINUE'
          'VIRTUAL'
          'OVERRIDE'
          'DEFAULT'
          'CLASS'
          'STORED'
          'INHERITED'
          'PROCEDURE'
          'CONSTRUCTOR'
          'DESTRUCTOR'
          'TRY'
          'EXCEPT'
          'FINALLY'
          'RAISE'
          'NIL')
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = [fsBold]
        BGColor = clWhite
        StyleType = stKeyword
        BracketStart = #0
        BracketEnd = #0
        Info = 'Pascal Standard Default'
      end
      item
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        BGColor = clWhite
        StyleType = stBracket
        BracketStart = #0
        BracketEnd = #0
        Info = 'Simple Quote'
      end
      item
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        BGColor = clWhite
        StyleType = stBracket
        BracketStart = #0
        BracketEnd = #0
        Info = 'Double Quote'
      end
      item
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        BGColor = clWhite
        StyleType = stSymbol
        BracketStart = #0
        BracketEnd = #0
        Symbols = ' ,;:.(){}[]=-*/^%<>#'#13#10
        Info = 'Symbols Delimiters'
      end>
    AutoCompletion.Strings = (
      'ShowMessage'
      'MessageDlg')
    HintParameter.TextColor = clBlack
    HintParameter.BkColor = clInfoBk
    HintParameter.HintCharStart = '('
    HintParameter.HintCharEnd = ')'
    HintParameter.HintCharDelimiter = ';'
    HintParameter.HintCharWriteDelimiter = ','
    HintParameter.Parameters.Strings = (
      'ShowMessage(const Msg: string);'
      
        'MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMs' +
        'gDlgButtons; HelpCtx: Longint): Integer);')
    HexIdentifier = '$'
    Description = 'Pascal'
    Filter = 'Pascal Files (*.pas,*.dpr,*.dpk,*.inc)|*.pas;*.dpr;*.dpk;*.inc'
    DefaultExtension = '.pas'
    StylerName = 'Pascal'
    Extensions = 'pas;dpr;dpk;inc'
    Left = 464
    Top = 68
  end
  object AdvBasicMemoStyler1: TAdvBasicMemoStyler
    BlockStart = 'begin'
    BlockEnd = 'end'
    LineComment = #39
    MultiCommentLeft = '{'
    MultiCommentRight = '}'
    CommentStyle.TextColor = clNavy
    CommentStyle.BkColor = clWhite
    CommentStyle.Style = [fsItalic]
    NumberStyle.TextColor = clFuchsia
    NumberStyle.BkColor = clWhite
    NumberStyle.Style = [fsBold]
    AllStyles = <
      item
        KeyWords.Strings = (
          'ALIAS'
          'ALL'
          'AND'
          'AS'
          'ATTACH'
          'AUTO'
          'AUTOX'
          'CASE'
          'CFUNCTION'
          'CLEAR'
          'DCOMPLEX'
          'DEC'
          'DECLARE'
          'DEFAULT'
          'DIM'
          'DO'
          'DOUBLE'
          'EACH'
          'ELSE'
          'ELSEIF'
          'END'
          'ENDIF'
          'ERROR'
          'EXIT'
          'EXPLICIT'
          'EXPORT'
          'EXTERNAL'
          'FALSE'
          'FOR'
          'FOR NEXT'
          'FUNCADDR'
          'FUNCTION'
          'GIANT'
          'GOADDR'
          'GOSUB'
          'GOTO'
          'IF'
          'IFF'
          'IFT'
          'IFZ'
          'IMPORT'
          'IN'
          'INC'
          'INTERNAL'
          'IS'
          'LIBRARYS'
          'LOOP'
          'MOD'
          'MODULE'
          'NEXT'
          'NEW'
          'NOT'
          'NOTHING'
          'OFF'
          'ON'
          'OPTION'
          'OR'
          'PRINT'
          'PROGRAM'
          'PROTECTED'
          'PUBLIC'
          'QUIT'
          'READ'
          'REDIM'
          'RETURN'
          'SBYTE'
          'SCOMPLEX'
          'SELECT'
          'SHARED'
          'SFUNCTION'
          'SHARED'
          'SINGLE'
          'SLONG'
          'SSHORT'
          'STATIC'
          'STEP'
          'STOP'
          'STRING'
          'SUB'
          'SUBADDR'
          'SWAP'
          'THEN'
          'TO'
          'TRUE'
          'TYPE'
          'TYPEOF'
          'UBYTE'
          'ULONG'
          'UNION'
          'UNTIL'
          'USHORT'
          'VERSION'
          'VOID'