Discussion :

[defluc]

Bonjour,

Depuis quelques temps, à l'ouverture d'un projet, Delphi m'affiche une fenêtre avec le message suivant :

Classe TZipmaster non trouvée. Ignorer l'erreur et continuer ? Remarque: Ceci peut provoquer la suppression de composants ou la perte de valeurs de propriétés.
Ignorer - Annuler - Tout ignorer

La palette de composants concernée a disparu de même que les composants qui étaient placés sur des fiches du projets.
Bien sûr, à l'exécution, la compilation me sert le message :

Le champs MainForm.Zipmaster n'a pas de composant correspondant. Voulez-vous retirer la déclaration ?
Oui - Non - Annuler - Aide

Dans «Options du projet» - «Paquets», la palette apparaît décochée et au lieu de la référence de la palette, c'est le fichier bpl avec son chemin qui apparait.
Je coche la case et la palette apparait dans l'edi. Je place les composants voulus sur mes fiches et tout semble rentrer dans l'ordre.
Sauf que après fermeture et réouverture du projet, c'est rebelote.
J'ai supprimé le paquet, recompilé et réinstallé mais rien n'y change. Je peux continuer à travailler sur mon projet mais c'est agaçant de devoir passer par ces actions chaque fois que je réouvre un projet, même si il ne comporte aucun composant de cette palette.
Alors si quelqu'un avait une piste de solution, je lui serais reconnaissant.

[ShaiLeTroll]

Modifie ton projet à la main
Tu dois retirer la mention au BPL qu'il y a dedans

Et dans Delphi SANS projet, vérifie si le Package est installé,
car Delphi a ses options par défaut, un projet lui peut rajouter les siennes par dessus
Peut-être un conflit à ce niveau

Vérifie aussi tes chemins de bibliothèques, cela ne peut pas faire de mal


Sinon un composant comme TZipmaster qui doit être purement interne, cela n'a aucun intérêt de le poser sur une fiche, encapsule l'utilisation du composant dans une mini-classe à toi et gère l'instanciation de façon dynamique
J'ai longtemps utilisé le TServerSocket et TClientSocket en D7 sans jamais les réinstaller dans la palette.

[defluc]

Merci pour ta réponse que je découvre tardivement because énormément d'activités comme tout retraité.

J'avais vérifié les chemins de bibliothèques.
Par contre, je n'ai jamais encapsulé l'utilisation d'un composant et il va falloir que j'étudie cela.

Je donnerai des nouvelles dès que je me serai attaqué au problème.

[defluc]

Après avoir pas mal lu sur l'encapsulation, je ne vois pas comment encapsuler le composant visuel TZipmaster pour l'utiliser dans mes applications.
Le dossier ZipUnzip\VCL de cet utilitaire contient des fichiers .pas, des fichiers .dcu qui y correspondent et d'autres, idem pour des dll, un fichier .dpk et un bpl. S'y ajoutent les fichiers vcl40.dcp et vclx40.dcp requis à la compilation du paquet.
J'ai trouvé des exemples de création de composant visuels ou non mais je ne vois pas comment encapsuler un composant visuel existant pour une utilisation comme proposé par ShaiLeTroll.

Avec mes remerciements anticipés.

[ShaiLeTroll]

Tu es sûr que c'est un composant Visuel ?
Je pense que l'auteur pourra t'aider

Le DPK c'est juste pour l'installer dans la palette et au besoin produire un BPL si tu fonctionne en mode "Package Lié à l'exécution"
As-tu essayé juste de faire une allocation dynamique d'un TZipmaster ?
Juste un ajout de l'unité contenant le TZipMaster comme uses et le code suivant

Code :

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

1
2
3
4
5
6
7
with TZipMaster.Create(Self) do
try
  FileName := 'c:\...';
  Zip(Stream); 
finally
  Free();
end;

Je suis parti du fait que TZipMaster est un TComponent et fonctionne autour d'un Stream


Sinon maintenant, c'est inclus dans Delphi : http://docwiki.embarcadero.com/Libra...ipFile.Extract

[defluc]

Ta source fonctionne mais c'est un peu fastidieux parce que j'ai beaucoup d'invocation de ce composant dans mon code.
J'ai essayé ZipMaster = TZipmaster.Create mais cela ne fonctionne pas.