Index: AAPClient/WS/DnaCodeService.pas =================================================================== diff -u -r321 -r332 --- AAPClient/WS/DnaCodeService.pas (.../DnaCodeService.pas) (revision 321) +++ AAPClient/WS/DnaCodeService.pas (.../DnaCodeService.pas) (revision 332) @@ -5,7 +5,7 @@ // >Import : http://tve-w10:57772/csp/dev1/WS.Halux.AAP.DnaCodeService.CLS?WSDL=1>0 // Encoding : UTF-8 // Version : 1.0 -// (23/03/2020 12:12:38 - - $Rev: 45757 $) +// (3/04/2020 10:30:14 - - $Rev: 45757 $) // ************************************************************************ // unit DnaCodeService; @@ -52,12 +52,12 @@ RequestHeader = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } ResponseHeader = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } GeefVolgendeTbpCodeResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } - RondKaderdeurDagAfRequest = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } + RondAfKaderdeurDagRequest = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } ProboxEtiketAfdrukkenResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } ToeleveringMetAantallen = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } ToeleveringBijwerkenResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } ToeleveringBijwerkenRequest = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } - RondKaderdeurDagAfResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } + RondAfKaderdeurDagResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } DirecteLeveringRequest = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } HernoemPalletResponse = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } HernoemPalletRequest = class; { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] } @@ -464,10 +464,10 @@ // ************************************************************************ // - // XML : RondKaderdeurDagAfRequest, global, + // XML : RondAfKaderdeurDagRequest, global, // Namespace : http://www.vanhoecke.be/Halux/AAP/DnaCode // ************************************************************************ // - RondKaderdeurDagAfRequest = class(TRemotable) + RondAfKaderdeurDagRequest = class(TRemotable) private FHeader: RequestHeader; FDnaCode: String_; @@ -551,10 +551,10 @@ // ************************************************************************ // - // XML : RondKaderdeurDagAfResponse, global, + // XML : RondAfKaderdeurDagResponse, global, // Namespace : http://www.vanhoecke.be/Halux/AAP/DnaCode // ************************************************************************ // - RondKaderdeurDagAfResponse = class(GeneriekeResponse) + RondAfKaderdeurDagResponse = class(GeneriekeResponse) private FToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen; FToeleveringMetAantallen_Specified: boolean; @@ -708,7 +708,7 @@ function IsDirecteLevering(const DirecteLeveringRequest: DirecteLeveringRequest): DirecteLeveringResponse; stdcall; function PalletBijwerken(const PalletBijwerkenRequest: PalletBijwerkenRequest): PalletBijwerkenResponse; stdcall; function ProboxEtiketAfdrukken(const ProboxEtiketAfdrukkenRequest: ProboxEtiketAfdrukkenRequest): ProboxEtiketAfdrukkenResponse; stdcall; - function RondKaderdeurDagAf(const RondKaderdeurDagAfRequest: RondKaderdeurDagAfRequest): RondKaderdeurDagAfResponse; stdcall; + function RondAfKaderdeurDag(const RondAfKaderdeurDagRequest: RondAfKaderdeurDagRequest): RondAfKaderdeurDagResponse; stdcall; function ToeleveringBijwerken(const ToeleveringBijwerkenRequest: ToeleveringBijwerkenRequest): ToeleveringBijwerkenResponse; stdcall; function ValideerPalletCode(const ValideerPalletCodeRequest: ValideerPalletCodeRequest): ValideerPalletCodeResponse; stdcall; function ZoekViaDnaCode(const ZoekViaDnaCodeRequest: ZoekViaDnaCodeRequest): ZoekViaDnaCodeResponse; stdcall; @@ -1151,7 +1151,7 @@ Result := FDnaCodes_Specified; end; -destructor RondKaderdeurDagAfRequest.Destroy; +destructor RondAfKaderdeurDagRequest.Destroy; begin SysUtils.FreeAndNil(FHeader); inherited Destroy; @@ -1196,7 +1196,7 @@ inherited Destroy; end; -destructor RondKaderdeurDagAfResponse.Destroy; +destructor RondAfKaderdeurDagResponse.Destroy; var I: Integer; begin @@ -1206,13 +1206,13 @@ inherited Destroy; end; -procedure RondKaderdeurDagAfResponse.SetToeleveringMetAantallen(Index: Integer; const AArrayOfToeleveringMetAantallenToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen); +procedure RondAfKaderdeurDagResponse.SetToeleveringMetAantallen(Index: Integer; const AArrayOfToeleveringMetAantallenToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen); begin FToeleveringMetAantallen := AArrayOfToeleveringMetAantallenToeleveringMetAantallen; FToeleveringMetAantallen_Specified := True; end; -function RondKaderdeurDagAfResponse.ToeleveringMetAantallen_Specified(Index: Integer): boolean; +function RondAfKaderdeurDagResponse.ToeleveringMetAantallen_Specified(Index: Integer): boolean; begin Result := FToeleveringMetAantallen_Specified; end; @@ -1296,9 +1296,9 @@ { DnaCodeServiceSoap.ProboxEtiketAfdrukken } InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'ProboxEtiketAfdrukken', '', '[ReturnName="ProboxEtiketAfdrukkenResult"]'); - { DnaCodeServiceSoap.RondKaderdeurDagAf } - InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'RondKaderdeurDagAf', '', - '[ReturnName="RondKaderdeurDagAfResult"]'); + { DnaCodeServiceSoap.RondAfKaderdeurDag } + InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'RondAfKaderdeurDag', '', + '[ReturnName="RondAfKaderdeurDagResult"]'); { DnaCodeServiceSoap.ToeleveringBijwerken } InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'ToeleveringBijwerken', '', '[ReturnName="ToeleveringBijwerkenResult"]'); @@ -1337,14 +1337,14 @@ RemClassRegistry.RegisterXSClass(RequestHeader, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RequestHeader'); RemClassRegistry.RegisterXSClass(ResponseHeader, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ResponseHeader'); RemClassRegistry.RegisterXSClass(GeefVolgendeTbpCodeResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'GeefVolgendeTbpCodeResponse'); - RemClassRegistry.RegisterXSClass(RondKaderdeurDagAfRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondKaderdeurDagAfRequest'); + RemClassRegistry.RegisterXSClass(RondAfKaderdeurDagRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondAfKaderdeurDagRequest'); RemClassRegistry.RegisterXSClass(ProboxEtiketAfdrukkenResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ProboxEtiketAfdrukkenResponse'); RemClassRegistry.RegisterXSClass(ToeleveringMetAantallen, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringMetAantallen'); RemClassRegistry.RegisterXSClass(ToeleveringBijwerkenResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringBijwerkenResponse'); RemClassRegistry.RegisterXSClass(ToeleveringBijwerkenRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringBijwerkenRequest'); RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfToeleveringMetAantallenToeleveringMetAantallen), 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ArrayOfToeleveringMetAantallenToeleveringMetAantallen'); - RemClassRegistry.RegisterXSClass(RondKaderdeurDagAfResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondKaderdeurDagAfResponse'); - RemClassRegistry.RegisterExternalPropName(TypeInfo(RondKaderdeurDagAfResponse), 'ToeleveringMetAantallen', '[ArrayItemName="ToeleveringMetAantallen"]'); + RemClassRegistry.RegisterXSClass(RondAfKaderdeurDagResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondAfKaderdeurDagResponse'); + RemClassRegistry.RegisterExternalPropName(TypeInfo(RondAfKaderdeurDagResponse), 'ToeleveringMetAantallen', '[ArrayItemName="ToeleveringMetAantallen"]'); RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfStringString), 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ArrayOfStringString'); RemClassRegistry.RegisterXSClass(DirecteLeveringRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'DirecteLeveringRequest'); RemClassRegistry.RegisterXSClass(HernoemPalletResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'HernoemPalletResponse'); Index: AAPClient/ProScan.dpr =================================================================== diff -u -r326 -r332 --- AAPClient/ProScan.dpr (.../ProScan.dpr) (revision 326) +++ AAPClient/ProScan.dpr (.../ProScan.dpr) (revision 332) @@ -19,8 +19,8 @@ DnaCodeReedsGescandScherm in 'UI\DnaCodeReedsGescandScherm.pas' {fmDnaCodeReedsGescandScherm}, Agent in 'WS\Agent.pas', CommonFunctions in 'UI\CommonFunctions.pas', - DnaCodeService in 'WS\DnaCodeService.pas', - MidasLib; + MidasLib, + DnaCodeService in 'WS\DnaCodeService.pas'; {$R *.res} Index: AAPClient/UI/DnaCodeScherm.pas =================================================================== diff -u -r331 -r332 --- AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 331) +++ AAPClient/UI/DnaCodeScherm.pas (.../DnaCodeScherm.pas) (revision 332) @@ -369,11 +369,11 @@ procedure TfmDnaCodeScherm.RondKaderdeurDagAf; var - Response: RondKaderdeurDagAfResponse; + Response: RondAfKaderdeurDagResponse; cdsRondKaderdeurDagAf: TClientDataset; antwoordlijnTeller: integer; begin - Response := TAgent.Create(UiContext).RondKaderdeurDagAf(UiContext.LaatsteDnaCode); + Response := TAgent.Create(UiContext).RondAfKaderdeurDag(UiContext.LaatsteDnaCode); cdsRondKaderdeurDagAf := TClientDataset.Create(self); cdsRondKaderdeurDagAf.FieldDefs.Add('Toelevering',ftString,20); cdsRondKaderdeurDagAf.FieldDefs.Add('Nog te scannen',ftInteger); Index: AAPClient/WS/Agent.pas =================================================================== diff -u -r321 -r332 --- AAPClient/WS/Agent.pas (.../Agent.pas) (revision 321) +++ AAPClient/WS/Agent.pas (.../Agent.pas) (revision 332) @@ -30,7 +30,7 @@ function GeefVolgendeTbpCode(): GeefVolgendeTbpCodeResponse; function ZoekViaDnaCode(DnaCode: string): ZoekViaDnaCodeResponse; function ProboxEtiketAfdrukken(DnaCodesStringList: TStringList): ProboxEtiketAfdrukkenResponse; - function RondKaderdeurDagAf(DnaCode: String): RondKaderdeurDagAfResponse; + function RondAfKaderdeurDag(DnaCode: String): RondAfKaderdeurDagResponse; end; implementation @@ -331,22 +331,22 @@ end; end; -function TAgent.RondKaderdeurDagAf(DnaCode: String): RondKaderdeurDagAfResponse; +function TAgent.RondAfKaderdeurDag(DnaCode: String): RondAfKaderdeurDagResponse; var Header: DnaCodeService.RequestHeader; - fRondKaderdeurDagAfRequest: RondKaderdeurDagAfRequest; + fRondAfKaderdeurDagRequest: RondAfKaderdeurDagRequest; begin - fRondKaderdeurDagAfRequest := RondKaderdeurDagAfRequest.Create; + fRondAfKaderdeurDagRequest := RondAfKaderdeurDagRequest.Create; Header := DnaCodeService.RequestHeader.Create; try Header.Initialen := fUiContext.Initialen; Header.ComputerNaam := FullName(); - fRondKaderdeurDagAfRequest.Header := Header; - fRondKaderdeurDagAfRequest.DnaCode := DnaCode; + fRondAfKaderdeurDagRequest.Header := Header; + fRondAfKaderdeurDagRequest.DnaCode := DnaCode; - result := fDnaCodeServiceSoap.RondKaderdeurDagAf(fRondKaderdeurDagAfRequest); + result := fDnaCodeServiceSoap.RondAfKaderdeurDag(fRondAfKaderdeurDagRequest); finally - fRondKaderdeurDagAfRequest.Free; + fRondAfKaderdeurDagRequest.Free; end; end; Index: AAPClient/ProScan.dproj.local =================================================================== diff -u -r326 -r332 --- AAPClient/ProScan.dproj.local (.../ProScan.dproj.local) (revision 326) +++ AAPClient/ProScan.dproj.local (.../ProScan.dproj.local) (revision 332) @@ -2,15 +2,15 @@ 2019/03/01 14:25:16.000.954,=C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas - 2019/03/01 14:25:57.000.930,C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.dfm=E:\svn\Delphi\AAPClient\ProScanMain.dfm 2019/03/01 14:25:57.000.930,C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas=E:\svn\Delphi\AAPClient\ProScanMain.pas + 2019/03/01 14:25:57.000.930,C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.dfm=E:\svn\Delphi\AAPClient\ProScanMain.dfm 2019/03/01 14:26:05.000.981,C:\Users\TomV\Documents\RAD Studio\Projects\Project2.dproj=E:\svn\Delphi\AAPClient\ProScan.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\Unit1.pas=E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.pas 2019/03/01 14:34:33.000.220,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.dfm + 2019/03/01 14:34:33.000.220,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\DrieKnoppenScherm.pas 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\UI\LoginScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas 2019/03/01 15:27:42.000.618,E:\svn\Delphi\AAPClient\UI\LoginScherm.dfm=E:\svn\Delphi\AAPClient\Unit1.dfm + 2019/03/01 15:27:42.000.618,E:\svn\Delphi\AAPClient\UI\LoginScherm.pas=E:\svn\Delphi\AAPClient\Unit1.pas 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= @@ -23,26 +23,26 @@ 2019/03/05 11:57:08.000.016,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\PopupScherm.dfm 2019/03/05 11:57:08.000.016,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\PopupScherm.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\Unit1.pas=E:\svn\Delphi\AAPClient\UI\Images.pas 2019/03/06 07:41:41.000.580,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\Images.dfm + 2019/03/06 07:41:41.000.580,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\Images.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\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\HomeScherm.dfm 2019/03/07 08:39:29.000.118,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\HomeScherm.pas + 2019/03/07 08:39:29.000.118,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\HomeScherm.dfm 2019/03/07 11:22:02.000.536,=E:\svn\Delphi\AAPClient\Unit1.pas - 2019/03/07 11:29:09.000.427,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\PalletScherm.dfm 2019/03/07 11:29:09.000.427,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\PalletScherm.pas + 2019/03/07 11:29:09.000.427,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\PalletScherm.dfm 2019/03/07 15:18:54.000.922,=E:\svn\Delphi\AAPClient\WS.pas 2019/03/07 15:19:13.000.507,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas 2019/03/08 10:21:18.000.208,=E:\svn\Delphi\AAPClient\WS.pas 2019/03/08 10:26:55.000.996,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= 2019/03/08 10:27:08.000.419,E:\svn\Delphi\AAPClient\UI\PalletScherm.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas 2019/03/08 10:27:08.000.419,E:\svn\Delphi\AAPClient\UI\PalletScherm.dfm=E:\svn\Delphi\AAPClient\WS\DnaCodeService.dfm - 2019/03/08 10:27:45.000.805,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\UI\PalletScherm.pas 2019/03/08 10:27:45.000.805,E:\svn\Delphi\AAPClient\WS\DnaCodeService.dfm=E:\svn\Delphi\AAPClient\UI\PalletScherm.dfm + 2019/03/08 10:27:45.000.805,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\UI\PalletScherm.pas 2019/03/08 10:28:02.000.451,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.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\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.dfm 2019/03/08 11:15:19.000.292,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.pas + 2019/03/08 11:15:19.000.292,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\BestaandePalletScherm.dfm 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\Unit1.pas=E:\svn\Delphi\AAPClient\UI\DnaCodeScherm.pas 2019/03/08 13:43:18.000.168,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\DnaCodeScherm.dfm @@ -64,8 +64,8 @@ 2019/03/20 14:52:34.000.233,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= 2019/03/20 14:52:47.000.492,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas 2019/03/22 12:38:06.000.040,=E:\svn\Delphi\AAPClient\Unit1.pas - 2019/03/22 12:42:12.000.397,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\HernoemPalletScherm.dfm 2019/03/22 12:42:12.000.397,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\HernoemPalletScherm.pas + 2019/03/22 12:42:12.000.397,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\HernoemPalletScherm.dfm 2019/04/10 07:45:17.000.841,=E:\svn\Delphi\AAPClient\WS.pas 2019/04/10 07:45:55.000.611,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= 2019/04/10 07:46:07.000.445,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\WS.pas @@ -88,8 +88,8 @@ 2019/09/06 07:46:50.000.159,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\WS.pas 2019/09/09 10:12:07.000.120,E:\svn\Delphi\AAPClient\UI\LoginScherm.pas= 2019/09/25 09:00:58.000.441,=E:\svn\Delphi\AAPClient\Unit1.pas - 2019/09/25 09:40:05.000.670,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\DnaCodeReedsGescandScherm.dfm 2019/09/25 09:40:05.000.670,E:\svn\Delphi\AAPClient\Unit1.pas=E:\svn\Delphi\AAPClient\UI\DnaCodeReedsGescandScherm.pas + 2019/09/25 09:40:05.000.670,E:\svn\Delphi\AAPClient\Unit1.dfm=E:\svn\Delphi\AAPClient\UI\DnaCodeReedsGescandScherm.dfm 2019/10/01 13:49:36.000.449,=E:\svn\Delphi\AAPClient\WS.pas 2019/10/01 13:49:56.000.314,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= 2019/10/01 13:50:07.000.220,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\WS.pas @@ -128,6 +128,9 @@ 2020/03/23 12:12:38.000.123,=E:\svn\Delphi\AAPClient\WS.pas 2020/03/23 12:12:48.000.665,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= 2020/03/23 12:13:04.000.234,E:\svn\Delphi\AAPClient\WS.pas=E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas + 2020/04/03 10:30:15.465,=E:\svn\Delphi\AAPClient\WS.pas + 2020/04/03 10:30:37.131,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas= + 2020/04/03 10:31:50.819,E:\svn\Delphi\AAPClient\WS\DnaCodeService.pas=E:\svn\Delphi\AAPClient\WS.pas Index: AAPClient/UI/DnaCodeScherm.dfm =================================================================== diff -u -r328 -r332 --- AAPClient/UI/DnaCodeScherm.dfm (.../DnaCodeScherm.dfm) (revision 328) +++ AAPClient/UI/DnaCodeScherm.dfm (.../DnaCodeScherm.dfm) (revision 332) @@ -2,8 +2,6 @@ ActiveControl = edtDnaCode Caption = 'fmDnaCodeScherm' OnActivate = FormActivate - ExplicitWidth = 320 - ExplicitHeight = 240 PixelsPerInch = 96 TextHeight = 19 object lblToeleveringData: TLabel [0]