Index: AAPClient/ProScanMain.pas =================================================================== diff -u -r96 -r112 --- AAPClient/ProScanMain.pas (.../ProScanMain.pas) (revision 96) +++ AAPClient/ProScanMain.pas (.../ProScanMain.pas) (revision 112) @@ -14,6 +14,7 @@ fUiContext: TUiContext; fHuidigScherm: TForm; fLoginScherm: TForm; + fLoginScherm2: TForm; fHomeScherm: TForm; fPalletScherm: TForm; fBestaandePalletScherm: TForm; @@ -30,7 +31,7 @@ implementation uses - LoginScherm, GebruikerService, HomeScherm, DrieKnoppenScherm, PalletScherm, + LoginScherm, LoginScherm2, GebruikerService, HomeScherm, DrieKnoppenScherm, PalletScherm, BestaandePalletscherm, DnaCodeScherm, InfoLogScherm, Images, HernoemPalletScherm; {$R *.dfm} @@ -64,15 +65,15 @@ procedure TfmProScanHoofdscherm.FormCreate(Sender: TObject); begin fUiContext := TUiContext.Create(); - fLoginScherm := TfmLoginScherm.Create(Self); + fLoginScherm2 := TfmLoginScherm2.Create(Self); fHomeScherm := TfmHomeScherm.Create(Self); fPalletScherm := TfmPalletScherm.Create(Self); fBestaandePalletScherm := TfmBestaandePalletScherm.Create(Self); fDnaCodeScherm := TfmDnaCodeScherm.Create(Self); fInfoLogScherm := TfmInfoLogScherm.Create(Self); fHernoemPalletScherm := TfmHernoemPalletScherm.Create(Self); - fHuidigScherm := fLoginScherm; + fHuidigScherm := fLoginScherm2; end; procedure TfmProScanHoofdscherm.HuidigeGebruikerAfmelden;