O exemplo abaixo mostra uma situação onde TLPP invoca uma função que não existe na dll carregada.
Estando a chamada protegida por Try-Catch, posteriormente a aplicação pode chamar GetLastError para obter o código do erro ocorrido.
#include "tlpp-core.th" Function U_DynCall() Local oDll as Object If (IsSrvUnix()) oDll := tRunDll():New("dllc.so") Else oDll := tRunDll():New("dllc.dll") EndIf Try // chamando uma função que não existe oDll:callFunction("blablabla", "V", nil) Catch oError Conout("Gerou um exception forçado no teste") EndTry Conout(oDll:GetLastError()) // Vamos Sanitizar? oDll:Free() Return |