Histórico da Página

Estado
subtle true colour Green title tlpp - language

• GetVar(cVarName, cSignature, xRet)
  • objetivo: obter o conteúdo de uma variável global da DLL.
  • cVarName: o nome da variável da DLL.
  • cSignature: o tipo da variável (veja DynCall - Assinatura da chamada).
  • xRet: uma variável para guardar o conteúdo obtido.
  • retorno: lógico
    
    • .T.  execução com sucesso
    • .F.  execução com erro

Esse exemplo mostra um código TLPP consumindo o valor de uma variável global de uma dll.

#include <stdio.h>
#include <stdlib.h>

#define EXPORT __declspec(dllexport)

EXPORT double nGlobal = 5.29;

#include "tlpp-core.th"

Function U_DynCall()
  Local oDll as Object
  Local nValue as Numeric
  
  If (IsSrvUnix())
    oDll := tRunDll():New("dllc.so")
  Else
    oDll := tRunDll():New("dllc.dll")
  EndIf

  oDll:GetVar("nGlobal", "

D", nValue)
  Conout(nValue) // espera-se 5.29

  oDll:Free()
  
Return