Devart Forums

Posted: **Mon 20 Dec 2004 20:36**

Hi,

the follow code doesn`t work:

procedure TForm1.BtnVerbindenClick(Sender: TObject);
begin
   MyConnectDialog1.DialogClass:='TfmMyConnect';
   MyConnection1.Database := 'QDM';
   MyConnection1.Connect;
end;

I`ve got the error Message: Class TfmMyConnect not found

In MyDac Demos Connect Dialog the same Code works.

What did I make wrong?

Sidi

Posted: **Tue 21 Dec 2004 09:57**

Most probably you forgot to call RegisterClass(TfmMyConnect);

Devart Forums

MyConnectDialog

MyConnectDialog

Re: MyConnectDialog