Discussion :

[Picolo18]

salut salut, ca va ? J'ai juste une question : je voulais juste savoir s'il était possible de dériver une classe exporté d'une dll.

Imaginons que je veuille implémenter dans une DLL une classe T_Objet mère et que je veux implémenter dans mon exécutable une classe fille T_Voiture qui est dérivé de T_Object. Est-ce possible en delphi ?

Voila, merci.

[Paul TOTH]

Pour faire ça sous Delphi tu as les paquets.

Si tu veux le faire avec une simple DLL tu vas rencontrer des tas de problèmes car ce n'est pas supporté en standard comme ça l'est en C++ par exemple.

[Picolo18]

Salut, ok merci, je vais voir du coté des paquets. Mais donc, si j'avais voulu vrament faire ca avec une dll simple, il y avait un moyen de contourner ce problème ou vraiment aucun ?

[Paul TOTH]

hum...déjà il faut utiliser ShareMem pour que l'exe et la dll partagent le même gestionnaire mémoire, sinon c'est le plantage assuré.

Ensuite comment peut-on envisager la chose...

on pourrait imaginer invoquer le constructeur de l'objet de la DLL sur une instance crée par l'exe...afin d'initialiser l'objet...mais dans ce cas il faut que l'exe alloue un objet d'une taille suffisante.

exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
// côté DLL
type
 TMonObjet = object
   FInt : integer;
   FStr : string;
 end;
 
function ObjectSize:integer;
begin
  Result := TMonObject.InstanceSize;
end;
 
procedure InitObject(Obj : TMonObjet);
begin
  Obj.Create;
end;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
// côté exe
type
 TMonNouvelObjet=object
   FDummy : array[0..7] of byte; // TMonObject.InstanceSize
   FDouble : double;
   constructor Create;
 end;
 
constructor TMonNouvelObjet.Create;
begin
  if SizeOf(FDummy)<>ObjectSize then Fail;
  InitObject(Self);
end;

hum...faudrait voir ce que ça donne

mais c'est casse gueule et totalement dépendant de Delphi : la DLL ne pourrait pas être utilisée par un autre langage, voir une autre version de Delphi car si TObject change...il faut qu'il soit identique dans l'EXE et la DLL !

Il vaut mieux passer par une Interface dans ce cas.

[Picolo18]

Ok merci, je vais essayer un peu tout ca, je vous tiens au courant...

[Picolo18]

Salut salut,
ok je suis en train de me torturer la tête dans tous les sens là, mais je ne vois pas comment on pourrait faire une classe mère dans un package et une fille dans l'exe. Parce que pour définir la fille dans l'exe, j'ai besoin de l'unité qui définit la mère non ? Donc, ce qui signifie que dans ce cas, le package ne sert à rien...

[Andnotor]

Tu dois spécifier Construire avec les paquets d'exécution dans les options de ton projet. A la compilation, la classe mère sera connue par l'intermédiaire des fichiers dcp.

Par contre, l'effet collatéral est que tu devras fournir l'ensemble des paquets d'exécution avec ton projet et non pas seulement ta propre bpl .

Bien sûr, une modification du paquet passera aussi par une recompilation de l'exe sous peine d'avoir des erreurs de points d'entrée de ta BPL .

[Picolo18]

Ok merci ca marche, j'étais juste étonné que mon .exe soit aussi gros pour presque rien ^^ !