帮帮忙!这段VB代码翻译成Delphi怎么写?(100分)

S

slush

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-22

• #1

这段VB代码翻译成Delphi怎么写?
dim as new baseserver.base
dim cnn as new Adodb.Connection
base.initObject(666666)
set cnn=base.getObject


谢谢!!!

 

一

一伊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-24

• #2

这段可实现同样的功能：
Uses DB,ADODB;
Var cnn: TADOConnection;
cnn:=TADOConnection.Create(nil);
cnn.ConnectionString:='... '; //需连接的字符串
cnn.LoginPrompt:=False;

cnn.Free; //动态创建的对象不忘了释放哟

 

S

slush

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-27

• #3

接受答案了.