dll Problem

[STS301]

Allmählich langt es mir mit den Fehlern, aber leider hat es den Anschein, dass mich die Bugs gerne haben und bei mir wohnen :( :(

Also

mache gerade das dll Tutorial in der dsdt und hänge, wenn ich die dll Datei mit einer Unit verbinden will.

wenn ich es in der VCL-Formularanwendung einfüge, dann sagt er mir:

[Fehler] Programm1.pas(5): E2070 Unbekannte Direktive: 'x'
[Fehler] Programm1.pas(11): E2003 Undefinierter Bezeichner: 'TForm'

x kann ich eigentlich nirgends definieren, damit er es erkennt.
er unterstreicht mir auch bei "TForm3 = class(TForm)" das (TForm).

"implementation" unterstreicht er mir auch, nur er nennt mir noch keinen Grund.

"I'm lost in Delphi!!"

[DeddyH]

Auf der verlinkten Seite kann ich kein TForm erkennen.

[sirius]

Was hast du denn wo gemacht. So kann ich schwer eine Aussage machen.

Wenn du natürlich in ein leeres Programm x:=addiere(4,5) ist mir klar, dass er x nicht kennt.

[STS301]

das ist mir ja auch klar, dass er kein x kennt, aber wo kann ich ihm sagen, was x ist ohne dass er mir es wieder als Fehler anrechnet.

hier der Code:

Delphi-Quellcode:

unit Programm1;

interface
function addiere(zahl1, zahl2: integer): integer; stdcall;
x:=addiere(12, 3);

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

type
  TForm3 = class(TForm)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form3: TForm3;
implementation

function addiere(zahl1, zahl2: integer): integer; stdcall;
external 'rechnenpro.dll';

{$R *.dfm}

end.

[sirius]

Das x:=addiere kommt ha jauch nicht dahin, sondern dort, wo du es brauchst. z.B. in einer Methode Button1Click, wo du dann x ausgibst (und als lokale Variable definiert hast; nur so als Beispiel).

[DeddyH]

Delphi-Quellcode:

unit Programm1;

interface
function addiere(zahl1, zahl2: integer): integer; stdcall;
//x:=addiere(12, 3);  Quatsch! Das war doch nur Beispielcode für die Verwendung

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

type
  TForm3 = class(TForm)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form3: TForm3;
implementation

function addiere(zahl1, zahl2: integer): integer; stdcall;
external 'rechnenpro.dll';

{$R *.dfm}

end.

[STS301]

na gut, jetzt schreibt er mir

[Fehler] Programm1.pas(6): E2029 Deklaration erwartet, aber 'USES' gefunden

und unterstreicht mir uses, und Button1.click

[sirius]

nimm mal die deklaration von function oberhalb von uses raus.

[STS301]

:thumb:
zwischen den einzellnen Delphis gibt es leider immer wieder so kleine Bugs, aber danke an euch

[STS301]

habe das tutorial jetzt abgeschlossen, nur weiß ich ncht wie man zb. das Ergebnis ausgibt, mit label.caption wie üblich funktioniert es nicht ...