Index: PlanScan/PlanScan.dproj.local =================================================================== diff -u -r437 -r454 --- PlanScan/PlanScan.dproj.local (.../PlanScan.dproj.local) (revision 437) +++ PlanScan/PlanScan.dproj.local (.../PlanScan.dproj.local) (revision 454) @@ -2,71 +2,71 @@ 2020/02/17 10:05:16.000.600,=C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas - 2020/02/17 10:06:02.000.921,E:\svn\Delphi\PlanScan\Main.pas=C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas - 2020/02/17 10:06:02.000.921,E:\svn\Delphi\PlanScan\Main.dfm=C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.dfm - 2020/02/17 10:06:12.000.996,E:\svn\Delphi\PlanScan\PlanScan.dproj=C:\Users\TomV\Documents\RAD Studio\Projects\Project2.dproj - 2020/02/17 11:09:31.000.812,=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas + 2020/02/17 10:06:02.000.921,C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.dfm=E:\svn\Delphi\PlanScan\Main.dfm + 2020/02/17 10:06:02.000.921,C:\Users\TomV\Documents\RAD Studio\Projects\Unit2.pas=E:\svn\Delphi\PlanScan\Main.pas + 2020/02/17 10:06:12.000.996,C:\Users\TomV\Documents\RAD Studio\Projects\Project2.dproj=E:\svn\Delphi\PlanScan\PlanScan.dproj 2020/02/17 11:09:31.000.808,=E:\svn\Delphi\PlanScan\WS\Agent.pas - 2020/02/17 11:09:31.000.810,=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/02/17 11:09:31.000.812,=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas 2020/02/17 11:09:31.000.815,=E:\svn\Delphi\PlanScan\WS\__history + 2020/02/17 11:09:31.000.810,=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas 2020/02/17 11:12:28.000.857,=E:\svn\Delphi\AAPClient\UI\UiContext.pas 2020/02/17 11:13:01.000.260,E:\svn\Delphi\AAPClient\UI\UiContext.pas= 2020/02/17 11:14:30.000.384,=E:\svn\Delphi\PlanScan\UI\UiContext.pas 2020/02/17 11:16:33.000.742,=E:\svn\Delphi\PlanScan\UI\Images.pas 2020/02/18 08:16:12.000.093,=E:\svn\Delphi\PlanScan\WS.pas 2020/02/18 08:21:57.000.780,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/02/18 08:22:15.000.174,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/02/18 08:22:15.000.174,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/02/18 08:32:28.000.107,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= 2020/02/18 08:32:46.000.480,=E:\svn\Delphi\PlanScan\WS.pas - 2020/02/18 08:33:00.000.884,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/02/18 08:33:00.000.884,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/02/18 11:21:59.000.209,=E:\svn\Delphi\PlanScan\WS.pas 2020/02/18 11:22:27.000.481,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/02/18 11:22:42.000.597,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/02/18 11:22:42.000.597,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/03/02 09:30:33.000.825,=E:\svn\Delphi\PlanScan\WS.pas 2020/03/02 09:30:46.000.906,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas= - 2020/03/02 09:31:23.000.040,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas=E:\svn\Delphi\PlanScan\WS.pas + 2020/03/02 09:31:23.000.040,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas 2020/03/04 11:43:31.000.229,=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/03/04 11:49:17.000.078,E:\svn\Delphi\PlanScan\UI\LoginScherm.pas=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/03/04 11:49:17.000.078,E:\svn\Delphi\PlanScan\UI\LoginScherm.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm + 2020/03/04 11:49:17.000.078,E:\svn\Delphi\PlanScan\Unit1.pas=E:\svn\Delphi\PlanScan\UI\LoginScherm.pas + 2020/03/04 11:49:17.000.078,E:\svn\Delphi\PlanScan\Unit1.dfm=E:\svn\Delphi\PlanScan\UI\LoginScherm.dfm 2020/04/20 08:48:05.000.552,=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/04/20 08:48:21.000.787,E:\svn\Delphi\PlanScan\UI\frmDnaCodes.pas=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/04/20 08:48:21.000.787,E:\svn\Delphi\PlanScan\UI\frmDnaCodes.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm - 2020/04/20 09:19:59.000.705,E:\svn\Delphi\PlanScan\UI\frameDnaCodes.dfm=E:\svn\Delphi\PlanScan\UI\frmDnaCodes.dfm - 2020/04/20 09:19:59.000.705,E:\svn\Delphi\PlanScan\UI\frameDnaCodes.pas=E:\svn\Delphi\PlanScan\UI\frmDnaCodes.pas + 2020/04/20 08:48:21.000.787,E:\svn\Delphi\PlanScan\Unit1.dfm=E:\svn\Delphi\PlanScan\UI\frmDnaCodes.dfm + 2020/04/20 08:48:21.000.787,E:\svn\Delphi\PlanScan\Unit1.pas=E:\svn\Delphi\PlanScan\UI\frmDnaCodes.pas + 2020/04/20 09:19:59.000.705,E:\svn\Delphi\PlanScan\UI\frmDnaCodes.dfm=E:\svn\Delphi\PlanScan\UI\frameDnaCodes.dfm + 2020/04/20 09:19:59.000.705,E:\svn\Delphi\PlanScan\UI\frmDnaCodes.pas=E:\svn\Delphi\PlanScan\UI\frameDnaCodes.pas 2020/04/20 09:21:17.000.241,=E:\svn\Delphi\PlanScan\Unit1.pas 2020/04/20 10:46:18.000.858,=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/04/20 10:49:21.000.229,E:\svn\Delphi\PlanScan\UI\frameGebruikers.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm - 2020/04/20 10:49:21.000.229,E:\svn\Delphi\PlanScan\UI\frameGebruikers.pas=E:\svn\Delphi\PlanScan\Unit1.pas + 2020/04/20 10:49:21.000.229,E:\svn\Delphi\PlanScan\Unit1.dfm=E:\svn\Delphi\PlanScan\UI\frameGebruikers.dfm + 2020/04/20 10:49:21.000.229,E:\svn\Delphi\PlanScan\Unit1.pas=E:\svn\Delphi\PlanScan\UI\frameGebruikers.pas 2020/04/21 13:47:35.000.169,=E:\svn\Delphi\PlanScan\WS.pas 2020/04/21 13:47:43.000.211,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/04/21 13:47:54.000.335,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas + 2020/04/21 13:47:54.000.335,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas 2020/04/28 16:29:21.000.325,=E:\svn\Delphi\PlanScan\WS.pas 2020/04/28 16:29:32.000.030,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/04/28 16:29:49.000.701,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/04/28 16:29:49.000.701,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/05/06 15:48:04.000.623,=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/05/06 15:48:51.000.604,E:\svn\Delphi\PlanScan\Unit1.dfm=E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.dfm - 2020/05/06 15:48:51.000.604,E:\svn\Delphi\PlanScan\Unit1.pas=E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.pas + 2020/05/06 15:48:51.000.604,E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.pas=E:\svn\Delphi\PlanScan\Unit1.pas + 2020/05/06 15:48:51.000.604,E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm 2020/05/07 08:09:33.000.580,=E:\svn\Delphi\PlanScan\WS.pas 2020/05/07 08:09:44.000.951,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/05/07 08:10:20.000.303,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/05/07 08:10:20.000.303,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/05/07 08:37:58.000.610,=E:\svn\Delphi\PlanScan\WS.pas 2020/05/07 08:38:23.000.569,=E:\svn\Delphi\PlanScan\WS.pas 2020/05/07 08:38:31.000.739,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas= - 2020/05/07 08:38:57.000.386,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas + 2020/05/07 08:38:57.000.386,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas=E:\svn\Delphi\PlanScan\WS.pas 2020/05/07 11:27:31.000.777,=E:\svn\Delphi\PlanScan\Unit1.pas - 2020/05/07 11:28:03.000.538,E:\svn\Delphi\PlanScan\Unit1.dfm=E:\svn\Delphi\PlanScan\UI\KlantinstellingenDetailScherm.dfm - 2020/05/07 11:28:03.000.538,E:\svn\Delphi\PlanScan\Unit1.pas=E:\svn\Delphi\PlanScan\UI\KlantinstellingenDetailScherm.pas - 2020/06/22 09:45:59.420,=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/22 09:46:07.509,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/06/22 09:46:23.552,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/22 10:13:59.200,=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/22 10:14:25.473,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/06/22 10:14:54.776,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/30 12:02:40.659,=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/30 12:03:20.988,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas= - 2020/06/30 12:04:00.987,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= - 2020/06/30 12:04:28.864,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas=E:\svn\Delphi\PlanScan\WS.pas - 2020/06/30 12:04:53.617,=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas + 2020/05/07 11:28:03.000.538,E:\svn\Delphi\PlanScan\UI\KlantinstellingenDetailScherm.pas=E:\svn\Delphi\PlanScan\Unit1.pas + 2020/05/07 11:28:03.000.538,E:\svn\Delphi\PlanScan\UI\KlantinstellingenDetailScherm.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm + 2020/06/22 09:45:59.000.420,=E:\svn\Delphi\PlanScan\WS.pas + 2020/06/22 09:46:07.000.509,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= + 2020/06/22 09:46:23.000.552,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/06/22 10:13:59.000.200,=E:\svn\Delphi\PlanScan\WS.pas + 2020/06/22 10:14:25.000.473,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= + 2020/06/22 10:14:54.000.776,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/06/30 12:02:40.000.659,=E:\svn\Delphi\PlanScan\WS.pas + 2020/06/30 12:03:20.000.988,E:\svn\Delphi\PlanScan\WS\GebruikerService.pas= + 2020/06/30 12:04:00.000.987,E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas= + 2020/06/30 12:04:28.000.864,E:\svn\Delphi\PlanScan\WS.pas=E:\svn\Delphi\PlanScan\WS\DnaCodeService.pas + 2020/06/30 12:04:53.000.617,=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas Index: PlanScan/Main.pas =================================================================== diff -u -r411 -r454 --- PlanScan/Main.pas (.../Main.pas) (revision 411) +++ PlanScan/Main.pas (.../Main.pas) (revision 454) @@ -21,7 +21,6 @@ tsDnaCodes: TTabSheet; tsGebruikers: TTabSheet; lblInitialen: TLabel; - lblUitloggen: TLabel; lblKlantinstellingen: TLabel; lblDnaCodes: TLabel; lblGebruikers: TLabel; @@ -31,7 +30,6 @@ procedure FormCreate(Sender: TObject); procedure FormShow(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); - procedure lblUitloggenClick(Sender: TObject); procedure lblDnaCodesClick(Sender: TObject); procedure lblGebruikersClick(Sender: TObject); procedure lblKlantinstellingenClick(Sender: TObject); @@ -104,12 +102,6 @@ ZetLinkseKnopGrijs(2) end; -procedure TfmMain.lblUitloggenClick(Sender: TObject); -begin - HuidigeGebruikerAfmelden(); - GebruikerInloggen; -end; - function TfmMain.GebruikerInloggen(): boolean; var fLoginScherm: TfmLogin; Index: PlanScan/Main.dfm =================================================================== diff -u -r411 -r454 --- PlanScan/Main.dfm (.../Main.dfm) (revision 411) +++ PlanScan/Main.dfm (.../Main.dfm) (revision 454) @@ -35,7 +35,6 @@ Color = 1513421 ParentBackground = False TabOrder = 0 - ExplicitWidth = 185 object lblInitialen: TLabel Left = 20 Top = 53 @@ -51,22 +50,6 @@ Font.Style = [] ParentFont = False end - object lblUitloggen: TLabel - Left = 58 - Top = 98 - Width = 68 - Height = 19 - Alignment = taCenter - AutoSize = False - Caption = 'Uitloggen' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWhite - Font.Height = -16 - Font.Name = 'Tahoma' - Font.Style = [] - ParentFont = False - OnClick = lblUitloggenClick - end end object pnlKnoppen: TPanel Left = 0 @@ -80,7 +63,6 @@ Padding.Right = 20 ParentBackground = False TabOrder = 1 - ExplicitWidth = 185 object lblKlantinstellingen: TLabel Left = 20 Top = 80 @@ -148,8 +130,6 @@ Align = alClient BevelOuter = bvNone TabOrder = 1 - ExplicitLeft = 185 - ExplicitWidth = 926 object pcFrames: TPageControl Left = 0 Top = 0 @@ -158,19 +138,17 @@ ActivePage = tsDnaCodes Align = alClient TabOrder = 0 - ExplicitWidth = 926 object tsDnaCodes: TTabSheet Caption = 'DnaCodes' TabVisible = False - ExplicitWidth = 918 inline frmDnaCodes: TfrmDnaCodes Left = 0 Top = 0 Width = 903 Height = 398 Align = alClient TabOrder = 0 - ExplicitWidth = 918 + ExplicitWidth = 903 ExplicitHeight = 398 inherited dbgDnaCodes: TDBGrid Width = 776 @@ -220,28 +198,27 @@ inherited pnlActies: TPanel Left = 776 Height = 325 - ExplicitLeft = 791 + ExplicitLeft = 776 ExplicitHeight = 325 end inherited pnlZoekKnoppen: TPanel Width = 903 - ExplicitWidth = 918 + ExplicitWidth = 903 end end end object tsGebruikers: TTabSheet Caption = 'Gebruikers' ImageIndex = 1 TabVisible = False - ExplicitWidth = 918 inline frmGebruikers: TfrmGebruikers Left = 0 Top = 0 Width = 903 Height = 398 Align = alClient TabOrder = 0 - ExplicitWidth = 918 + ExplicitWidth = 903 ExplicitHeight = 398 inherited dbgGebruikers: TDBGrid Width = 776 @@ -250,7 +227,7 @@ inherited Panel1: TPanel Left = 776 Height = 398 - ExplicitLeft = 791 + ExplicitLeft = 776 ExplicitHeight = 398 end end @@ -259,15 +236,14 @@ Caption = 'tsKlantinstellingen' ImageIndex = 2 TabVisible = False - ExplicitWidth = 918 inline frmKlantinstellingen: TfrmKlantinstellingen Left = 0 Top = 0 Width = 903 Height = 398 Align = alClient TabOrder = 0 - ExplicitWidth = 918 + ExplicitWidth = 903 ExplicitHeight = 398 inherited dbgKlantinstellingen: TDBGrid Width = 776 @@ -276,7 +252,7 @@ inherited Panel1: TPanel Left = 776 Height = 398 - ExplicitLeft = 791 + ExplicitLeft = 776 ExplicitHeight = 398 end end