Quero pegar um valor que esta em uma function em uma dll e colocar em um edit na tela?
bom tenho uma dll com uma função "X" e nessa função eu pego um valor e coloco no campo "Y", mas quero pegar esse valor da função X e colocar em um Edit no meu form.
Alguns me falaram sobre uma tal de (external), como, faço para resolver isso.
NOME DA FUNÇÃO
function TMAT_SA.GetSaldoPedidoMensal(var pSaldoPedidoMensal: TrSaldoPedidoMensal): Integer;
var
ds_verificacao : IDADataset;
Resposta : string;
pParams : TrExistePedidoMensal;
begin
CAMPO COM O VALOR:
pSaldoPedidoMensal.QTDE_PEDIDOMAXMES := ds_verificacao.fieldbyname('QTDE_PEDIDOMAXMES').asinteger;
COMO QUERO FAZER:
Edit1.text := pSaldoPedidoMensal.QTDE_PEDIDOMAXMES;
OBS: Valendo a melhor resposta
Comments
Simples. Sua função retorna o valor do campo Y?
Basta, no seu programa, você colocar o retorno na função no Edit1.text.
Se a função não retorna o valor do campo Y, mas o campo Y for uma variável global, você pode acessá-lo exatamente da forma como você escreveu:
Edit1.text := Campo
Se não retornar e não for global, não tem jeito, você precisará alterar a DLL.