Chip 2000 February/Chip_2000-02_cd.bin/zkuste/Delphi/navody/tt/objvm.exe/SAMPLE/LangQueryU.dfm/LangQueryU.txt

Text File | 1998-03-16 | 1KB | 76 lines

object LangQuery: TLangQuery
  Left = 291
  Top = 96
  Height = 304
  Width = 300
  object QueryClass: TClassValue
    LangName = 'TQuery'
    LangOwner = RunTime.VM
    Left = 20
    Top = 8
  end
  object CreateProc: TLangProc
    LangName = 'Create'
    LangOwner = QueryClass
    OnExec = CreateProcExec
    Left = 84
    Top = 8
  end
  object DatabaseName: TLangProc
    LangName = 'DatabaseName'
    LangOwner = QueryClass
    OnExec = DatabaseNameExec
    Left = 84
    Top = 60
  end
  object SQL: TLangProc
    LangName = 'SQL'
    LangOwner = QueryClass
    OnExec = SQLExec
    Left = 84
    Top = 108
  end
  object OpenProc: TLangProc
    LangName = 'Open'
    LangOwner = QueryClass
    OnExec = OpenProcExec
    Left = 84
    Top = 156
  end
  object CloseProc: TLangProc
    LangName = 'Close'
    LangOwner = QueryClass
    OnExec = CloseProcExec
    Left = 88
    Top = 208
  end
  object FirstProc: TLangProc
    LangName = 'First'
    LangOwner = QueryClass
    OnExec = FirstProcExec
    Left = 160
    Top = 8
  end
  object NextProc: TLangProc
    LangName = 'Next'
    LangOwner = QueryClass
    OnExec = NextProcExec
    Left = 164
    Top = 60
  end
  object EOFP: TLangProc
    LangName = 'EOF'
    LangOwner = QueryClass
    OnExec = EOFPExec
    Left = 164
    Top = 112
  end
  object GetValueP: TLangProc
    LangName = 'GetValue'
    LangOwner = QueryClass
    OnExec = GetValuePExec
    Left = 164
    Top = 164
  end
end