Index: AAPClient/UI/DrieKnoppenScherm.pas
===================================================================
diff -u -r26 -r32
--- AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 26)
+++ AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 32)
@@ -28,6 +28,7 @@
     fImagesScherm: TImagesScherm;
   protected
     function ComputerName: String;
+    procedure ToonPopupScherm(Melding, Actie: String);
   public
     { Public declarations }
   end;
@@ -37,6 +38,9 @@
 
 implementation
 
+uses
+  PopupScherm;
+
 {$R *.dfm}
 
 procedure TfmDrieKnoppenScherm.FormCreate(Sender: TObject);
@@ -74,6 +78,16 @@
   
 end;
 
+procedure TfmDrieKnoppenScherm.ToonPopupScherm(Melding, Actie: String);
+var
+  PopupScherm: TfmPopupScherm;
+begin
+  PopupScherm := TfmPopupScherm.Create(self);
+  PopupScherm.lblWaarschuwing.Caption := Melding;
+  PopupScherm.btnPopupActie.Caption := Actie;
+  PopupScherm.ShowModal;
+end;
+
 function TfmDrieKnoppenScherm.ComputerName: String;
 var
   buffer: array[0..255] of char;