Declaração de DLL e Seu uso ??

Delphi

22/02/2006

Declarei uma DLL, mas ñ consigo chamá-la no form...
A declaração da Função é esta...

Procedure LimpaObjeto(Formulario:Tform); Export;
Var
C:integer;
Begin
For C:=0 to Formulario.ComponentCount -1 do
Begin
If Formulario.Components[C] Is TLabeledEdit then
tLabeledEdit(Formulario.Components[c]).Clear;
If Formulario.Components[C] Is TEdit then
tEdit(Formulario.Components[c]).Clear;
If Formulario.Components[C] Is TMaskEdit then
tMaskEdit(Formulario.Components[c]).Clear;
End;
End;
Exports LimpaObjeto;
--------------------------------------------------------------------------------
Declaro no Form assim:

implementation
uses Form_principal;
Procedure LimpaObjeto(Formulario:Tform); External ´Funcoes.DLL´ name ´LimpaObjeto´;


Cabal

Cabal

Curtidas 0
POSTAR