🚀 go-pugleaf

on your ADOConnection1 or what ever you call it there is a value called
LoginPrompt.
ADOConnection1->LoginPrompt = True.
Based on your ODBC this is the simplest way to do a login prompt the way you
want it.
You can also track your logins .. for example using ADOConnect you can set
up a Class veriable some where that tracks the number of times attempted.
class TForm1 : public TForm
{
__published: // IDE-managed Components
private: // User declarations
public:  // User declarations
        __fastcall TForm1(TComponent* Owner);
        int attempt;
};
file://---------------------------------------------------------------------
------
extern PACKAGE TForm1 *Form1;
file://---------------------------------------------------------------------
------
#endif

_fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    attempt =0;
}
void __fastcall TForm1::ADOConnection1ConnectComplete(
      TADOConnection *Connection, const Error *Error,
      TEventStatus &EventStatus)
{
  ...
   attempt++;
   if(attempt == 3)
      Application->Terminate();
  ...
}

"Nigel" <nhussey@gltame.com> wrote in message
news:4231643b@newsgroups.borland.com...
> Hello everyone,
> I have just reciently ported an application using a MSAccess Database to
SQL
> Server, and now want to use the login prompt for users to login.
Everything
> works fine, but I want to be able to capture an incorrect login and
> redisplay the login prompt until the login is correct or terminate the
> applciation if the user clicks the cancel button on the login prompt.
>
> Any help with this will be greatly appreciated
> Nigel
>
> P.S. I cannot get the sample given in the help system of BCB6 to work,
maybe
> something to do with encoded usernames and passwords that I am not using.
>
>