function TMAINFORM.GetCurrentTaskGuid : string;
var
lMsg : TGetCurrentTaskMessage;
begin
Result := '';
lMsg := TGetCurrentTaskMessage.Create;
// Context.SendMessage(lMsg);
Context.BroadcastToParent(lMsg);
if Length(lMsg.Tasks) > 0 then
Result := lMsg.Tasks[0].GUID;
end;