Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

DLL erzeugen und in VB5 einbinden

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Profi-Forum
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
c.m.obrecht



Anmeldungsdatum: 09.03.2006
Beiträge: 377
Wohnort: Hofstetten SO, CH

BeitragVerfasst am: 04.03.2007, 22:00    Titel: DLL erzeugen und in VB5 einbinden Antworten mit Zitat

Die Frage wurde vermutlich schonmal gestellt, konnte aber nirgends genaue Informationen darüber finden.
Wie muss ich anstellen um eine DLL in MASM32 zu erzeugen, um sie in VB5 dann einzubinden?

Ein Beispiel (nur ein Beispiel, nicht dass das sehr sinnvoll wäre):

VB-Programm mit einem Label und 2 NumericUpDown bzw. Textboxen, ev. einem Button. Die 2 eingegebenen (Ganz-)Zahlen werden addiert und im Label das Resultat ausgegeben.

Dazu in ASM die Prozedur mov eax, [numeric1]
add eax, [numeric2]
mov [label1], eax
_________________
...längre blomstre gamle nord...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1874
Wohnort: D59192

BeitragVerfasst am: 06.03.2007, 12:08    Titel: Antworten mit Zitat

Hi,
selbst habe ich noch keine dll's in Masm32 erstellt (erst recht nicht für VB) aber ich denke mir, dass sie nach dem gleichen Schema wie in FB aufgebaut werden.
Hinweise darauf fand ich in diesen Tutorials
http://biehler-josef.de/readarticle.php?article_id=34
http://www.joachimrohde.com/cms/xoops/modules/articles/article.php?id=75
(keine einfache Sache zwinkern )
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
c.m.obrecht



Anmeldungsdatum: 09.03.2006
Beiträge: 377
Wohnort: Hofstetten SO, CH

BeitragVerfasst am: 06.03.2007, 21:04    Titel: Antworten mit Zitat

Das ist super! ABer wie gehe ich vor um Variablen in die dll zu übergeben? Diese müssen doch sicher wie eine Funktion definiert werden, ansonsten wird VB oder die DLL sie wahrscheinlich nicht finden?
_________________
...längre blomstre gamle nord...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1874
Wohnort: D59192

BeitragVerfasst am: 06.03.2007, 22:18    Titel: Antworten mit Zitat

genau wie bei subs der WinApi:
Code:
Declare sub NameSub Lib "Name.dll" Alias "NameSub@8" (byref a as long, byref b as long)
wobei ich bei den 'byref' nicht sicher bin (habe kein VB).
@8 = auf dem Stack sind 2 * Adresse zu long Variable (mit je 4 Byte)
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
c.m.obrecht



Anmeldungsdatum: 09.03.2006
Beiträge: 377
Wohnort: Hofstetten SO, CH

BeitragVerfasst am: 06.03.2007, 22:59    Titel: Antworten mit Zitat

Danke! ByVal könnte auch gehen? Könnte ich schon gesehen haben.
Und im ASM-Code, wie übernehme ich sie dort?
_________________
...längre blomstre gamle nord...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1874
Wohnort: D59192

BeitragVerfasst am: 07.03.2007, 09:28    Titel: Antworten mit Zitat

das wird im ersten Tutorial beschrieben:
Code:
...
NAMESUB PROC STDCALL a:DWORD,b:DWORD
...
MOV EAX, xxx  ;xxx ist Rueckgabewert bei Funktionen
RET
NAMESUB ENDP
...
'STDCALL' ist optional
Hier gibt es mehr zu diesem Thema: http://bkausbk.netfirms.com/callconv.html#STDCALL
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
c.m.obrecht



Anmeldungsdatum: 09.03.2006
Beiträge: 377
Wohnort: Hofstetten SO, CH

BeitragVerfasst am: 07.03.2007, 22:36    Titel: Antworten mit Zitat

Super! Vielen Dank; hat funktioniert und ist ja gar nicht mal so eine Sache. Was füreine Rolle spielen die Variablen "a" und "b" :DWORD ? Das sind ja nicht die verwendeten Variablen (zumindest nicht in meiner Funktion, welche eine MesageBox ausgibt und deren Text in VB definiert wird)
_________________
...längre blomstre gamle nord...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1874
Wohnort: D59192

BeitragVerfasst am: 08.03.2007, 08:30    Titel: Antworten mit Zitat

In meinem Beispiel sollten sie dir nur den Zusammenhang zwischen der VB-Deklaration und der Übergabe an die dll-SUB zeigen.

Wenn du diese dll-Sub im Tutorial meinst,
Code:
MSGPROG PROC STDCALL hWnd:DWORD,a:DWORD,b:DWORD
INVOKE MessageBox,hWnd,a,b,MB_OK
RET
MSGPROG ENDP
hier sind a ein Zeiger auf den Ausgabetext und b ein Zeiger auf die Überschrift der Messagebox.
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
c.m.obrecht



Anmeldungsdatum: 09.03.2006
Beiträge: 377
Wohnort: Hofstetten SO, CH

BeitragVerfasst am: 09.03.2007, 13:29    Titel: Antworten mit Zitat

Ach so grinsen Dann habe ich die doppelt definiert, habe nämlich noch "HelloText" definiert und damit funktionierte es; dann kann ich die a und b durch diese Werte ersetzen, dachte es sei ev. ein interner Rückgabewert aber der ist ja nach den Klammern as long definiert.
_________________
...längre blomstre gamle nord...
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Profi-Forum Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz