Ich habe ein test programm geschriebn und wollte ein 2tes Formular aus einer Dll holen und laden.

Sitze jetzt schon drei Tage daran und komme nicht weiter , habe hier auch schon einige Postings gelesen haut aber leider bei mir alles nicht hin.

Bekomme immer die Fehlermeldung "Externe Exception C000001D" kann aber damit leider nicht sehr viel anfangen.

Würde mich über hilfe freuen.

Wie wärs, wenn du uns mal zeigst wie du es machst (Quelltext).

//---------------------------------------------------------------------------

#include <vcl.h>
#include <windows.h>
#include <FormDllunit.h>
#pragma hdrstop

//---------------------------------------------------------------------------
#pragma argsused
BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fwdreason, LPVOID lpvReserved)
{
        return 1;
}
//---------------------------------------------------------------------------
extern "C" __declspec (dllexport) void Dll_Form(TComponent* Owner)
 {

        TDllForm* DllForm = new TDllForm(Owner);
         DllForm->Height = 150;
         DllForm->Width = 150;
         DllForm->Show();
 }
 __declspec (dllexport) void Form_Destroy(TComponent* Owner)
 {
        delete DllForm;
 }

Dll ging ohne Fehler zu compilieren habe dann Borland nochmal aufgemacht und eine TestForm1exe erzeugt Das Hauptprogramm:

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "MainForm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{

        TDll_Form* Dll_Form;
        HINSTANCE h = LoadLibrary("FormDll.dll");
        if(h != 0)
                  Dll_Form = (TDll_Form*)GetProcAddress(h,"_DllForm");
        else
                ShowMessage("Kann 'FormDll.dll' nicht Laden !");
        if(Dll_Form != NULL)
                  Dll_Form(Owner);
        else
                 FreeLibrary(h);

}
//---------------------------------------------------------------------------

Form.h

//---------------------------------------------------------------------------

#ifndef MainFormH
#define MainFormH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
        TButton *Button1;
        TButton *Button2;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
private:	// Anwender-Deklarationen

         // die Form aus der Dll
         typedef void TDll_Form(TComponent* Owner);

public:		// Anwender-Deklarationen
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Dll_Form = (TDll_Form*)GetProcAddress(h,"_DllForm");

hmm... sollte das nicht viel eher heißen...[cpp] Dll_Form = (TDll_Form*)GetProcAddress(h,"Dll_Form");[/cpp]

hmmmm..... habe es jetzt mal so gemacht wie du geschriebne hast .

Das gute ist der Fehler ist weg.

Aber das schlechte ist es geht kein Fenster auf hmmm...

TDll_Form* Dll_Form; 
        HINSTANCE h = LoadLibrary("FormDll.dll"); 
        if(h != 0) 
                  Dll_Form = (TDll_Form*)GetProcAddress(h,"_DllForm"); 
        else 
                ShowMessage("Kann 'FormDll.dll' nicht Laden !"); 
        if(Dll_Form != NULL) 
                  Dll_Form(Owner); /* <-- Ab hier kommt Exception */
        else 
                 FreeLibrary(h);

Fehler

[cpp]
TDll_Form* Dll_Form;
HINSTANCE h = LoadLibrary("FormDll.dll");
if(h != 0)
Dll_Form = (TDll_Form*)GetProcAddress(h,"_DllForm");// <--Fehler lag hier in _DllForm
else
ShowMessage("Kann 'FormDll.dll' nicht Laden !");
if(Dll_Form != NULL)
Dll_Form(Owner); /* <-- Ab hier kommt Exception */
else
FreeLibrary(h);
[/cpp]

Hier der Behobene

TDll_Form* Dll_Form; 
        HINSTANCE h = LoadLibrary("FormDll.dll"); 
        if(h != 0) 
 Dll_Form = (TDll_Form*)GetProcAddress(h,"_Dll_Form"); //<-- So geht es  :D 
        else 
                ShowMessage("Kann 'FormDll.dll' nicht Laden !"); 
        if(Dll_Form != NULL) 
                  Dll_Form(Owner); /* <-- Ab hier kommt Exception */ 
        else 
                 FreeLibrary(h);

sehr gute Kombi