DLL-Hvordan??

Hvordan \"kan ikke få adgang\" ??? Når du laver en applikation, laves automatisk en masse opstartstjavs, som bl.a. opretter dit datamodul og åbner de filer du evt. har haft åbne på design tidspunktet.

I en aller ander .cpp i dit DLL skal der stå \"TDataModul1 DataModul1;\" eller hvad du nu har kaldt det, for at modulet overhovedet er instansieret, og dermed kan bruges. Du kan evt. i din DLL checke at det er sket, ved simpelthen at checke værdien af DataModul1:

if (DataModul1 == null)
  DataModul1 = new TDataModul1(this);

Prøv evt. at indsætte et breakpoint i constructoren til datamodulet, for at se om den overhovedet udføres.

Den her kode fungerer fint i min applikation, men ikke her i DLL filen.

void MyClass::getPassager(HWND hWnd,string bil)
{

 


  DataMod->LufthavnDB->Open();
  DataMod->Query1->SQL->Clear();


DataMod->Query1->SQL->Add(\"select navn,adresse,postnr from Passager where bilnr = :BIL \");
DataMod->Query1->ParamByName(\"BIL\")->AsString=bil.c_str();

DataMod->Query1->Open();
DataMod->Query1->First();


navn=DataMod->Query1->FieldByName(\"navn\")->AsString.c_str();
adresse=DataMod->Query1->FieldByName(\"adresse\")->AsString.c_str();
postnr=DataMod->Query1->FieldByName(\"postnr\")->AsString.c_str();



}

Yeps, men det er fordi at Datamodulet er initialiseret i din WinMain (se .cpp\'en med samme navn som dit projekt.)

Hvis du skal have d.o. til at virke i en DLL, skal du tilføje følgende:

void MyClass::getPassager(HWND hWnd, string bil)
{
  // Instancier datamodul, hvis det ikke allerede er gjort.
  if (DataMod == NULL)
    DataMod = new TDataMod(NULL);

  // Så kan vi bruge data-modulet.
  DataMod->LufthavnDB->Open();
  : osv.
}

Idet jeg antager at DataMod .cpp har en erklæring af DataMod variablen i toppen, hvorved den er GLOBAL indenfor DLL\'en. Normalt vil man jo lave new med (this) som pointer, men DLL\'en kender jo ikke hovedprogrammets form i denne her situation, så enten skal du lade den være \"stand-alone\" (via NULL) eller også skal du overføre pointeren til formen som parameter i DLL\'kaldet:

void MyClass::getPassenger(TObject *form, HWND hWnd, string bil)
{
}

gggggggggggggg