请问怎样打开ADOCONNECT的CONNECTString的编辑口，就是在DELPHI里控件的那个属性打开的窗口。(50分)

A

arychen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #1

请问怎样打开ADOCONNECT的CONNECTString的编辑口，就是在DELPHI里控件的那个属性打开的窗口。
怎样在程序中根据我的命令打开它？

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #2

function PromptDataSource(ParentHandle: THandle; InitialString: WideString): WideString;
function PromptDataLinkFile(ParentHandle: THandle; InitialFile: WideString): WideString;

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #3

对了，uses AdoDB[]
这个问题很多人都问过。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #4

其实一看Ado的VCL代码就清楚了。

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #5

uses AdoConEd;
var
str:string;
begin
str:= PromptDataSource(Handle,ADOConnection1.ConnectionString);
showmessage(str);
adoconnection1.Close;
adoconnection1.ConnectionString:=str;
adoconnection1.Open;
end;

 

D

dfan2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #6

procedure TForm1.FormCreate(Sender: TObject);
begin
ADOConnection1.Close;
EditConnectionString(Adoconnection1);//打开编辑窗口
ADOConnection1.GetTableNames(ComboBox1.Items,false);
ADOConnection1.Open;
end;

 

B

bini

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #7

用dfan2000的方法

記得USES 中加上 ADOCONED;