Discussion :

[dlambert]

Bonjour

Je veux mettre une compilation conditionnelle dans le fichier DPR
XE2 et XE7

Code :

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

1
2
3
4
5
6
7
8
uses
{$ifdef DEBUG}
  FastMM4 in '..\Composants\FastMM4\FastMM4.pas',
{$endif}
  Forms,
  Vcl.Themes,
  Vcl.Styles,
  //...

Mais lorsque j'ajoute ou je supprime une unité, l'IDE me supprime systématiquement le {$ifdef} et le {$endif}

Quelqu'un a t'il une solution ?

Merci

[ShaiLeTroll]

Cette technique de cela date de l'époque de D3 et D7
Je voulais même faire une inclusion de DFM selon directive, ça n'a jamais passé

Je viens de tester, même le simple uses ne passe pas !

Code :

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

1
2
3
{$IFDEF DEBUG}
  FastMM4,
{$ENDIF}

Modifié le DPR manuellement est toujours pénible
Sur certains projets, j'ai même viré l'utilisation directe de Application par une variable pour éviter qu'il bousille les CreateForm (une MainForm différente selon un paramètre)

Sinon, Pense que XE2 et XE7 inclus déjà FastMM, il n'y a plus grande raison de l'utiliser !
Le gestionnaire de mémoire FastMM (Win32 et Win64)

Si c'est pour la surveillance de fuite mémoire, ajoute ceci comme dernier bloc de ton main
C'est la même chose que FastMM mais directement inclus dans le nouveau* gestionnaire de Delphi
(nouveau* en 2007)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
  ... 
  Application.Run;
 
{$IFDEF DEBUG}
{$WARN SYMBOL_PLATFORM OFF}
  System.ReportMemoryLeaksOnShutdown := DebugHook <> 0;
{$WARN SYMBOL_PLATFORM ON}
{$ELSE DEBUG}
  System.ReportMemoryLeaksOnShutdown := False;
{$ENDIF DEBUG}
end.

[dlambert]

Bonjour

On a déjà le fastmm de xe2 et autres, mais je me suis aperçu qu'il était moins précis de fastmm4, je n'arrive à lui faire générer le fichier de rapport.

Bonne fêtes

[Ph. B.]

Bonjour,

On a déjà le fastmm de xe2 et autres, mais je me suis aperçu qu'il était moins précis de fastmm4, je n'arrive à lui faire générer le fichier de rapport.

Effectivement, les options étendues (FullDebugMode, LogErrorsToFile, etc) ne sont présentes que dans la version complète (http://sourceforge.net/projects/fastmm/)...
http://docwiki.embarcadero.com/RADSt...e_m%C3%A9moire

[dlambert]

Merci Philippe,

j'avais lu ça quelque part.

Mais peut' on alors intégrer la version complète (que j'utilise déjà) avec la solution de ShaiLeTroll pour la compilation conditionnelle ?

Dominique

[ShaiLeTroll]

mais je me suis aperçu qu'il était moins précis de fastmm4, je n'arrive à lui faire générer le fichier de rapport.

Moins précis, je ne peux pas dire
Mais il génère la place un ShowMessage qui contient la fuite :

Code ReportMemoryLeaksOnShutdown :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
---------------------------
Unexpected Memory Leak
---------------------------
An unexpected memory leak has occurred. The unexpected small block leaks are:
 
 
 
13 - 20 bytes: TFileStream x 1
 
29 - 36 bytes: UnicodeString x 1
 
 
 
The sizes of unexpected leaked medium and large blocks are: 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092
 
 
---------------------------
OK   
---------------------------

Essaye ceci à condition d'avoir FastMM4 enregistré dans les chemins d'environnement ou de recherche du projet

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
program ZooShaiVCL;
 
uses
  FastMM4Wrapper,
  Forms,
  Vcl.Themes,
  ...
 
begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(..., ...);
  Application.Run;
end.

Directement dans le même dossier que FastMM4.pas, tu ajoutes l'unité FastMM4Wrapper.pas
Cette indirection ne sembler pas poser de problème à FastMM4

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
unit FastMM4Wrapper;
 
interface
 
{$IFDEF DEBUG}
uses
  FastMM4;
{$ENDIF}
 
implementation
 
end.

Ce me génère toujours un message box, légèrement différent (signe que c'est bien celui de FastMM4)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
---------------------------
ZooShaiVCL.exe: Memory Leak Detected
---------------------------
This application has leaked memory. The small block leaks are (excluding expected leaks registered by pointer):
 
 
 
13 - 20 bytes: TFileStream x 1
 
29 - 36 bytes: UnicodeString x 1
 
 
 
The sizes of leaked medium and large blocks are (excluding expected leaks registered by pointer): 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092, 1114092
 
 
 
Note: To obtain a log file containing detail on memory leaks, enable the "FullDebugMode" and "LogMemoryLeakDetailToFile" conditional defines. To disable this memory leak check, undefine "EnableMemoryLeakReporting".
 
 
---------------------------
OK   
---------------------------

j'ai tenté de définir "FullDebugMode" est là le module ne démarre qui si l'on déploie dans le même répertoire la DLL FastMM_FullDebugMode.dll (c'est expliqué dans le commentaire de FastMM4Options.inc)
Et cela génère un énorme fichier ZooShaiVCL_MemoryManager_EventLog.txt de 326 Ko !
Le fichier donne un extrait de 256 octet de chaque bloc mémoire fuyant !

[dlambert]

Merci ShaiLeTroll,
le coup du wrapper, ça marche super bien.

Mais l'unité je la met dans le répertoire source, par ce que justement sur le serveur de déploiement, les composants FastMM n'existent pas et ne doivent pas y être installés, une erreur de manip est vite arrivée et après le déploiement, c'est la cata :-(

Je laisse la discussion encore ouverte jusqu'à la fin de l'année :-)

[Ph. B.]

Bonjour,

Mais l'unité je la met dans le répertoire source, par ce que justement sur le serveur de déploiement, les composants FastMM n'existent pas et ne doivent pas y être installés, une erreur de manip est vite arrivée et après le déploiement, c'est la cata :-(

Je pense que le serveur de déploiement doit utiliser le mode de compilation Release, donc l'option de compilation DEBUG n'est pas définie ; aucune inclusion d'unité de FastMM4 ne sera réalisée, et les unités de la version par défaut de FastMM seront utilisées.
L'unité FastMM4Wrapper par contre devra être présente, quel que soit l'option de compilation retenue...

[dlambert]

Oui, Philippe, c'est bien ça.

Sauf que des fois, des gens passent en mode debug, par ce qu'ils ne savent pas ce qu'est le mode debug / release.
docn, non pas fastmm4 sur le serveur de compil.

[dlambert]

Comme promis, je ferme le fil de cette discussion.


Bonne année à toutes et à tous remplis de plein de ligne de code :-)

Dominique