functionen einer dll aufrufen ?

[agm65]

hi leute, mal eine frage ..ich habe hier eine dll datei die habe ich wie folgt in mein projekt eingebunden;

Delphi-Quellcode:

 const
 DLLNAME = 'file.dll';

wie kann ich jetzt auf die funktionen in der dll zugreifen (ich weiss die leider nicht und habe keine doku)
oder wie kann ich nachschauen was da alles an funktionen drinne ist ?


danke euch ..

[Bernhard Geyer]

Ohne Doku und Headerfiles brauchst du einen Disassembler und sehr viel Know-How um per Reverse-Engineering auf einen Grünen Zweig zu kommen.

Verrätst du uns auch um welche DLL es sich handelt?

[Phoenix]

Zitat:

Zitat von agm65

hi leute, mal eine frage ..ich habe hier eine dll datei die habe ich wie folgt in mein projekt eingebunden;

Delphi-Quellcode:

 const
 DLLNAME = 'file.dll';

:?: Du hast keine DLL eingebunden. Du hast eine Konstante definiert, die einen Dateinamen als String beinhaltet, mehr aber auch nicht.

[agm65]

ja, hast recht ..warte ich schiebe die dll mal hoch ..das ist eine dll für den usb rocket launcher.

[edit=Phoenix]Attachment gelöscht, weil wegen Urheberrechte... Mfg, Phoenix[/edit]

[Phoenix]

Ähem. Darfst Du die weitergeben? Zeig erstmal die Lizenz her die Dir das erlaubt oder lösch das Ding ganz schleunigst wieder :warn:

Und wenn es um den gängigen USB-Rocket-Launcher geht: Da müsste ein SDK mitkommen, also auch die Doku zu der dll beiliegen.

[agm65]

die hat irgend jemand geschrieben....

[mkinzler]

Zitat:

Zitat von agm65

die hat irgend jemand geschrieben....

Windows hat auch jemand geschrieben ...

[Apollonius]

Zitat:

oder wie kann ich nachschauen was da alles an funktionen drinne ist ?

Auf Luckies Homepage (hier) gibt es das Tool DLLExports, was in dieser Hinsicht sehr nützlich ist.

[sirius]

@Phoenix: steht zumindest hier

Zitat:

And a free API is available for download below.

Wenn es denn darum geht.
Und es sieht irgendwie nach .Net aus :cyclops:

[RavenIV]

Ich hab Dir zwei Tutorials zum Thema DLLs angehängt.
Diese solltest Du zuerst durcharbeiten.

[sirius]

@Raven
Das wird nicht viel helfen bei einer Class DLL von .net

Du musst Delphi für .net (oder VS etc. pp) nehmen eine WinForm-Anwendung beginnen und dann unter Projekt -> Refernz hinzufügen, deine DLL suchen. Und dann schau mal unter Referenzen, was du plötzlich für neue Klassen und Methoden hast.


Edit:

Delphi-Quellcode:

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
var myUSB:striker2api.Usb;
begin
  myusb:=usb.Create;
  myusb.Init(self.Handle);

  myusb.FireMissile;

  myusb.Close;
  myusb.Free;

end;

(Was ist das eigentlich für ein besch**** Spielzeug?)

[Die Muhkuh]

Ein USB-Raketenwerfer :mrgreen:

[agm65]

Delphi-Quellcode:

myusb.Init(self.Handle);

[Pascal Fehler] Unit1.pas(30): E2250 Es gibt keine überladene Version von 'Init', die man mit diesen Argumenten aufrufen kann

[sirius]

Hast du alles gemacht, was ich oben geschrieben habe? (Delphi .Net ->Winforms!)

[agm65]

ne hatte ich natürlich nicht ...so jetzt kommt kein fehler mehr aber das ding bewegt sich nicht ...

ich glaube die dll tut es nicht, weil das sample programm was dabei war auch nicht geht

[sirius]

Zitat:

Zitat von agm65

ne hatte ich natürlich nicht ...so jetzt kommt kein fehler mehr aber das ding bewegt sich nicht ...

ich glaube die dll tut es nicht, weil das sample programm was dabei war auch nicht geht

Mehr weis ich auch nicht und ich konnte mich ja auch nur nach dem SampleProgramm richten. Musst du vielleicht mal im Handbuch nachlesen.

Edit:
Evtl. musst du noch auf diese eine (DeviceChange-)Message reagieren. Die DLL hat ja ne ganze Menge Methoden (und auch noch eine zweite Klasse).

Edit2: Da gibts noch
-Methode startup und shutdown (werden allerdigs schon von von open und close benutzt)
-Eigenschaft isUSBconnected
-bstarted
-bcansendcommand
-myProductID
... Da würde ich mir mal anschauen, was so passiert.

[agm65]

hab alles gecheckt....is connected ist auf true ..deswegen sollte die verbindung hergestellt sein ...komisch ist, dass bei der original software das schiessen nicht mehr geht ... ;) ich glaube es ist gelüncht ;)