记录用友ERP二次开发全过程(转载)

记录用友ERP二次开发全过程

以此为备忘录。

最好在机器上装好U8。

下一步把自定义权限及模块加入U8里,以方便外部程序调用,识别!

function erpLogin:boolean;

var loginObject:OleVariant;

      bRetVal:boolean;

begin

try

loginObject:= CreateOleObject('UFSoft.U8.Framework.Login.UI.clsLogin');
if loginObject.login_2('DP') then
begin
  ///登陆成功

bRetVal:=true;
end else
begin
  //登陆失败

bRetVal:=false;

end;

except

bRetVal:=false;

end;

erpLogin:=bRetVal;

end;

原文地址:https://www.cnblogs.com/martian6125/p/9631134.html