stdvcl.idl

来自「就是这本书的随书代码。包括《实战Delphi 5.x-分布式多层应用系统篇》」· IDL 代码 · 共 36 行

module StdVCL
{
  
  interface IProvider
  {
    any Get_Data();
    any ApplyUpdates(in any Delta, in long MaxErrors, out long ErrorCount);
    any GetMetaData();
    any GetRecords(in long Count, out long RecsOut);
    any DataRequest(in any Input);
    boolean Get_Constraints();
    boolean Set_Constraints();
    void Reset(in boolean MetaData);
    void SetParams(in any Values);
  };
  
  interface IStrings
  {
    any Get_ControlDefault(in long Index);
    any Set_ControlDefault(in long Index);
    long Count();
    any Get_Item(in long Index);
    any Set_Item(in long Index);
    void Remove(in long Index);
    void Clear();
    long Add(in any Item);
    Object NewEnum();
  };
  
  interface IDataBroker
  {
    any GetProviderNames();
  };

};