hallo zusammen,
ich wollte eine
dll programmieren die ein fenster anzeigt...
hier der code der
dll:
Delphi-Quellcode:
library Project5;
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Unit3 in 'Unit3.pas' {Form3};
{$R *.res}
procedure start;
begin
Unit3.Form3.Show;
end;
exports start;
begin
end.
hier der code der exe die die
dll benutzen soll:
Delphi-Quellcode:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 =
class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form2: TForm2;
const
DLLNAME = '
project5.dll';
procedure start;
external DLLNAME;
implementation
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
start;
end;
end.
ich bekomme jedoch eine zugriffsverletzung wenn ich nun über den button das fenster anzeigen lassen will...
wenn ich in der funktion der
dll z.b. ein simples ShowMessage('Hallo') nehme dann zeigt er mir die Messagebox auch an...
was mache ich falsch?
lg paperboy