Index: PlanScan/PlanScan.dproj
===================================================================
diff -u -r362 -r364
--- PlanScan/PlanScan.dproj (.../PlanScan.dproj) (revision 362)
+++ PlanScan/PlanScan.dproj (.../PlanScan.dproj) (revision 364)
@@ -106,6 +106,11 @@
TFrame
+
+
+ dfm
+ TFrame
+
Cfg_2
Index: PlanScan/PlanScan.dproj.local
===================================================================
diff -u -r363 -r364
--- PlanScan/PlanScan.dproj.local (.../PlanScan.dproj.local) (revision 363)
+++ PlanScan/PlanScan.dproj.local (.../PlanScan.dproj.local) (revision 364)
@@ -2,47 +2,50 @@
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.810,=E:\svn\Delphi\PlanScan\WS\DnaCodeService.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.812,=E:\svn\Delphi\PlanScan\WS\GebruikerService.pas
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.815,=E:\svn\Delphi\PlanScan\WS\__history
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.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm
- 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\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.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm
- 2020/04/20 08:48:21.000.787,E:\svn\Delphi\PlanScan\UI\frmDnaCodes.pas=E:\svn\Delphi\PlanScan\Unit1.pas
- 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.pas=E:\svn\Delphi\PlanScan\UI\frameDnaCodes.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: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.pas=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\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.623,=E:\svn\Delphi\PlanScan\Unit1.pas
+ 2020/05/06 15:48:51.604,E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.pas=E:\svn\Delphi\PlanScan\Unit1.pas
+ 2020/05/06 15:48:51.604,E:\svn\Delphi\PlanScan\UI\frameKlantinstellingen.dfm=E:\svn\Delphi\PlanScan\Unit1.dfm
@@ -54,6 +57,8 @@
+
+
Index: PlanScan/UI/frameKlantinstellingen.pas
===================================================================
diff -u
--- PlanScan/UI/frameKlantinstellingen.pas (revision 0)
+++ PlanScan/UI/frameKlantinstellingen.pas (revision 364)
@@ -0,0 +1,29 @@
+unit frameKlantinstellingen;
+
+interface
+
+uses
+ Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes,
+ Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Data.DB, Vcl.StdCtrls,
+ Vcl.ExtCtrls, Vcl.Grids, Vcl.DBGrids, Datasnap.DBClient;
+
+type
+ TfrmKlantinstellingen = class(TFrame)
+ cdsKlantinstellingen: TClientDataSet;
+ dbgGebruikers: TDBGrid;
+ Panel1: TPanel;
+ btnKlantinstellingenToevoegen: TButton;
+ dsKlantinstellingen: TDataSource;
+ btnKlantinstellingenWijzigen: TButton;
+ btnKlantinstellingenVerwijderen: TButton;
+ private
+ { Private declarations }
+ public
+ { Public declarations }
+ end;
+
+implementation
+
+{$R *.dfm}
+
+end.
Index: PlanScan/PlanScan.dpr
===================================================================
diff -u -r360 -r364
--- PlanScan/PlanScan.dpr (.../PlanScan.dpr) (revision 360)
+++ PlanScan/PlanScan.dpr (.../PlanScan.dpr) (revision 364)
@@ -15,7 +15,8 @@
MidasLib,
frameDnaCodes in 'UI\frameDnaCodes.pas' {frmDnaCodes: TFrame},
frameGebruikers in 'UI\frameGebruikers.pas' {frmGebruikers: TFrame},
- DnaCodeService in 'WS\DnaCodeService.pas';
+ DnaCodeService in 'WS\DnaCodeService.pas',
+ frameKlantinstellingen in 'UI\frameKlantinstellingen.pas' {frmKlantinstellingen: TFrame};
{$R *.res}
Index: PlanScan/UI/frameKlantinstellingen.dfm
===================================================================
diff -u
--- PlanScan/UI/frameKlantinstellingen.dfm (revision 0)
+++ PlanScan/UI/frameKlantinstellingen.dfm (revision 364)
@@ -0,0 +1,102 @@
+object frmKlantinstellingen: TfrmKlantinstellingen
+ Left = 0
+ Top = 0
+ Width = 640
+ Height = 480
+ TabOrder = 0
+ object dbgGebruikers: TDBGrid
+ Left = 0
+ Top = 0
+ Width = 513
+ Height = 480
+ Align = alClient
+ Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect, dgTitleClick, dgTitleHotTrack]
+ TabOrder = 0
+ TitleFont.Charset = DEFAULT_CHARSET
+ TitleFont.Color = clWindowText
+ TitleFont.Height = -11
+ TitleFont.Name = 'Tahoma'
+ TitleFont.Style = []
+ Columns = <
+ item
+ Expanded = False
+ FieldName = 'cdsKlantinstellingenKlantId'
+ Title.Caption = 'KlantId'
+ Visible = True
+ end
+ item
+ Expanded = False
+ FieldName = 'cdsKlantinstellingenKlantnaam'
+ Title.Caption = 'Naam'
+ Visible = True
+ end
+ item
+ Expanded = False
+ FieldName = 'cdsKlantinstellingenIsExport'
+ Title.Caption = 'Export'
+ Visible = True
+ end>
+ end
+ object Panel1: TPanel
+ Left = 513
+ Top = 0
+ Width = 127
+ Height = 480
+ Align = alRight
+ BevelEdges = []
+ BevelOuter = bvNone
+ TabOrder = 1
+ object btnKlantinstellingenToevoegen: TButton
+ Left = 6
+ Top = 6
+ Width = 115
+ Height = 25
+ Caption = 'Toevoegen'
+ TabOrder = 0
+ end
+ object btnKlantinstellingenWijzigen: TButton
+ Left = 6
+ Top = 46
+ Width = 115
+ Height = 25
+ Caption = 'Wijzigen'
+ TabOrder = 1
+ end
+ object btnKlantinstellingenVerwijderen: TButton
+ Left = 6
+ Top = 85
+ Width = 115
+ Height = 25
+ Caption = 'Verwijderen'
+ TabOrder = 2
+ end
+ end
+ object cdsKlantinstellingen: TClientDataSet
+ Aggregates = <>
+ FieldDefs = <
+ item
+ Name = 'cdsKlantinstellingenKlantId'
+ DataType = ftString
+ Size = 10
+ end
+ item
+ Name = 'cdsKlantinstellingenKlantnaam'
+ DataType = ftString
+ Size = 50
+ end
+ item
+ Name = 'cdsKlantinstellingenIsExport'
+ DataType = ftBoolean
+ end>
+ IndexDefs = <>
+ Params = <>
+ StoreDefs = True
+ Left = 120
+ Top = 240
+ end
+ object dsKlantinstellingen: TDataSource
+ DataSet = cdsKlantinstellingen
+ Left = 120
+ Top = 192
+ end
+end