Index: AAPClient/UI/PalletScherm.pas =================================================================== diff -u -r247 -r253 --- AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 247) +++ AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 253) @@ -140,6 +140,7 @@ btnCentraalOnder.Action := actHome; btnRechtsOnder.Action := actVolgende; edtPallet.Text := ''; + edtPallet.SetFocus; SetContext; inherited; end; Index: AAPClient/UI/DnaCodeScherm.pas =================================================================== diff -u -r247 -r253 --- AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 247) +++ AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 253) @@ -206,6 +206,7 @@ imgWegwerpPallet.Visible := false; end; ZetIcoontjesBovenaan; + edtDnaCode.SetFocus; inherited; end; Index: AAPClient/UI/PalletScherm.dfm =================================================================== diff -u -r240 -r253 --- AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 240) +++ AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 253) @@ -1,6 +1,9 @@ inherited fmPalletScherm: TfmPalletScherm + ActiveControl = edtPallet Caption = 'fmPalletScherm' OnActivate = FormActivate + ExplicitWidth = 480 + ExplicitHeight = 640 PixelsPerInch = 96 TextHeight = 19 object imgPallet: TImage [0]