At 12:35 PM 27-02-01 -0800, you wrote:

>This is my login procedure :
>
>procedure Tdm.MyLogin(const USERNAME, PASSWORD, SQLROLE: WideString);
>var
> myList : TStringlist;
>begin
>try
>mylist := TStringList.Create;
>myList.Add('user_name=' + USERNAME);
>mylist.Add('password=' + PASSWORD);
>mylist.Add('sql_role_name=' + SQLROLE);
>try
> begin
> If db.Connected then db.Disconnect;
> db.Params.Clear; <--- this clears out ALL params, including the database connection ones!

To see the params you need, inspect the form in text mode and look at the params that get assigned at creation. Here's a sample from a Paradox to IB conversion program I'm working on:

object IB_Connection1: TIB_Connection
LoginPrompt = True
Params.Strings = (
'SERVER=BIGBOY'
'PATH=E:\IBO\TESTDB\IBDEMOS.GDB'
'PROTOCOL=TCP/IP'
'USER NAME=SYSDBA'
'PASSWORD=masterkey')

Cheers,
Helen



All for Open and Open for All
InterBase Developer Initiative · http://www.interbase2000.org
_______________________________________________________