Meine erste Butterfahrt - Eine dll mit dem BCB erstellen

[messie]

Zitat von Jaynder:

Auch nicht mit der Delphi-Pointer-Variante?

Nee, leider nicht. Der Aufruf scheint zu funktionieren, ich bekomme aber einen Zufallswert nahe 0 zurück.

Die Funktion in der dll ist auch nicht besonders anspruchsvoll.

Code:

double Multi(TParList *Values)
{
   double result;
   result = Values->TempLow;
   return result;
}

Und der Aufruf aus C++ liefert den übergebenen Wert.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Test : TParList;
  result : double;
begin
  Test.TempLow := -333;
  result := _Multi(Test);
  ShowMessage(FloatToStr(result));
end;

Mit der Pointer-Variante kommt ein identisches Ergebnis

Grüße, Messie