Erro Criando DLL

Delphi

18/02/2003

Olá Estou tentando Criar uma DLL, e está me dando o Seguinte Erro
´invalid operation point ´ Obs.: Estou usando o StdCall

//Dll Library Upp;
Uses
Windows,Messages,SysUtils,Variants,Classes,
Graphics,Controls,Forms,Dialogs;
{$R *.res}
Function Teste:String; Export;StdCall;
Begin
Result:=´1.0.0.1´;
end;
End;
Exports Teste ;

Begin

End.

// Aplicativo

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
Function Teste:String;stdcall;
var
Form1: TForm1;
Function Teste:String; External ´C:\TBs Software\dll\Upp.dll´;
Implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var S:String;
begin
Try
Edit1.Text:=Teste;
Except
End;
end;
end.
Ele executa dá o erro e retorna o valor

Obrigado !!!


Zector

Zector

Curtidas 0

Respostas

Anonymous

Anonymous

18/02/2003

Não sei se é isso mas tente declarar o nome da dll ali onde vc colocou o caminho completo.
coloque a dll no mesmo diretorio da sua aplicacao.
Boa Sorte!
Gean Carlos


GOSTEI 0
Anonymous

Anonymous

18/02/2003

Eu utilizo dll também, mas não declaro o stdcall e a dll funciona normalmente.

Dica: Só declare na dll aquelas units que vc realmente precisa usar.

Colocar a unit Forms faz a dll crescer muito de tamanho.

Espero ter ajudado.

Carlos Bastos


GOSTEI 0
POSTAR