Difference between revisions of "DLL static load/de"

From Lazarus wiki
Jump to navigationJump to search
(Created page with "{{DLL static load}} <br> <br> Dieser Artikel beschäftigt sich mit der Windowsprogrammierung.<br> Das Tutorial, zeigt wie eine DLL (Dynamic Link Library) <b>statisch</b> gelad...")
 
m
Line 47: Line 47:
 
function funWertZurueck: string;
 
function funWertZurueck: string;
 
begin
 
begin
 +
  // Übernimmt den Rückgabewert der DLL-Funktion
 
   Result := funStringZurueck('hallo welt');
 
   Result := funStringZurueck('hallo welt');
 
end;
 
end;

Revision as of 15:54, 4 June 2013

Windows logo - 2012.svg

Dieser Artikel behandelt ausschließlich Windows.

Siehe auch: Multiplatform Programming Guide/de

Deutsch (de)


Dieser Artikel beschäftigt sich mit der Windowsprogrammierung.
Das Tutorial, zeigt wie eine DLL (Dynamic Link Library) statisch geladen wird.


Die Dll (DLLTest.dll) auf die sich im unteren Beispiel bezogen wird:

library Info;

{$mode objfpc}{$H+}

uses
  SysUtils;

{$R *.res}

// Die Funktion der DLL
  function funStringZurueck(strUebergabe: string): PChar;
  begin
    funStringZurueck := PChar(UpperCase(strUebergabe));
  end;


// Exportierte Funktion(en)
exports
  funStringZurueck;

begin
end.



Einbinden, verwenden und freigeben der DLL-Funktion im eigenen Programm:

uses
  Windows, ...;

  ...

// Nennt die zuverwendende Funktion und die DLL in der die Funktion zu finden ist
function funStringZurueck(strUebergabe: PChar): PChar; stdcall; external 'DLLTest.dll';

  ...

function funWertZurueck: string;
begin
  // Übernimmt den Rückgabewert der DLL-Funktion
  Result := funStringZurueck('hallo welt');
end;

  ...



--Olaf 13:50, 4 June 2013 (UTC)