Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Probleme beim Verwenden einer c++-Dll (https://www.delphipraxis.net/208597-probleme-beim-verwenden-einer-c-dll.html)

Tobsn01 24. Aug 2021 13:53

Delphi-Version: 10.3 Rio

Probleme beim Verwenden einer c++-Dll
 
Hallo liebe Delphi-Praxis,

ich bin recht neu in der Sprache, darum entschuldige ich mich schon mal im Vorhinein, sollte ich einfach nur "noob"-Fehler gemacht haben.

Ich will mit einem Delphi-Programm die Software namens "VoiceMeeter Potato" steuern. Das soll über die zugehörige .dll funktionieren.

Die ersten paar Schritte, also laden der Dll und der Login (die dll ist irgendwie in einer Art Server-Client Protokoll aufgebaut).

Jetzt möchte ich nun die Funktion 'GetParameterFloat' aufrufen.

In der dll ist diese so definiert:
Code:
long __stdcall VBVMR_GetParameterFloat(char * szParamName, float * pValue);
Also habe ich versucht, eine entsprechende Funktion zu definieren:

Delphi-Quellcode:
TGetParameterFloat = function(var param : PAnsiChar; var value : Single) : Integer; stdcall ;
Ich versuche nun den Parameter "Strip[2].Mono" abzufragen, in dem ich
Delphi-Quellcode:
getPara(PAnsiChar('Strip[2].Mono'), val);
ausführe.

(Ja, getPara ist aktuell die GetParameterFloat-Funktion und ja, sie ist nicht nil :) )

Soweit alles gut, jedoch bekomme ich als Rückgabewert eine -3, was laut Dokumentation "unknown parameter" entspricht.

Der Parameter steht aber in der Liste mit drin, und alle anderen ergeben das selbe Resultat.

Weiß eventuell einer hier weiter? Ich bin mit meinem Latein jedenfalls am Ende :/

Der Link zur pdf: http://download.vb-audio.com/Downloa...rRemoteAPI.pdf

TiGü 24. Aug 2021 14:31

AW: Probleme beim Verwenden einer c++-Dll
 
Delphi-Quellcode:
// Ändere mal so:
TGetParameterFloat = function(param : PAnsiChar; var value : Single) : Integer; stdcall;
Delphi-Quellcode:
// nur zur Sicherheit mal so probieren:
var
  ParameterName: Ansistring;
  val: Single;
begin
  ...
  ParameterName := 'Strip[2].Mono';
  getPara(PAnsiChar(ParameterName), val);

Blup 24. Aug 2021 14:58

AW: Probleme beim Verwenden einer c++-Dll
 
Da es sich beim Parameter "value" um eine reine Rückgabe handelt, wäre "out" richtiger.
Damit weis der Compiler das diese Variable vor dem Aufruf der Funktion nicht initialisiert werden muss.

Tobsn01 24. Aug 2021 15:17

AW: Probleme beim Verwenden einer c++-Dll
 
Wahnsinn, riesen großes Danke! Ich hab mir da sehr den Schädel zerbrochen, warum da nix gehen wollte :D
Nur aber mal aus Interesse, warum funktioniert es nun so? ^^

TiGü 24. Aug 2021 15:45

AW: Probleme beim Verwenden einer c++-Dll
 
Zitat:

Zitat von Tobsn01 (Beitrag 1493864)
Wahnsinn, riesen großes Danke! Ich hab mir da sehr den Schädel zerbrochen, warum da nix gehen wollte :D
Nur aber mal aus Interesse, warum funktioniert es nun so? ^^

Durch den Zusatz von var sagst du dem Compiler und der DLL: "Hey, ich möchte das du den Inhalt hinter dem Adresszeiger füllst oder dir selber ausliest".

Beispiel:

Delphi-Quellcode:
procedure Foo(var SomeValue: Integer);

ist im Prinzip das hier:
Delphi-Quellcode:
procedure Foo(SomeValue: PInteger);

Man übergibt sozusagen den Zeiger auf einen Übergabewert, also nur die Hausnummer und nicht das Haus.

Wenn du nun sowas machst:

Delphi-Quellcode:
procedure Foo(var SomeValue: PInteger);

sieht der Compiler sowas:
Delphi-Quellcode:
procedure Foo(SomeValue: PPInteger);


Sozusagen ein Doppelpointer. Die Hausnummer einer Hausnummer eines Hauses.
Da kann die DLL nichts draus lesen, weil es nur der Zeiger auf den richtigen Zeiger auf den Parameternamen ist.

Tobsn01 24. Aug 2021 16:27

AW: Probleme beim Verwenden einer c++-Dll
 
Ah okay, heißt im Grunde, der Typ PAnsiChar ist schon ein Pointer auf AnsiChar? Ich dachte so heißt einfach nur der Typ :D


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:22 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz