Index: AAPClient/UI/LoginScherm.pas =================================================================== diff -u -r26 -r31 --- AAPClient/UI/LoginScherm.pas (.../LoginScherm.pas) (revision 26) +++ AAPClient/UI/LoginScherm.pas (.../LoginScherm.pas) (revision 31) @@ -101,6 +101,8 @@ finally Request.Free; end; + edtInitialen.Text = ''; + edtPincode.Text = ''; end; procedure TfmLoginScherm.edtInitialenKeyPress(Sender: TObject; var Key: Char); Index: AAPClient/UI/PalletScherm.pas =================================================================== diff -u -r30 -r31 --- AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 30) +++ AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 31) @@ -56,7 +56,6 @@ Request.Header := Header; Request.PalletCode := edtPallet.Text; - Response := Service.ValideerPalletCode(Request); try if Response.Header.Status <> '200' then begin @@ -74,6 +73,7 @@ finally Request.Free; end; + edtPallet.Text := ''; end; procedure TfmPalletScherm.edtPalletKeyPress(Sender: TObject; var Key: Char); Index: AAPClient/Win32/Debug/ProScan.exe =================================================================== diff -u -r30 -r31 Binary files differ