Okay. Aber selbst mit dem Namen geht es nicht. Hier mal mein Code.
Der Name der
Unit: Loader_u
Der Name der Form (Objektinspektor 'Name'): Loader
Als Fehlermeldung im Compiler kommt:
- Undeklarierter Bezeichner 'Loader' in Zeile 41 (41:5)
- Undeklarierter Bezeichner 'Show' in Zeile 41 (41:12)
Delphi-Quellcode:
unit LoaderLogin_u;
interface
uses
Winapi.Windows,
Winapi.Messages, System.SysUtils, System.Variants, System.Classes,
Vcl.Graphics,
Vcl.Controls,
Vcl.Forms,
Vcl.Dialogs,
Vcl.ComCtrls,
Vcl.StdCtrls;
type
TForm1 =
class(TForm)
lbl_usr: TLabel;
lbl_pw: TLabel;
edt_usr: TEdit;
edt_pw: TEdit;
btn_login: TButton;
btn_reset: TButton;
btn_updates: TButton;
lbl_buildcopyright: TLabel;
procedure btn_resetClick(Sender: TObject);
procedure btn_updatesClick(Sender: TObject);
procedure btn_loginClick(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
uses Loader_u;
procedure TForm1.btn_loginClick(Sender: TObject);
begin
if (edt_usr.Text = '
admin')
and (edt_pw.Text = '
admin')
then
begin
Loader.Show;
end;
end.