Das Problem liegt darin, dass
dll in Fortran mit Hilfe von Fortran-Compiler geschrieben wurde. Delphi findet schon Funtion in dieser
Dll, ich kann die sogar aufrufen, aber ich bekomme total falschen Wert. Hier ist ein Teil von meiner Quellcode:
Delphi-Quellcode:
function VPUNK(t2:integer) : integer; external 'quelle.dll'; // rufe diese funktion VPUNK auf.
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var cPfad, c1 : string;
a,t2: integer;
begin
t2 := 3;
a := VPUNK(t2); // verwende sie
c1:= inttostr(a);
Statt 6 bekomme ich so ein Ergebnis: -2334563. Und ich weiß jetzt nicht genau, wo liegt der Fehler: entweder in
Dll oder ich mache in meiner Code was falsch? Danke. 8)