Eli miten saa C++/C funktiot toimimaan Visual Basicissa, esim. C++/C käännetään DLL:läksi joka linkitetään VB:hen, onnistuuko tälläinen? Tai sitten jotenkin värkkäämään API:lla, tosin on tarkoitus tehdä C++ ohjelmasta fronenddi linux:sille ja Windowssille, joten mielellään ei API:a. Jos ei niin onko mitään mahdollisuuksia saada toimimaan?
Onnistuu toki. Omia DLL:iä käytetään VB-ohjelmista ihan samalla tavalla kuin Win32 APIa (user32.dll, kernel32.dll etc). Eli kun sinulla on DLL, määrittelet Declare:lla sen sisältämät funktiot ja homma toimii. En jaksa tähän hätään tämän kummempaa sepostusta kirjoittaa mutta kysele lisää jos jäi jotain epäselvää.
Pitääkö C++ functio palautaa merkkijonotaulukko vai C++ Stringgi?
AAG, eihän DLL:liä voi tehdä kuten tavalliset exet, joten? Mites C++ ne tehdään?
Dev-Cpp antoi DLL tekemisessä koodin:
/* Replace "dll.h" with the name of your header */ #include "dll.h" #include <windows.h> DllClass::DllClass() { } DllClass::~DllClass () { } BOOL APIENTRY DllMain (HINSTANCE hInst /* Library instance handle. */ , DWORD reason /* Reason this function is being called. */ , LPVOID reserved /* Not used. */ ) { switch (reason) { case DLL_PROCESS_ATTACH: break; case DLL_PROCESS_DETACH: break; case DLL_THREAD_ATTACH: break; case DLL_THREAD_DETACH: break; } /* Returns TRUE on success, FALSE on failure */ return TRUE; }
Liene ei auta mitään.....
Ois muka pikku tuto DLL ja siihen functioiden tekemisestä. MSDN:nästä en löytänyt mitään.
Lisäksi ois mukava jos tuota Windwos headeria ei tartte kuten ei luultavasti tarttekaan.
Yleensä C/C++-funktio ottaa parametrinaan "char *":n jonne se kirjoittelee tavarat. Homman tekeminen niin, että funktio palauttaisi VB:n String-tyyppisen muuttujan menee varmasti melkoiseksi purkaksi.
DLL esim. tällei(ei varmaan paras tapa)
#include <windows.h> #if BUILDING_DLL #define DLLIMPORT __declspec (dllexport) #else /* Not BUILDING_DLL */ #define DLLIMPORT __declspec (dllimport) #endif /* Not BUILDING_DLL */ extern "C" __declspec( dllexport ) int Piippaa(int taajuus, int kesto) { Beep(taajuus,kesto); }; BOOL APIENTRY DllMain (HINSTANCE hInst /* Library instance handle. */ , DWORD reason /* Reason this function is being called. */ , LPVOID reserved /* Not used. */ ) { switch (reason) { case DLL_PROCESS_ATTACH: break; case DLL_PROCESS_DETACH: break; case DLL_THREAD_ATTACH: break; case DLL_THREAD_DETACH: break; } /* Returns TRUE on success, FALSE on failure */ return TRUE; }
Ja VB:ssä tällein:
Private Declare Function Piippaa Lib "DLL.dll" Alias "piip" (ByVal taajuus As Integer,ByVal kesto As Integer) As Long"
Ja vaikka formin alotukseen:
piip(120,100)
HMM, ei se nuin toimikkaan, mutta en kyllä saanut toimimaan. Valittaa aina tuosta piip(120,100).
Äh, tuota muokkaus aikaa sais pidentää:
Sain kuiteki tuon Juicen DLL:län toimimaan paitsi VB sano:
"Bad DLL calling convention"
ja VB koodi on seuraava:
Private Declare Function Piippaa Lib "Project1.dll" (ByVal taajuus As Integer, ByVal pituus As Integer) Private Sub Form_Load() a = Piippaa(10, 10) End Sub
Kokeile
Private Declare Function Piippaa Lib "Project1.dll" (ByVal taajuus As Integer, ByVal pituus As Integer) As Integer Private Sub Form_Load() a = Piippaa(500, 500) End Sub
Eli funktio palauttaa integerin ja Beep-funktion taajuus tulee olla yli 37.
Tulee sama virhe ilmo, mutta löysin erään sivun: http://www.codeproject.com/dll/XDllPt2.asp
Jossa neuvottiin käyttämään .def filuja, mutta en tiedä miten ne saa tuon ojelman mukaan. Lisäksi mulla ei ollut komentoa "dumpbin", joten se luultavasti VC++:n oma komento.
Kyllä mullakin toimi ilman deffejä ja dumpbinejä, tosin käytän dotnettiä.
Aihe on jo aika vanha, joten et voi enää vastata siihen.