Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi DLL Zugriff (https://www.delphipraxis.net/52317-dll-zugriff.html)

TheMiller 27. Aug 2005 17:29


DLL Zugriff
 
Hallo,

eine Frage: Kann ich mit einer DLL, die in mein Programm eingebunden ist, auf eine Komponente (zB ListView) in einer spez. Form zugreifen?

Danke im Voraus

Olli 27. Aug 2005 18:03

Re: DLL Zugriff
 
Mehr Input, bitte!

Bei aktuellem Wissenstand aus deinen Angaben lautet die Antwort: Jain.

TheMiller 27. Aug 2005 18:31

Re: DLL Zugriff
 
:)

Ok, nehmen wir an, ich habe eine ListView in Form1 (ListView1). In der DLL ist eine Funktion/Routine, die die ListView mit Daten füllt. Woher sie die hat, sei mal so dahingestellt.

Funktioniert das?

alcaeus 27. Aug 2005 18:40

Re: DLL Zugriff
 
Moin DJ-SPM,

wie waers wenn du der Funktion aus der DLL eine ListView uebergibst, und die Funktion mit der ListView arbeitet?
Die Funktion direkt auf ListView2 in Form275 zu boxen waere vielleicht sogar moeglich, ist (IMO) aber alles andere als sinnvoll.

Greetz
alcaeus

TheMiller 27. Aug 2005 18:45

Re: DLL Zugriff
 
Kannst du mir ein kleines Beispiel geben. Entweder stehe ich gerade auf dem Schlauch... Habe mit DLLs selten gearbeitet...

glkgereon 27. Aug 2005 18:54

Re: DLL Zugriff
 
du machst ne variable in der dll

Delphi-Quellcode:
Lst: Pointer;
dann sagst du irgendwo im HauptCode
Delphi-Quellcode:
Lst:=ListBox1;
und in der Dll arbeitest du dann mit
Delphi-Quellcode:
with TListBox(Lst) do
  bla

brechi 27. Aug 2005 18:58

Re: DLL Zugriff
 
in die dll:

Delphi-Quellcode:

uses windows, sysutils, <unit für listbox>;

var flist: TListbox = nil;

procedure InitListBox(var l: TlistBox); stdcall;
begin
  flist := l;
end;


procedure hierfueheichwashinzu;
begin
  if flist <> nil then
    flist.add('hallo');
end;

export InitListBox;
in exe:

Delphi-Quellcode:

var initListBox: procedure (var l: TlistBox); stdcall;

  oncreate:
 
h := Loadlibrary('mydll.dll');
@initlistbox := GetProcaddress(h,'InitListBox');
inilistBox(form1.Listbox1);
danach kann halt von der dll etwas eingefügt werden


Edit: meine fresse kann man nicht einfach das stehen lassen was ich schreibe, warum muss für jedes delphi immer ein pre eingesetzt werden wenn ich nen / vergessen habe

Olli 27. Aug 2005 20:30

Re: DLL Zugriff
 
Übrigens, wenn du den Overhead durch die Unit für die Listbox vermeiden willst, kannst du die Listbox noch ganz traditionell über ihr Handle nach Win32-API-Manier füllen ;) Einfach im PSDK unter "Common Controls" nachgucken ---

TheMiller 27. Aug 2005 21:47

Re: DLL Zugriff
 
Danke an euch alle,

aber die erste Version (mit dem Pointer) scheint mir noch am einfachsten zu sein, oder irre ich da?!?

tigerman33 27. Aug 2005 22:00

Re: DLL Zugriff
 
Macht letztendlich nicht viel Unterschied. Je nachdem was mehr deinem persönlichen Stil entspricht.

@all:
Täusche ich mich, oder ist ein Windows-Handle nichts anderes als ein Zeiger? :?:


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:00 Uhr.
Seite 1 von 2  1 2      

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