Index: AAPClient/UI/PopupScherm.pas
===================================================================
diff -u -r143 -r144
--- AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 143)
+++ AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 144)
@@ -24,6 +24,8 @@
     procedure pnlbtnActie2Click(Sender: TObject);
     procedure imgActie1Click(Sender: TObject);
     procedure imgActie2Click(Sender: TObject);
+    procedure lblActie1Click(Sender: TObject);
+    procedure lblActie2Click(Sender: TObject);
   private
     { Private declarations }
   public
@@ -60,6 +62,18 @@
   CloseModal;
 end;
 
+procedure TfmPopupScherm.lblActie1Click(Sender: TObject);
+begin
+  ModalResult := mrNo;
+  CloseModal;
+end;
+
+procedure TfmPopupScherm.lblActie2Click(Sender: TObject);
+begin
+  ModalResult := mrNo;
+  CloseModal;
+end;
+
 procedure TfmPopupScherm.pnlbtnActie1Click(Sender: TObject);
 begin
   ModalResult := mrYes;