Index: AAPClient/UI/PalletScherm.pas =================================================================== diff -u -r95 -r111 --- AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 95) +++ AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 111) @@ -103,7 +103,6 @@ end; end else begin - ToonPopupScherm('Pallet kon niet gevalideerd worden', 'Scan opnieuw'); Self.ModalResult := mrPallet; end; Index: AAPClient/UI/PalletScherm.dfm =================================================================== diff -u -r95 -r111 --- AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 95) +++ AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 111) @@ -381,16 +381,18 @@ Height = 19 Caption = 'Scan pallet' end - inherited btnRechtsOnder: TButton - Default = True + inherited pnlDrieKnoppen: TPanel + inherited btnRechtsOnder: TButton + Default = True + end end - object edtPallet: TEdit [6] + object edtPallet: TEdit [4] Left = 56 Top = 151 Width = 121 Height = 27 CharCase = ecUpperCase - TabOrder = 3 + TabOrder = 1 OnKeyUp = edtPalletKeyUp end inherited alAlgemeen: TActionList