Ver Mensaje Individual
  #4  
Antiguo 06-10-2008
miguelcba miguelcba is offline
Registrado
 
Registrado: sep 2008
Posts: 6
Reputación: 0
miguelcba Va por buen camino
Cita:
Empezado por ContraVeneno Ver Mensaje
pues mas bien tendrías que analizar que tienes en el "Auto-Create" y / o como estas creando el TQuery.
Me falto un detalle, es la primera vez que intento realizar una dll con un form.

Código Delphi [-]Library buscar;
uses
sharemem,
buscar1 in 'buscar1.pas' {Form1};
{$R *.res}
exports
buscaroperador;
begin

end.




no se si es correcta la forma en que intento hacerla:
pero por ejemplo al colocarle el adoquery me tira el error,

Código Delphi [-]unit buscar1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB;
type
TForm1 = class(TForm)
ADOQuery1: TADOQuery;
private
{ Private declarations }
public
{ Public declarations }
end;
function buscaroperador:string;stdcall;
var
Form1: TForm1;
implementation
{$R *.dfm}
function buscaroperador:string;stdcall;
var
formulario:tform1;
begin
Application.Initialize;
formulario:=tform1.Create(application);
if formulario.ShowModal=mrok then
result:='aa';
end;
end.
Responder Con Cita