Index: AAPClient/UI/InfoLogScherm.pas
===================================================================
diff -u
--- AAPClient/UI/InfoLogScherm.pas	(revision 0)
+++ AAPClient/UI/InfoLogScherm.pas	(revision 51)
@@ -0,0 +1,39 @@
+unit InfoLogScherm;
+
+interface
+
+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.Grids;
+
+type
+  TfmInfoLogScherm = class(TfmDrieKnoppenScherm)
+    lblToelevering: TLabel;
+    lblAantalGescand: TLabel;
+    lblTotaalAantal: TLabel;
+    lblSlash: TLabel;
+    lblAantallen: TLabel;
+    sgToeleveringData: TStringGrid;
+    procedure FormCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  fmInfoLogScherm: TfmInfoLogScherm;
+
+implementation
+
+{$R *.dfm}
+
+procedure TfmInfoLogScherm.FormCreate(Sender: TObject);
+begin
+  inherited;
+  sgToeleveringData.Cols[0].Text := 'DNA Code';
+  sgToeleveringData.Cols[1].Text := 'Pallet';
+end;
+
+end.
Index: AAPClient/UI/InfoLogScherm.dfm
===================================================================
diff -u
--- AAPClient/UI/InfoLogScherm.dfm	(revision 0)
+++ AAPClient/UI/InfoLogScherm.dfm	(revision 51)
@@ -0,0 +1,64 @@
+inherited fmInfoLogScherm: TfmInfoLogScherm
+  Caption = 'fmInfoLogScherm'
+  ExplicitWidth = 232
+  ExplicitHeight = 246
+  PixelsPerInch = 96
+  TextHeight = 19
+  object lblToelevering: TLabel [1]
+    Left = 144
+    Top = 8
+    Width = 73
+    Height = 19
+    AutoSize = False
+  end
+  object lblAantalGescand: TLabel [2]
+    Left = 152
+    Top = 33
+    Width = 33
+    Height = 19
+    Alignment = taRightJustify
+    AutoSize = False
+  end
+  object lblTotaalAantal: TLabel [3]
+    Left = 191
+    Top = 33
+    Width = 33
+    Height = 19
+    AutoSize = False
+  end
+  object lblSlash: TLabel [4]
+    Left = 185
+    Top = 33
+    Width = 9
+    Height = 19
+    AutoSize = False
+    Caption = '/'
+  end
+  object lblAantallen: TLabel [5]
+    Left = 64
+    Top = 33
+    Width = 82
+    Height = 19
+    Alignment = taRightJustify
+    AutoSize = False
+    Caption = 'Afgescand:'
+  end
+  object sgToeleveringData: TStringGrid [9]
+    Left = 8
+    Top = 58
+    Width = 186
+    Height = 120
+    ColCount = 2
+    DefaultColWidth = 93
+    DrawingStyle = gdsGradient
+    FixedCols = 0
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -13
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    ScrollBars = ssNone
+    TabOrder = 3
+  end
+end