Discussion :

[kanmaber]

Bonjour à tous,
J'ai sauvegarder sur un CD les codes sources d'une application que j'ai développée en 2003. Aujourd'hui, j'aimerai la mettre à jour mais hélas, certains fichiers .DFM ne sont pas du tout lisibles. Cependant les fichiers .PAS correspondant sont accessible. Ma question est donc de savoir si il y a un moyen de générer automatiquement un fichier .DFM à partir de son équivalent .PAS.
Merci d'avance pour les réponses.

[ShaiLeTroll]

DFM non lisible, tu as un message d'erreur ? erreur Delphi ou erreur Windows (fichier corrompu ou autre ?)
DFM est fichier Texte ou en Binaire ?

En Théorie ! non !
En Pratique, tu prends une DFM vide

Code :

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

1
2
object Bidule: TBidule
end

Tu ouvres avec Delphi qui va te dire qu'il manque les composants, réponds "non" à la question pour retirer la déclaration !

lance le programme, créer les fenêtres avec Create, ne les affiches pas, utilise ensuite Form.WriteComponent(Stream) puis Classes.ObjectBinaryToText sur le Stream (ne pas oublier, un seek(0,0))
Si ton Stream est un TFileStream, cela sauvegarde la DFM dans le fichier spécifié (carrément la DFM du code source par exemple)
Tu quittes ton programme, Delphi indique que le fichier à changer, tu rafraichis, normalement, tu retrouves tous tes composants tassés en haut à gauche, il faut reprendre les compos un par un
Evidemment tu as perdu les imbrications des Controles (propriété Parent), tu coupes et tu colles pour reconstruire le tout !

Bon Courage !

[Paul TOTH]

Bonjour à tous,
J'ai sauvegarder sur un CD les codes sources d'une application que j'ai développée en 2003. Aujourd'hui, j'aimerai la mettre à jour mais hélas, certains fichiers .DFM ne sont pas du tout lisibles. Cependant les fichiers .PAS correspondant sont accessible. Ma question est donc de savoir si il y a un moyen de générer automatiquement un fichier .DFM à partir de son équivalent .PAS.
Merci d'avance pour les réponses.

non, mais si tu as la version compilée de ton application, tous les DFM sont dedans cf DFMX

[kanmaber]

Bonjour à tous.

ShaiLeTroll :
Dans l’explorateur Windows , la taille du fichier est à zéro (0)
Lorsque je tente d’ouvrir le fichier avec Delphi, ce dernier m’affiche le message « erreur à la création de la fiche. Format de flux incorrect.

Paul TOTH
Le DFMX - DFM Extractor est très intéressant. Hélas, je fichier .exe n'est plus disponible. l'explorateur Windows indique que sa taille est à zéro (0)

[ShaiLeTroll]

Ah oui, c'est ton CD qui est Mort !
Donc, tu es bon pour refaire !

L'Idée de Paul est très bien (comme d'hab ), l'exe n'existe nulle par ailleurs, même chez un client ?
même une version antérieure, ça sera déjà ça !

[kanmaber]

Bonjour,
ShaiLeTroll, comme tu le dis, je dois en fin de compte reprendre tout car c'est le client qui viens de me demander le soft. son disque dur l'a lâché. Je n'ai plus qu'à reprendre mon courage à deux mains.
Merci pour l'assistance.

[Linkin]

Essaies de faire une copie du cd avec CloneCD. J'ai pu récupérer des données alors qu'elles étaient inaccessibles par l'explorateur.

Ce n'est pas garanti, mais ça a marché plusieurs fois pour moi (et plusieurs fois non).

[kanmaber]

Linkin,
Merci pour cette idée. Je te tiens informé.