Jak przesłać dynamicznie utworzony objekt do dll?

[banita]

a stwozyles klase formy o takiej nazwie w dll? nie!
to jest tylko przyklad! jesli masz podstawowa wiedze nie powinno byc problemu z odtworzeniem tego, jesli jest problem to chyba tzreba zaczac nauke od podstaw

[duf]

a stwozyles klase formy o takiej nazwie w dll? nie!
to jest tylko przyklad! jesli masz podstawowa wiedze nie powinno byc problemu z odtworzeniem tego, jesli jest problem to chyba tzreba zaczac nauke od podstaw

Tworzę w głównej aplikacji obiekt TImage i przekazuje go do DLL poprzez wskaźnik i tam próbuję załadować plik .bmp. Niestety dostaję błąd Access violation in module dll. Natomiast gdy załaduje plik wcześniej czyli w głównej aplikacji i przekażę wskaźnik do DLL to dostaje komunikat, że nie mogę modyfikować zawartości TImage bo nie zawiera ona bitmapy. Myślę, że problem nie leży po stronie niewłaściwego podłączania biblioteki jak i też niewłaściwego kodu w dll. Nie mam problemu z otworzeniem okna utworzonego dynamicznie w głównej aplikacji i przesłaniu wskaźnika do dll.

Kod: Zaznacz cały

TForm* form = new TForm(this);

Mam problem z wczytaniem pliku do TImage.

[banita]

załacz przykladowa grupe projektow(dll i aplikacja) ktora obrazuje ten blad.

[duf]

załacz przykladowa grupe projektow(dll i aplikacja) ktora obrazuje ten blad.

Kod: Zaznacz cały

In DLL

extern "C" __declspec (dllexport) void Druk ( TImage* newimage )
{
  try
  {
   newimage->Width = 950;
   newimage->Height = 1280;
   newimage->Proportional = true;

   newimage->Canvas->Font->Size = 9;
   newimage->Canvas->Font->Name = "Verdana";
   newimage->Canvas->Brush->Style = bsClear;*/

   newimage->Canvas->TextOut( 20, 50, "TEST" );

   Printer()->BeginDoc();

   Printer()->Canvas->CopyRect(Rect(0, 0, Printer()->PageWidth, Printer()->PageHeight),  newimage->Canvas, Rect(0, 0, newimage->Width, newimage->Height));
   
   Printer()->EndDoc();
  }
  catch( const Exception& e ) {

   ShowMessage(e.Message);   
  }

In main form

TImage* newimage = new TImage(NULL);
newimage->Picture->LoadFromFile( "plik.bmp" );

    HINSTANCE DLLHandle = LoadLibrary(L"Projectmydll.dll");

   if(DLLHandle != NULL)
   {
      typedef (*aDruk)(TImage*);

      aDruk Druk = (aDruk)GetProcAddress(DLLHandle, "_Druk");

      if( Druk != NULL) Druk( newimage );
      else ShowMessage( "Lack of function" );
   }
   else ShowMessage( "Lack of DLL." );

   FreeLibrary(DLLHandle);

   delete newimage;


Ten przypadek daeje błąd typu: nie mogę modyfikować zawartości image bo nie zawiera ona bitmapy.

[Cyfrowy Baron]

Klasa TImage nie dziedziczy po klasie TWinControl, więc nie posiada własnej powierzchni. Nie jestem tego pewien, ale musi chyba posiadać rodzica, by można było wykonywać na niej operacje.

Kod: Zaznacz cały

TImage* newimage = new TImage(this);
newimage->parent  = this;
newimage->Picture->LoadFromFile( "plik.bmp" );


Operacje wykonujesz w zasadzie na płótnie TCanvas, więc dlaczego używasz wskaźnika na TImage, skoro równie dobrze i prościej będzie używać wskaźnika na TCanvas.

[banita]

sprobuj jeszcze

image->Picture->Bitmap->LoadFromFile

[duf]

sprobuj jeszcze
image->Picture->Bitmap->LoadFromFile

BINGO!!!
Błąd access violation zmienił kierunek z DLL na project główny. Z głównej aplikacji usunąłem zapis

Kod: Zaznacz cały

delete newimage; // <--- wpisałem to do dll.

i wydaje się, że wszystko już zachodzi poprawnie. Tyle czasu. Dziękuję za pomoc.

[Cyfrowy Baron]

Po wykorzystaniu musisz odłączyć bibliotekę, wtedy będziesz mógł usunąć obiekt newimage.

[banita]

sprobuj jeszcze
image->Picture->Bitmap->LoadFromFile

BINGO!!!
Błąd access violation zmienił kierunek z DLL na project główny. Z głównej aplikacji usunąłem zapis

Kod: Zaznacz cały

delete newimage; // <--- wpisałem to do dll.

i wydaje się, że wszystko już zachodzi poprawnie. Tyle czasu. Dziękuję za pomoc.

nie wolno ci alokowac zasobu w aplikacji i zwalniac go w dll!!!!!!

czytaj co napisal CB w ostatnim poscie

[duf]

nie wolno ci alokowac zasobu w aplikacji i zwalniac go w dll!!!!!!

czytaj co napisal CB w ostatnim poscie

To w jaki sposób zwolnić dll. Przecież występuje instrukcję

Kod: Zaznacz cały

FreeLibrary(DLLHandle);

przed

Kod: Zaznacz cały

delete newimage;

Gdzie mam zwolnić pamięć?

[Cyfrowy Baron]

Chodzi o ten fragment Twojej wypowiedzi:

Kod: Zaznacz cały

delete newimage; // <--- wpisałem to do dll.

wpisałem to do dll

czyli wynika z tego, że definiujesz obiekt w aplikacji, a usuwasz go w bibliotece, co jest niedopuszczalne. Definiujesz w aplikacji, więc usuwasz w aplikacji.

[polymorphism]

A ja zapytam przewrotnie: po co ta DLL-ka?

[duf]

Chodzi o ten fragment Twojej wypowiedzi:

Kod: Zaznacz cały

delete newimage; // <--- wpisałem to do dll.

wpisałem to do dll

czyli wynika z tego, że definiujesz obiekt w aplikacji, a usuwasz go w bibliotece, co jest niedopuszczalne. Definiujesz w aplikacji, więc usuwasz w aplikacji.

Jak usuwam w aplikacji to jest błąd access violation

[duf]

A ja zapytam przewrotnie: po co ta DLL-ka?

Tak sobie do nauki.

[polymorphism]

Jak usuwam w aplikacji to jest błąd access violation

Zapewne biblioteka i aplikacja korzystają z różnych stert, a to musi się skończyć katastrofą. Zasada jest prosta: alokujesz pamięć w bibliotece, w bibliotece zwalniasz. Analogicznie z aplikacją. Trzymając się tej zasady unikniesz wielu tego typu problemów.