Modifier la propriété title de l'objet TApplication à l'exécution

Bonjour,

J'aimerais savoir si il est possible de modifier la propriété title de l'objet tapplication au début de l'exécution du programme?

D'avance merci.

Oui, simplement

Code:

---

1 2	Application.title := 'Mon nouveau titre';

---

Tu pouvais trouver la solution dans la ici dans la :faq:

Effectivement de cette manière ça fonctionne mais j'aimerais un truc de ce genre :

Code:

---

1 2 3 4 5

//Lecture du titre dans un fichier ini Title := IniFile.ReadString(SectionParameters, KeyServerTitle, 'Serv');   Application.title := Title;

---

Et là ça ne va pas.
Pourquoi???

REM Title est bien un String.

Est ce que tu es sûr que ton logiciel passe par ce code ?

Oui il passe bien dans le code.

D'ailleurs si je retire la ligne d'affectation de la propriété title ou si je la remplace par Application.title := 'TEST'; Là ça fonctionne.

Par contre :

Code:

---

1 2 3 4

Title := IniFile.ReadString(SectionParameters, KeyServerTitle, 'Serv');   Application.title := Title;

---

Comme ça, je ne peux pas l'exécuter.

Et dans le gestionnaire de projet, le nom de mon projet est effacé.

???

Es tu sûr que ce que tu cherches dans ton fichier Ini n'a pas de texte ?

Genre

Code:

---

1 2 3

[MASECTION] MonText=

---

Oui sûre...

Je viens de remarquer que si je lance mon projet à partir de l'exécutable, ça fonctionne.

Si j'essaye de le lancer à partir de Delphi (mode débugage) c'est la que ça quoince. La flèche verte (exécution) n'est pas accessible.

Embêtant.

En pas à pas, est ce que quand tu mets la souris sur Title tu as une valeur dedans ?

Sinon, comment tu instencies le fichier Ini ?

Je ne peux pas l'exécuter en pas à pas puisque je ne peux pas lancer le mode débuguage.

Mais si j'enlève la ligne :

Code:

---

Application.title := Title;

---

Là je peux exécuter en pas à pas et j'ai bien quelque chose dans Title.

Pour ma part, j'ai testé cela dans un de mes programmes

Code:

---

1 2 3 4 5 6 7

With TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini')) do try Application.Title := ReadString('TEST','MonText','Toto'); finally free; end;

---

Avec un fichier qui contenait

Code:

---

1 2 3

[TEST] MonText=Affiche Title

---

Et ca fonctionne parfaitement, ca m'affiche bien Affiche Title dans la barre en bas et que ce soit par l'executable ou par delphi.

Tu mets ce code dans quel fichier?

Moi j'ai essayé dans le fichier dpr de mon projet, c'est peut-être pour ça :(

Salut,

En mettant le code de Malatar dans le Create de la form principale, ça marche parfaitement ! ;)

@+

Citation:

---

Envoyé par Claudius40

Salut,

En mettant le code de Malatar dans le Create de la form principale, ça marche parfaitement ! ;)

@+

---

Oui, tout à fait, j'ai testé ce code dans le OnCreate de la form