Salut
Dans mon programme, j'ai créé un composant qui se charge de contenir les données d'un fichier. Celui-ci a une propriété FileName définie comme suit:
La procédure SetFileName est définie comme suit:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 property FileName:string read FFileName write SetFileName;
DoFileNameChange déclenche l'évènement qui modifie le Caption d'un onglet...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 if FFileName<>Value then begin FFileName := Value; DoFileNameChange; end;
Voila pour la structure.
Dans mon programme, j'ouvre donc un fichier MonFichier.txt par exemple.
je change d'abord le FileName. J'ai mis un point d'arrêt dans SetFileName et Value est correct. J'appelle ensuite la méthode Open qui ouvre le fichier et là, FFileName est égal à une chaine videCa fait des haures que je fais le tour et je ne comprends vraiment pas d'où cela peut venir
Quelqu'un a une idée?
PS: je suis sous Turbo Explorer. Pour la petite histoire, sous Delphi7, ce code fonctionneEt puisque Explorer ne permet pas d'installer des compo tierce partie, je les crée dynamiquement...
Partager