Index: ProScan/UI/OnvolledigeToeleveringScherm.pas
===================================================================
diff -u
--- ProScan/UI/OnvolledigeToeleveringScherm.pas (revision 0)
+++ ProScan/UI/OnvolledigeToeleveringScherm.pas (revision 444)
@@ -0,0 +1,36 @@
+unit OnvolledigeToeleveringScherm;
+
+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.ExtCtrls;
+
+type
+ TfmDrieKnoppenScherm1 = class(TfmDrieKnoppenScherm)
+ btnNieuweToelevering: TButton;
+ btnHuidigeToelevering: TButton;
+ lblOnvolledigeToelevering: TLabel;
+ lblVerdergaanMet: TLabel;
+ imgCentraal: TImage;
+ procedure FormShow(Sender: TObject);
+ private
+ public
+ { Public declarations }
+ end;
+
+var
+ fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1;
+
+implementation
+
+{$R *.dfm}
+
+procedure TfmDrieKnoppenScherm1.FormShow(Sender: TObject);
+begin
+ inherited;
+ UiContext.ImagesScherm.ilAlgemeen128.GetIcon(13, imgCentraal.Picture.Icon);
+end;
+
+end.
Index: ProScan/ProScan.dproj
===================================================================
diff -u -r405 -r444
--- ProScan/ProScan.dproj (.../ProScan.dproj) (revision 405)
+++ ProScan/ProScan.dproj (.../ProScan.dproj) (revision 444)
@@ -132,6 +132,10 @@
+
+
+ dfm
+
Cfg_2
Base
Index: ProScan/ProScan.dproj.local
===================================================================
diff -u -r425 -r444
--- ProScan/ProScan.dproj.local (.../ProScan.dproj.local) (revision 425)
+++ ProScan/ProScan.dproj.local (.../ProScan.dproj.local) (revision 444)
@@ -6,25 +6,25 @@
2019/03/01 14:25:57.000.930,E:\svn\Delphi\AAPClient\ProScanMain.pas=C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas
2019/03/01 14:26:05.000.981,E:\svn\Delphi\AAPClient\ProScan.dproj=C:\Users\TomV\Documents\RAD Studio\Projects\Project2.dproj
2019/03/01 14:28:35.000.977,=E:\svn\Delphi\AAPClient\Unit1.pas
- 2019/03/01 14:34:33.000.220,E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
2019/03/01 14:34:33.000.220,E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
+ 2019/03/01 14:34:33.000.220,E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
2019/03/01 15:26:22.000.761,=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/01 15:27:42.000.618,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\LoginScherm.pas
2019/03/01 15:27:42.000.618,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\LoginScherm.dfm
2019/03/04 07:46:54.000.107,=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/04 07:48:44.000.257,=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/04 07:48:53.000.280,E:\svn\Delphi\AAPClient\UI\LoginScherm.pas=
- 2019/03/04 07:49:00.000.838,E:\svn\Delphi\AAPClient\UI\LoginScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
2019/03/04 07:49:00.000.838,E:\svn\Delphi\AAPClient\UI\LoginScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
+ 2019/03/04 07:49:00.000.838,E:\svn\Delphi\AAPClient\UI\LoginScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
2019/03/05 10:51:12.000.820,=E:\svn\Delphi\AAPClient\WS.pas
2019/03/05 10:53:16.000.806,=E:\svn\Delphi\AAPClient\WS.pas
2019/03/05 10:56:57.000.976,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\GebruikerService.pas
2019/03/05 11:54:27.000.053,=E:\svn\Delphi\AAPClient\Unit1.pas
- 2019/03/05 11:57:08.000.016,E:\svn\Delphi\AAPClient\UI\PopupScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/05 11:57:08.000.016,E:\svn\Delphi\AAPClient\UI\PopupScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
+ 2019/03/05 11:57:08.000.016,E:\svn\Delphi\AAPClient\UI\PopupScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/06 07:41:24.000.503,=E:\svn\Delphi\AAPClient\Unit1.pas
- 2019/03/06 07:41:41.000.580,E:\svn\Delphi\AAPClient\UI\Images.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/06 07:41:41.000.580,E:\svn\Delphi\AAPClient\UI\Images.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
+ 2019/03/06 07:41:41.000.580,E:\svn\Delphi\AAPClient\UI\Images.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/07 08:39:12.000.150,=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/07 08:39:29.000.118,E:\svn\Delphi\AAPClient\UI\HomeScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
2019/03/07 08:39:29.000.118,E:\svn\Delphi\AAPClient\UI\HomeScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
@@ -41,8 +41,8 @@
2019/03/08 10:27:45.000.805,E:\svn\Delphi\AAPClient\UI\PalletScherm.dfm=E:\svn\Delphi\AAPClient\WS\DnaCodeService.dfm
2019/03/08 10:28:02.000.451,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\WS.pas
2019/03/08 11:14:25.000.860,=E:\svn\Delphi\AAPClient\Unit1.pas
- 2019/03/08 11:15:19.000.292,E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/08 11:15:19.000.292,E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
+ 2019/03/08 11:15:19.000.292,E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/08 13:41:42.000.692,=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/08 13:43:18.000.167,E:\svn\Delphi\AAPClient\UI\DnaCodeScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas
2019/03/08 13:43:18.000.168,E:\svn\Delphi\AAPClient\UI\DnaCodeScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm
@@ -53,8 +53,8 @@
2019/03/12 11:42:41.000.845,=E:\svn\Delphi\AAPClient\WS.pas
2019/03/12 11:42:52.000.715,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas
2019/03/18 09:44:48.000.103,=E:\svn\Delphi\AAPClient\Unit1.pas
- 2019/03/18 09:46:03.000.084,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\InfoLogScherm.dfm
2019/03/18 09:46:03.000.084,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\InfoLogScherm.pas
+ 2019/03/18 09:46:03.000.084,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\InfoLogScherm.dfm
2019/03/18 11:06:46.000.842,=E:\svn\Delphi\AAPClient\WS.pas
2019/03/18 11:07:10.000.880,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=
2019/03/18 11:07:23.000.750,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas
@@ -148,6 +148,13 @@
2020/06/30 08:56:11.401,=E:\svn\Delphi\ProScan\WS.pas
2020/06/30 08:57:06.002,E:\svn\Delphi\ProScan\WS\DnaCodeService.pas=
2020/06/30 08:57:20.899,E:\svn\Delphi\ProScan\WS\DnaCodeService.pas=E:\svn\Delphi\ProScan\WS.pas
+ 2020/07/03 13:18:22.586,=E:\svn\Delphi\ProScan\Unit1.pas
+ 2020/07/03 13:25:23.372,E:\svn\Delphi\ProScan\UI\OnvolledigeToeleveringScherm.dfm=E:\svn\Delphi\ProScan\Unit1.dfm
+ 2020/07/03 13:25:23.372,E:\svn\Delphi\ProScan\UI\OnvolledigeToeleveringScherm.pas=E:\svn\Delphi\ProScan\Unit1.pas
+ 2020/07/03 13:28:16.574,E:\svn\Delphi\ProScan\UI\OnvolledigeToeleveringScherm.pas=
+ 2020/07/03 13:28:35.965,=E:\svn\Delphi\ProScan\Unit1.pas
+ 2020/07/03 13:28:49.735,E:\svn\Delphi\ProScan\UI\OnvolledigeToeleveringScherm.dfm=E:\svn\Delphi\ProScan\Unit1.dfm
+ 2020/07/03 13:28:49.735,E:\svn\Delphi\ProScan\UI\OnvolledigeToeleveringScherm.pas=E:\svn\Delphi\ProScan\Unit1.pas
@@ -177,6 +184,8 @@
+
+
Index: ProScan/ProScan.dpr
===================================================================
diff -u -r404 -r444
--- ProScan/ProScan.dpr (.../ProScan.dpr) (revision 404)
+++ ProScan/ProScan.dpr (.../ProScan.dpr) (revision 444)
@@ -20,7 +20,8 @@
Agent in 'WS\Agent.pas',
CommonFunctions in 'UI\CommonFunctions.pas',
MidasLib,
- DnaCodeService in 'WS\DnaCodeService.pas';
+ DnaCodeService in 'WS\DnaCodeService.pas',
+ OnvolledigeToeleveringScherm in 'UI\OnvolledigeToeleveringScherm.pas' {fmDrieKnoppenScherm1};
{$R *.res}
@@ -39,6 +40,7 @@
Application.CreateForm(TfmBestaandePalletScherm, fmBestaandePalletScherm);
Application.CreateForm(TfmInfoLogScherm, fmInfoLogScherm);
Application.CreateForm(TfmDnaCodeReedsGescandScherm, fmDnaCodeReedsGescandScherm);
+ Application.CreateForm(TfmDrieKnoppenScherm1, fmDrieKnoppenScherm1);
Application.Run;
fmProScanHoofdscherm.Visible := true;
end.
Index: ProScan/UI/OnvolledigeToeleveringScherm.dfm
===================================================================
diff -u
--- ProScan/UI/OnvolledigeToeleveringScherm.dfm (revision 0)
+++ ProScan/UI/OnvolledigeToeleveringScherm.dfm (revision 444)
@@ -0,0 +1,85 @@
+inherited fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1
+ Caption = 'fmDrieKnoppenScherm'
+ Color = 1513421
+ PixelsPerInch = 96
+ TextHeight = 19
+ object lblOnvolledigeToelevering: TLabel [0]
+ Left = 17
+ Top = 79
+ Width = 446
+ Height = 42
+ Alignment = taCenter
+ AutoSize = False
+ Caption = 'Onvolledige toelevering'
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clWhite
+ Font.Height = -32
+ Font.Name = 'Tahoma'
+ Font.Style = []
+ ParentFont = False
+ WordWrap = True
+ end
+ object lblVerdergaanMet: TLabel [1]
+ Left = 17
+ Top = 279
+ Width = 446
+ Height = 42
+ Alignment = taCenter
+ AutoSize = False
+ Caption = 'Verdergaan met:'
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clWhite
+ Font.Height = -32
+ Font.Name = 'Tahoma'
+ Font.Style = []
+ ParentFont = False
+ WordWrap = True
+ end
+ object imgCentraal: TImage [2]
+ Left = 176
+ Top = 137
+ Width = 128
+ Height = 128
+ end
+ inherited pnlDrieKnoppen: TPanel
+ Visible = False
+ end
+ object btnNieuweToelevering: TButton [5]
+ Left = 56
+ Top = 428
+ Width = 369
+ Height = 81
+ Caption = 'Nieuwe toelevering'
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clWindowText
+ Font.Height = -32
+ Font.Name = 'Tahoma'
+ Font.Style = []
+ ImageIndex = 11
+ ImageMargins.Left = 10
+ Images = ImagesScherm.ilAlgemeen48
+ ModalResult = 7
+ ParentFont = False
+ TabOrder = 2
+ WordWrap = True
+ end
+ object btnHuidigeToelevering: TButton [6]
+ Left = 56
+ Top = 327
+ Width = 369
+ Height = 81
+ Caption = 'Huidige toelevering'
+ Font.Charset = DEFAULT_CHARSET
+ Font.Color = clWindowText
+ Font.Height = -32
+ Font.Name = 'Tahoma'
+ Font.Style = []
+ ImageIndex = 7
+ ImageMargins.Left = 10
+ Images = ImagesScherm.ilAlgemeen48
+ ModalResult = 6
+ ParentFont = False
+ TabOrder = 3
+ WordWrap = True
+ end
+end