| |

Fortgeschrittene ProgrammierungRe: aber gerne, hier die Source: | |  | Autor: Mac | Datum: 27.09.01 10:20 |
| Die VB-DLL hat diesen Code:
------------------------
Public Property Get mac_msgbox() As Integer
Rem Public Function mac_msgbox() As Integer
Dim i As Integer
Rem Load Form1
Rem Form1.Show
i = MsgBox("Aber Hallo !")
mac_msgbox = i
End Property
Private Sub Class_Initialize()
Load Form1
Form1.Show
End Sub
-------------------------
und die C-Source sieht so aus (ja, das ist alles scheußlich, aber es soll ja auch nur ein Quick´n´dirty Test sein, ob es überhaupt geht):
---------------------------------
#include "stdafx.h"
#include "fcntl.h"
HINSTANCE hDLL;
FARPROC *MAC_msgbox;
int APIENTRY WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow )
{
int i;
hDLL = LoadLibrary("mac.dll");
if (hDLL==NULL)
{
i=open("DEBUG",_O_CREAT );
close(i);
exit(-1);
}
MAC_msgbox = GetProcAddress(hDLL, "mac_msgbox");
if (MAC_msgbox == NULL)
{
i=open("NOMSGBOX",_O_CREAT );
close(i);
exit(-1);
}
Main();
}
int Main()
{
int i;
i=MAC_msgbox;
i=open("GEHT",_O_CREAT );
write(i,"MIST",4);
close(i);
exit(-1);
}
------------------------
Die ganzen File-Open, dienen nur zu Debugzwecken, damit ich sehen kann, wie weit die C-Routine rennt.
Alles was ich erhalte ist die "NOMSGBOX" Datei
By the way,
großes Lob an dieses Forum, so schnell, so fundierte Antworten, das habe ich bisher selten erlebt.
Danke
Mac |  |
 | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
  |
|
Neu! sevPopUp 2.0 
Dynamische Kontextmenüs!
Erstellen Sie mit nur wenigen Zeilen Code Kontextmenüs dynamisch zur Laufzeit. Vordefinierte Styles (XP, Office, OfficeXP, Vista oder Windows 8) erleichtern die Anpassung an die eigenen Anwendung... Weitere InfosTipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) TOP Entwickler-Paket 
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1866.50 EUR...
Jetzt nur 979,00 EURWeitere Infos
|
|
|
Copyright ©2000-2025 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|