Discussion :

[sinfoni]

Bonjour,

Dans un projet FireMonkey Win32, je tente d'appeler IntToStr dans l'évènement Tick d'un timer (affichage d'un compte à rebours).

L'appli plante que ce soit en mode débogage ou en exécution directe de l'exe.

Mieux, il suffit que l'appel à IntToStr se trouve dans l'évènement, même s'il n'est pas exécuté...

Cette simple ligne, même si vl_test vaut false fait planter le programme.

Code :

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

1
2
 
if vl_test then system.sysutils.inttostr(0);

En fait le programme semble planter non pas au moment de l'évènement Tick du timer, mais au moment du Application.Run.

Même problème avec FloatToStr.

Si le projet est compilé pour Win 64, aucun problème.

Quelqu'un sait-il reproduire ? (Delphi XE2 Update 4)

Merci
André.

[Paul TOTH]

plait-il ?

donc je lance XE2 Update4
je crée un nouveau projet Firemonkey HD
je place un Timer
sur le onTimer j'ajoute le code suivant

Code :

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

1
2
3
4
5
 
procedure TForm3.Timer1Timer(Sender: TObject);
begin
  System.SysUtils.IntToStr(0);
end;

je lance

il ne se passe rien.

[tourlourou]

Au passage, l'optimisation par le compilateur ne supprime-t-elle pas une telle ligne qui ne sert à rien ?

[sinfoni]

Ton timer est-il bien enable ? Valeur du tick ? (sur mon exemple 1000 ) Car je reproduis la chose sans probleme. D'ailleurs le simple fait que le programme 32 plante et pas le 64 pose question.

Precision : delphi installe sur un pc sous seven 64.

Quelqu'un d'autre ?

[alheuredudejeuner]

pour voir ce que ça donne en win32

Cordialement

André

PS je viens d’écrire une bêtise, le type integer est identique en 32 ou 64 bit

[sinfoni]

Pour info, l'appli utilise des composants tiers, normalement tout fmx. Mais je viens de voir qu'un de ces composants a une methode qui me renvoie un vcl.graphics.tbitmap au lieu d'un fmx.type.tbitmap. Ce qui pourrait expliquer le comportement curieux si on a du vcl dans du fmx. Cela dit si je supprime ce composant, j'ai le meme souci. J'ai contacte le support a ce sujet et j'attends leur retour.

[Paul TOTH]

Ton timer est-il bien enable ? Valeur du tick ? (sur mon exemple 1000 ) Car je reproduis la chose sans probleme. D'ailleurs le simple fait que le programme 32 plante et pas le 64 pose question.

Precision : delphi installe sur un pc sous seven 64.

Quelqu'un d'autre ?

Seven 64,

mais tu parles d'un projet qui plante et incrimine l'appel d'une fonction standard dans un Timer, à moins de pouvoir reproduire le bug dans une manip aussi simple que celle que j'ai donné, le support ne te sera d'aucun secours ou t'invitera a supprimer tous les composants tiers.

de plus tu parles d'un plantage au lancement de l'appli, ce qui n'a aucun rapport avec le code placé dans l'évènement d'un timer, lequel timer n'est pas encore créé !

[sinfoni]

J'ai contacte le support du composant tiers, pas de Delphi.
Et effectivement, l'appli plante non pas a l'execution du code inttostr mais sur le application.run. Il suffit que je mette le inttostr en commentaire et la plus de souci.

[Ph. B.]

Bonjour,

Et effectivement, l'appli plante non pas a l'execution du code inttostr mais sur le application.run.

Avez tenté un débugage pas à pas approfondi pour voir jusqu'où l'application fonctionne ?
Ou placer des points d'arrêts à différents endroits de la fiche impliquée dans le plantage ?
--
Philippe.