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 SubEli 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.