Index: AAPClient/UI/PalletScherm.dfm =================================================================== diff -u -r22 -r23 --- AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 22) +++ AAPClient/UI/PalletScherm.dfm (.../PalletScherm.dfm) (revision 23) @@ -2,6 +2,26 @@ Caption = 'fmPalletScherm' PixelsPerInch = 96 TextHeight = 19 + object lblScanPallet: TLabel [1] + Left = 78 + Top = 119 + Width = 76 + Height = 19 + Caption = 'Scan pallet' + end + object Image1: TImage [2] + Left = 72 + Top = 39 + Width = 82 + Height = 81 + end + object edtPallet: TEdit [6] + Left = 56 + Top = 151 + Width = 121 + Height = 27 + TabOrder = 3 + end inherited alAlgemeen: TActionList inherited actVolgende: TAction OnExecute = actVolgendeExecute Index: AAPClient/Win32/Debug/ProScanMain.dcu =================================================================== diff -u -r21 -r23 Binary files differ Index: AAPClient/UI/PalletScherm.pas =================================================================== diff -u -r22 -r23 --- AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 22) +++ AAPClient/UI/PalletScherm.pas (.../PalletScherm.pas) (revision 23) @@ -5,10 +5,13 @@ uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, DrieKnoppenScherm, Vcl.ActnList, - Vcl.StdCtrls; + Vcl.StdCtrls, Vcl.ExtCtrls; type TfmPalletScherm = class(TfmDrieKnoppenScherm) + lblScanPallet: TLabel; + edtPallet: TEdit; + Image1: TImage; procedure FormShow(Sender: TObject); procedure actHomeExecute(Sender: TObject); procedure actVolgendeExecute(Sender: TObject); Index: AAPClient/Win32/Debug/ProScan.exe =================================================================== diff -u -r21 -r23 Binary files differ