国庆中秋献礼：调用易飞DLL源码

swgame

# G4 B; N3 N( |! ~; s
8 U4 O( o& c* Z! u% [% x近期有一些朋友想知道如何调用易飞的DLL。
! ^9 Y+ H( }9 o, x9 P( W; b我也挺久没接触易飞了（自08年奥运会那天东莞离职回福州）
( M/ Y( Z  ]- R% v$ U其实也挺简单，就几个代码就可以搞定了。
  c% l& h- r* k- a8 s$ w2 ]; G* o花了一些时间把它弄出来。特此贡献做为国庆中秋献礼。
$ q  b) H+ N% M' W& y
1 f" |. f$ p  d* _" b源码回复下载
2 y$ u& ~& b/ t( b5 b" s/ J- E; ^

游客，如果您要查看本帖隐藏内容请回复

如图。
3 J  z1 V' v& X5 D5 b& m

2010.4.25
1 t" J6 b- G* a  [$ Q( p! c/ K* w9 ~3 h源码中少了一个连接，所以点击不会自动出来。纠正：
procedure TForm1.FormCreate(Sender: TObject);
begin                           //LeaderWorkCenter.Manager
  WorkManager := CreateOleObject('LeaderWorkCenter.Manager');
( s5 k* B# D$ Y( y: v% K; C  WorkManager.Connect ;  //这里纠正
: V7 b6 G) D* c) ]  Manager1:=CreateOleObject('LeaderWorkCenterS.Class1');
  TransManagerC:=CreateOleObject('TransManagerC.Class1');
! N! _/ s5 `4 c7 p8 ?
  Manager3:=CreateOleObject('CounterS.Class1');
  Manager2:=CreateOleObject('CounterC.Class1');
end;

swgame

具体哪些选项代表什么功能。
如$000001传入后是新增，等~~~
" W6 G& w4 _% d6 n" J9 C! \3 b欢迎朋友测试后回复贴子~~

Fastme

支持~~~~~~~~~

sunnyfc

真是太感谢了，真的很谢谢！

naruto

支持~~~~~~~~~

XUJUNFEI

下来看看

swgame

补充：得到易飞当前数据库及用户ID。
! l! V1 y' B) ~. E7 Q     须DLL供易飞调用得到：
    参阅贴子：http://www.dcmsclub.com/thread-13762-1-1.html

aiai1779

好东西　学习学习

dscwferp

不會DELPHI!
; `. y7 B4 a, p/ `  _嗚~~~

dgsunrise

早2年分享试比较好，现在会了

swgame

10# dgsunrise
& f8 S  ~: [7 a+ e+ t+ E7 R5 O
. ]2 V4 Z# ?: d- C6 Z
! c: V& J/ W9 S& U' i$ g早2年。07年？~~~
- X; Q9 [" f2 I! Q刚接触易飞1年多。~~
我也只有点线索，但写不出来~~~

zhu0598

10# dgsunrise
" k, ?( E: r. L3 A7 ?4 k
0 v& d4 g' K9 M1 v/ M/ ~$ z
老大,有空的时候分享一点知识出来啊,让我们好跟你学习一下.

gooogle

崇拜！学习！

zhanglt

看看 先

zensing

看看

sunyesy

等了好久了

黄河

支持下，节日快乐

zh516

太好了，正找呢。

xcdx

学习

zh516

看看