AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

dll in Delphi verwenden

Ein Thema von MorrisF · begonnen am 1. Aug 2019 · letzter Beitrag vom 6. Aug 2019
Antwort Antwort
Seite 2 von 3     12 3      
MorrisF

Registriert seit: 3. Apr 2019
41 Beiträge
 
#11

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 14:29
Ja, die Meldung kommt beim Create, also während das Programm schon läuft, hast recht.
Laut pdf kann man cdecl oder stdcall verwenden, wobei cdecl wohl besser für C++ Methoden ist(in meiner dll steht C++ Code). Im übrigen habe ich schon cdecl und stdcall probiert. Geht beides nicht
BOOL habe ich auch schon probiert, der Fehler ist in beiden Fällen der Selbe.
Der Befehl LoadLibrary() macht in meinem Code keine Probleme, beim debuggen hüpft er munter weiter. Die ganze GetEntryPoints() Function macht keine Probleme. Der Fehler kommt beim Aufruf von Scanner98x_Init(1, 1000, nil) in meiner Create Prozedur

Geändert von MorrisF ( 5. Aug 2019 um 14:43 Uhr)
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 14:56
Hallo,
also ergibt das hier NIL?

@Scanner98x_Init := GetProcAddress(lib, ct_Init);

Welchen Wert hat lib?
Heiko
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#13

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 14:59
Hallo,
Scanner98x_Init(1, 1000, nil)

nil als ErrorCode-Variable ist doch etwas ungewöhnlich, oder ?
Wohin soll denn die Dll den Code hinschreiben und wenn es nur 0 für "kein Fehler" wäre?
Heiko

Geändert von hoika ( 5. Aug 2019 um 15:24 Uhr)
  Mit Zitat antworten Zitat
MorrisF

Registriert seit: 3. Apr 2019
41 Beiträge
 
#14

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:34
Was soll/kann ich denn übergeben?
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#15

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:37
Hallo,
var
Error: DWORD;

, @Error);


Wenn dir das LPDWORD nicht gefällt,
kannst du auch
; var Error: DWORD als Parameter nehmen

Der Aufruf sieht dann so aus
, Error);
Heiko
  Mit Zitat antworten Zitat
MorrisF

Registriert seit: 3. Apr 2019
41 Beiträge
 
#16

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:37
lib hat ne ganz lange Zahl und @Scanner98x_Init hat $ und ne ganz lange Zahl als Wert.
... is das richtig?
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#17

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:39
Hallo,
Zitat:
lib lange Zahl
ja.

Sollte halt nicht <(=)32 sein.
Heiko
  Mit Zitat antworten Zitat
MorrisF

Registriert seit: 3. Apr 2019
41 Beiträge
 
#18

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:41
Habe das mit dem Error jetzt so gemacht, wie du gesagt hast. Bekomme leider den selben Fehler wie vorher
  Mit Zitat antworten Zitat
MorrisF

Registriert seit: 3. Apr 2019
41 Beiträge
 
#19

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:42
Zitat:
Sollte halt nicht <(=)32 sein.
ist es nicht
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#20

AW: dll in Delphi verwenden

  Alt 5. Aug 2019, 15:43
Hallo,
stdcall genommen?
BOOL genommen?

Wenn ja, poste mal danach noch mal den ganzen Code.
Heiko
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 3     12 3      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:00 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