DLL static load/de: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: DLL static load/de

New		Line
1	+	Zurück zu den [[Additional information/de\|Zusätzlichen Informationen]].
2	+
3	+	Dieser Artikel beschäftigt sich mit der Windowsprogrammierung.
4	+
5	+	Das Tutorial, zeigt wie eine DLL (Dynamic Link Library) <b>statisch</b> geladen wird.
6	+
7	+	Die Dll (DLLTest.dll) auf die sich im unteren Beispiel bezogen wird:
8	+
9	+	``` pascal
10	+	library Info;
11	+
12	+	{$mode objfpc}{$H+}
13	+
14	+	uses
15	+	SysUtils;
16	+
17	+	{$R *.res}
18	+
19	+	// Das Unterprogramm der DLL
20	+	function funStringZurueck(strUebergabe: string): PChar;
21	+	begin
22	+	funStringZurueck := PChar(UpperCase(strUebergabe));
23	+	end;
24	+
25	+	// Exportierte Unterprogramm(e)
26	+	exports
27	+	funStringZurueck;
28	+
29	+	begin
30	+	end.
31	+	```
32	+
33	+	Einbinden, verwenden und freigeben des DLL-Unterprogramms im eigenen Programm:
34	+
35	+	``` pascal
36	+	uses
37	+	Windows, ...;
38	+
39	+	...
40	+
41	+	{
42	+	Nennt das zuverwendende Unterprogramm und die DLL in der das Unterprogramm zu finden ist.
43	+	(In diesem Beispiel heisst die DLL DLLTest.dll und ist natürlich durch den Namen
44	+	Ihrer DLL zu ersetzen.)
45	+	(In diesem Beispiel heisst das Unterprogramm der DLL funStringZurueck und ist
46	+	natürlich durch den Namen des Unterprograms in Ihrer DLL zu ersetzen.)
47	+	}
48	+	function funStringZurueck(strUebergabe: PChar): PChar; stdcall; external 'DLLTest.dll';
49	+
50	+	...
51	+
52	+	function funWertZurueck: string;
53	+	begin
54	+	// Übernimmt den Rückgabewert des DLL-Unterprogramms
55	+	Result := funStringZurueck('hallo welt');
56	+	end;
57	+
58	+	...
59	+	```
60	+
61	+	---
62	+	From the Free Pascal wiki, page "DLL static load/de", as it stood on 2020-02-14 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).

Back to history