Einzelnen Beitrag anzeigen

KnowN

Registriert seit: 7. Dez 2015
Ort: Cochem
6 Beiträge
 
Delphi 10 Seattle Professional
 
#3

AW: Zweite Form öffnen

  Alt 7. Dez 2015, 14:21
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.
Christian
  Mit Zitat antworten Zitat