Arbeitszeitaufzeichnung - Ideen sind gefragt!

[m-werk]

Hi, das hab ich totall übersehen mit dem Alle Felder hinzufügen.
Das funktioniert jetzt. Ich habe PNr im Public-Teil als String deklariert.

So sieht der Quelltext aus:

Code:

program Arbeitszeitermittlung;

uses
  Forms,
  Login in 'Login.pas' {FrmLogin},
  Arbeitszeit in 'Arbeitszeit.pas' {ArbeitszeitForm};

{$R *.res}

begin
  Application.Initialize; 
  frmLogin := TfrmLogin.Create(Application); 
  if (frmLogin.ShowModal = 1) and frmLogin.PasswortOK then 
  begin 
     Application.CreateForm(TArbeitszeitForm, ArbeitszeitForm); 
     Application.Run; 
  end 
  else 
     Application.Terminate;
end.

Das ArbeitszeitForm öffnet sich noch immer nicht!