Holas compañeros, estoy aprendiendo a crear y usar librerias DLL, tengo este código:
Código Delphi
[-]library Project1;
uses
SysUtils,
Graphics,
Classes;
{$R *.res}
procedure Hola; stdcall; export;
begin
ShowMessage('Holaaaaaaaa');
end;
procedure Fondo; stdcall; export;
var color: TColor;
begin
color := clWhite;
end;
exports
Hola,
Fondo;
begin
end.
el pedazo de codigo que esta en negrita, no se si es correcto, al compilar no me da problemas, asi es como lo estoy llamando:
Código Delphi
[-]procedure Hola; external 'EjemploDLL.dll';
procedure Fondo; external 'EjemploDLL.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
Hola;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Color := Fondo;
end;
cuando intento correr la aplicacion, me da este error:
me imagino que el problema viene del procedimiento Fondo de la Librería. cual es la manera correcta de hacerlo?
saludos