• Registered: 2017-05-09
  • Posts: 58

Topic: User Role Login Form -- Need Help

I want to modify the look of the login form. My following code works fine using SQLLite but when I switch the database to MySQL it stops working. It seems the program is using a different form name. Does anyone know the login form for using MySQL?

 frmdbCoreLogin.Caption:=strCaption;  
 frmdbCoreLogin.Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName)+'Images\logo.png');    //load custom image

2 Reply by livexox (edited by livexox 2020-09-15 23:08:07)

  • Registered: 2017-05-09
  • Posts: 58

Re: User Role Login Form -- Need Help

I figured out the issue. The code has to be added before the database connection settings.

  • Registered: 2015-11-13
  • Posts: 652

Re: User Role Login Form -- Need Help

Thank you.

  • CDB
  • Member
  • Offline
  • Registered: 2019-12-16
  • Posts: 370

Re: User Role Login Form -- Need Help

Just some further info, if you wish you can add components to the  login form by creating them in script.

Below is an example on how to do that using a logo I downloaded from a royalty free site for my project.

{This needs to be global as we don't have direct access to the form}
var
 lbAcknowledge : TLabel;  // or some other component

begin
 ~~~~~~~~~  other code that you may have here
~~~~~~~~~~

   lbAcknowledge := TLabel.Create(frmdbCoreLogin);
   lbAcknowledge.Left := 113;
   lbAcknowledge.Top := 170;
   lbAcknowledge.Width := 300;
   lbAcknowledge.Height:= 15;
   lbAcknowledge.Parent := frmdbCoreLogin;
   lbAcknowledge.Wordwrap := True;
   lbAcknowledge.Caption := 'your label caption here';
   lbAcknowledge.Visible := True;

~~~~~~~~~ other code you may have
end.
On a clear disk you can seek forever