AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen FreePascal FreePascal Problem mit LoadLibrary

Problem mit LoadLibrary

Ein Thema von iphi · begonnen am 4. Jun 2021 · letzter Beitrag vom 5. Jun 2021
Antwort Antwort
iphi

Registriert seit: 13. Feb 2009
244 Beiträge
 
Delphi 7 Personal
 
#1

Problem mit LoadLibrary

  Alt 4. Jun 2021, 22:11
Hallo,

ich verzweifle gerade, einen simplen Code von Delphi7 nach Lazarus/fpc zu portieren, der eine dll dynamisch laden soll.
LoadLibrary funktioniert nicht, liefert 0 zurück.

Hier mein Code:
Delphi-Quellcode:
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, Windows;

type

  { TForm1 }

  TForm1 = class(TForm)
    Button1: TButton;
    Label1: TLabel;
    procedure Button1Click(Sender: TObject);
  private

  public

  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }
 var
  dll_handle: Cardinal=0;

procedure TForm1.Button1Click(Sender: TObject);
begin
dll_handle := LoadLibrary('d:\test\TestLib.dll');
Label1.Caption:=inttostr(dll_handle);
end;

end.
Derselbe Code in Delphi7 funktioniert einwandfrei. Der Pfad zur dll stimmt.
Was mache ich falsch?

Kann das was damit zu tun haben, dass Delpi7 32bit code produziert, womit auch die dll erzeugt wurde, Lazarus aber 64bit code macht? Kann ich auf einer 64bit Maschine mit Lazarus auch 32bit Code erzeugen?

Geändert von iphi ( 4. Jun 2021 um 22:18 Uhr)
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
7.992 Beiträge
 
Delphi XE4 Professional
 
#2

AW: Problem mit LoadLibrary

  Alt 4. Jun 2021, 22:22
Hallo
,ein 64Bit-Programm kann keine 32bit-DLL laden.
Lazarus kann ich 32bit erzeugen.
Heiko
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.593 Beiträge
 
Delphi 5 Professional
 
#3

AW: Problem mit LoadLibrary

  Alt 5. Jun 2021, 01:04
Grundsätzlich ist es immer eine gute Idee, MSDN-Library durchsuchenGetLastError oder Delphi-Referenz durchsuchenRaiseLastOsError oder ähnliche Funktionen zu rufen, wenn der Aufruf von API-Funktionen fehlschlägt, damit man möglichst schnell ermitteln kann, woran es klemmt.

Wie hoika schon sagte: Ein 32-bit Programm kann keine 64-bit DLLs laden und umgekehrt. Und selbst wenn beide 32-bit oder beide 64-bit sind, spielt noch die Architektur eine Rolle (x86, ARM usw).

Grüße
Dalai
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
38.596 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Problem mit LoadLibrary

  Alt 5. Jun 2021, 13:08
Zitat:
Kann ich auf einer 64bit Maschine mit Lazarus auch 32bit Code erzeugen?
Natürlich.

Sogar Delphi kann in einem 32 Bit-Windows eine 64 Bit-EXE und sogar Android-Apps oder für Linux kompilieren.



Und wie Dalai schon richtig sagte, eine Fehlerbehandlung kann nie schaden.
Es steht sogar in der Hilfe drin, was man hier machen muß.
MSDN-Library durchsuchenLoadLibrary (LoadLibraryW > Return value)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014

Geändert von himitsu ( 5. Jun 2021 um 13:12 Uhr)
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 +2. Es ist jetzt 05:11 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf