关于delphi与access连接的问题? ---在线等(50分)

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #1

我看到一个程序,用DELPHI6开发,DB是ACCESS,让我感到奇怪的是,这个程序里,并没有什么ADO,BDE控件,也没有连接数据库的控件,只有一个skinformvcl控件,但还是能正常连接,请问各位高手,这是为何?谢谢!

 

非

非人类研究中心职员

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #2

是不是动态创建的组件啊?

 

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #3

有可能,
还有其他方法吗?

 

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #4

请问--非人类研究中心职员,你有相关的例句吗?

 

A

abin30

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #5

呵呵，你将代码贴出来就可以了。
1、你没有看到控件，是不是只是在窗体上没有，看看代码里边有没有相关的。
2、完全可以用ADO 实现，不需要其他的控件。直接用 createoleobject创建ADODB.connection对象就可以了。

 

G

ggh168

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #6

动态创建TADOConnection,其他类似
With TADOConnection.Create(nil) do
try
Connected:=false;
ConnectionString:='Provider=MSDASQL.1;Persist Security Info=False;Data Source=MS Access Database;Extended Properties="DSN=MS Access Database;DBQ='+[red](mdb文件所在的路径)[/red]+';DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;"';
Connected:=True;
finally
Free;
end;

 

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #7

其实我已在软件的源码搜索相关的语句,如ADO等,但都没有找到,但我看到了
for i := 0 to ListView.Items.Count - 1 do
if ListView.Items.Selected then begin
CurNode := TreeView.Items.GetFirstNode;
while CurNode <> nil do begin
if CurNode.Data = ListView.Items.Data then begin
if CurNode.Parent <> RecvNode then begin
CurNode.MoveTo(RecvNode, naAddChild);的语句,
我不知道是不是的?

 

非

非人类研究中心职员

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #8

你贴的代码....看不出什么~~~

 

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #9

看到最多的只有这句
UpdateLeafWithNewNodeID(CurNodeType, PNodeData(RecvNode.Data)^.NodeID, PNodeData(CurNode.Data)^.NodeID);

 

M

myhby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #10

在窗体上相关数据库控件的属性中去找一找，如：dbsourc等。。。

 

A

anyway

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-30

• #11

应该是动态创建的控件
找找相关的创建代码吧

 

V

vkeyj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-12-31

• #12

谢谢大家的帮助,祝各位节日快乐!
是动态创建的控件

谢谢