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