User Function Exemplo()Local cMensagem := ""//+----------------------------------------------------------------------------+//|Exemplifica o uso da função GetClientDir |//+----------------------------------------------------------------------------+ cMensagem += "GetClientDir() = " + GetClientDir()//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos |//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do GetClientDir")