Index: AAPClient/UI/BestaandePalletScherm.pas =================================================================== diff -u -r219 -r222 --- AAPClient/UI/BestaandePalletScherm.pas (.../BestaandePalletScherm.pas) (revision 219) +++ AAPClient/UI/BestaandePalletScherm.pas (.../BestaandePalletScherm.pas) (revision 222) @@ -22,6 +22,7 @@ pnlRework: TPanel; imgRework: TImage; lblRework: TLabel; + lblBestaandePallet: TLabel; procedure FormShow(Sender: TObject); procedure actHomeExecute(Sender: TObject); procedure actPalletExecute(Sender: TObject); @@ -81,6 +82,7 @@ UiContext.ImagesScherm.ilAlgemeen128.GetIcon(10, imgRework.Picture.Icon); UiContext.ImagesScherm.ilAlgemeen128.GetIcon(9, imgExtraToelevering.Picture.Icon); UiContext.ImagesScherm.ilAlgemeen128.GetIcon(2, imgAnnuleren.Picture.Icon); + lblBestaandePallet.Caption := 'Bestaande pallet: '+UiContext.Pallet; inherited; end;