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 @@ + +
fmDrieKnoppenScherm1
+ 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