unit PDynamicSQLDemo_TLB;....
IDynamicSQLDemoServer = interface(IAppServer) ['{8C16E962-5515-11D3-8FB9-0080C88AAA0D}'] procedure GetAllTables(var vTables: OleVariant); safecall; end;这里原来有大师么?不知道,我在这里连专家都没遇到过