Index: AAPClient/UI/DrieKnoppenScherm.pas =================================================================== diff -u -r184 -r191 --- AAPClient/UI/DrieKnoppenScherm.pas (.../DrieKnoppenScherm.pas) (revision 184) +++ AAPClient/UI/DrieKnoppenScherm.pas (.../DrieKnoppenScherm.pas) (revision 191) @@ -6,7 +6,7 @@ Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ActnList, Images, Vcl.ImgList, UiContext, Vcl.ExtCtrls, Soap.InvokeRegistry, Soap.Rio, - Soap.SOAPHTTPClient, Data.DB, Datasnap.DBClient, Soap.SOAPConn; + Soap.SOAPHTTPClient, Data.DB, Datasnap.DBClient, Soap.SOAPConn, Agent; type TfmDrieKnoppenScherm = class(TForm) @@ -46,6 +46,7 @@ fUiContext: TUiContext; protected fImagesScherm: TImagesScherm; + fAgent: TAgent; function ComputerName: String; function WUserName: String; function FullName: String; @@ -71,6 +72,7 @@ actRechtsOnder := nil; lblGebruiker.Visible := false; fImagesScherm := TImagesScherm.Create(self); + fAgent := TAgent.Create(); end; procedure TfmDrieKnoppenScherm.FormShow(Sender: TObject);