Index: PlanScan/UI/KlantinstellingenDetailScherm.pas
===================================================================
diff -u -r372 -r373
--- PlanScan/UI/KlantinstellingenDetailScherm.pas	(.../KlantinstellingenDetailScherm.pas)	(revision 372)
+++ PlanScan/UI/KlantinstellingenDetailScherm.pas	(.../KlantinstellingenDetailScherm.pas)	(revision 373)
@@ -13,9 +13,14 @@
     edtklantId: TEdit;
     cbIsExport: TCheckBox;
   private
+    function getIsExport: boolean;
+    function getKlantId: string;
+    procedure setIsExport(const Value: boolean);
+    procedure setKlantId(const Value: string);
     { Private declarations }
   public
-    { Public declarations }
+    property KlantId: string read getKlantId write setKlantId;
+    property IsExport: boolean read getIsExport write setIsExport;
   end;
 
 var
@@ -25,4 +30,26 @@
 
 {$R *.dfm}
 
+{ TfmKlantinstellingenDetail }
+
+function TfmKlantinstellingenDetail.getIsExport: boolean;
+begin
+  result := cbIsExport.Checked;
+end;
+
+function TfmKlantinstellingenDetail.getKlantId: string;
+begin
+  result := edtKlantId.Text;
+end;
+
+procedure TfmKlantinstellingenDetail.setIsExport(const Value: boolean);
+begin
+  cbIsExport.Checked := Value;
+end;
+
+procedure TfmKlantinstellingenDetail.setKlantId(const Value: string);
+begin
+  edtKlantId.Text := Value;
+end;
+
 end.