Discussion :

[Yves Archambault]

Bonjour, je converti une application Delphi 5 à XE et là parmi les 118 .dfm il y a en 3 que je ne peux pas lire en XE pourtant ils sont toujours lisibles en D5.
Voici un exemple de dfm ouvert avec Notepad. C'est tout bousiller mais cela ouvre en D5 mais en XE impossible. Par contre, son .pas correspondant est valide. Les 115 autres dfm sont normaux, aucun caractère bizarre.


ÿ
TFMDIRSELECTDLG 0w TPF0TfmDirSelectDlgfmDirSelectDlgLefta
TopÉ
ActiveControlDirectoryListBox1BorderStylebsDialogCaptionSélectionner un répertoireClientHeight>
ClientWidth
Color clBtnFace
ParentFont OldCreateOrder PositionpoDesktopCenterShowHint OnCreate
FormCreate
PixelsPerInch`
TextHeight
TLabelLabel2LeftTopWidthJHeight
CaptionRépertoire cible TPanelPanel1LeftTopWidth¦ HeightHintRépertoire cibleTabOrder TLabelLabel1LeftTopWidth~Height
CaptionC:\Dev\Fmrq2000\Source TButtonOKBtnLeftÅ TopWidthKHeightHint&Sélection du nouveau répertoire cible.Caption << --- OKDefault ModalResult
TabOrder OnClick
OKBtnClick TButton CancelBtnLeftÅ Top¢ WidthKHeightHint+Annule la sélection d'un nouveau répertoireCancel CaptionCancelModalResultTabOrder
OnClickCancelBtnClick TDirectoryListBoxDirectoryListBox1LeftTop1Width¦ Heightä DirLabelLabel1IntegralHeight
ItemHeightTabOrder TDriveComboBoxDriveComboBox1LeftTop
Width¨ HeightHintSélection du disque.( Lecteur )DirListDirectoryListBox1TabOrder

[guillemouze]

essaye de l'ouvrir avec D5, et cocher "mode texte" dans le click droit sur la fiche (il y a ca dans d7 en tout cas)

[Yves Archambault]

En mode texte, tout est beau en D5.
Je peux le sauver sans problème dans son .dfm
mais le .dfm à l'air du fichier du premier message.

En mode texte sous D5, voici ce que je vois et c'est tout à fait normal.

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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
object fmDirSelectDlg: TfmDirSelectDlg
  Left = 353
  Top = 201
  ActiveControl = DirectoryListBox1
  BorderStyle = bsDialog
  Caption = 'Sélectionner un répertoire'
  ClientHeight = 318
  ClientWidth = 285
  Color = clBtnFace
  ParentFont = True
  OldCreateOrder = True
  Position = poDesktopCenter
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 19
    Top = 6
    Width = 74
    Height = 13
    Caption = 'Répertoire cible'
  end
  object Panel1: TPanel
    Left = 16
    Top = 23
    Width = 166
    Height = 23
    Hint = 'Répertoire cible'
    TabOrder = 4
    object Label1: TLabel
      Left = 5
      Top = 5
      Width = 126
      Height = 13
      Caption = 'C:\Dev\Fmrq2000\Source'
    end
  end
  object OKBtn: TButton
    Left = 197
    Top = 22
    Width = 75
    Height = 25
    Hint = 'Sélection du nouveau répertoire cible.'
    Caption = '<< --- OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = OKBtnClick
  end
  object CancelBtn: TButton
    Left = 197
    Top = 162
    Width = 75
    Height = 25
    Hint = 'Annule la sélection d'#39'un nouveau répertoire'
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
    OnClick = CancelBtnClick
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 15
    Top = 49
    Width = 166
    Height = 228
    DirLabel = Label1
    IntegralHeight = True
    ItemHeight = 16
    TabOrder = 2
  end
  object DriveComboBox1: TDriveComboBox
    Left = 15
    Top = 279
    Width = 168
    Height = 19
    Hint = 'Sélection du disque.( Lecteur )'
    DirList = DirectoryListBox1
    TabOrder = 3
  end
  object Kill: TButton
    Left = 192
    Top = 232
    Width = 75
    Height = 25
    Caption = 'Kill'
    TabOrder = 5
  end
end

[guillemouze]

sur D7, j'ai :
- voir comme texte qui affiche dans delphi le dfm en mode texte
- DFM texte (cochable) qui enregistre en mode texte ou en mode binaire. C'est celui-ci qui doit être coché

[ShaiLeTroll]

Attention, il ne faut pas confondre ALT+F12 pour voir le DFM en Mode Texte et sa sauvegarde en Mode Texte (case à cocher en bas du Menu Contextuel)
C'est trompeur ! c'est bien deux choses distinctes comme le précise Guillemouze

Vérifie avec Notepad si le fichier DFM est bien en Texte et non en binaire, le format par Défaut dans les (très très) anciennes versions

Je te confirme que ta DFM est la même, il y a juste une en version texte et l'autre en binaire, d'ailleurs, c'est la version binaire qui stocké comme ressource dans l'exe !
Et ce n'est absolument pas "bousiller", tu as même les fonctions ObjectTextToBinary et BinaryToObjectText qui permet de passer une DFM d'un format à un autre ainsi que ObjectResourceToText et ObjectTextToResource qui gère l'entête de la ressource


En plus ça ce comprend parfaitement !
ÿ.. = FF 0A 00 = Toujours pareil dans la Ressource (délimiteur?)
TFMDIRSELECTDLG
. = 0 = Zéro Terminal pour strlen indiquant la fin de TFMDIRSELECTDLG
0 = 30 10 = Toujours pareil
w..= 77 04 00 00 = 477h = 1143d = longueur de la DFM de TPF0 à la fin
TPF0
= 0F = 15 = longueur de la chaine TfmDirSelectDlg
TfmDirSelectDlg
= 0E = 14 = longueur de la chaine fmDirSelectDlg
fmDirSelectDlg
 = 04 = 4 = longueur de la chaine Left
Left
 = 03 = type de valeur vaInt16
a
= 61 01 = 161h = 353d, la valeur de Left
= 03 = 3 = longueur de la chaine Top
Top
= 03 = type de valeur vaInt16
É. = C9 00 = C9h = 201d, la valeur de Top
...

[Yves Archambault]

Et vous avez tout à fait raison.
J'ai coché Text DFM et voilà, plus de version binaire.

Delphi XE se plaignait d'une version 16 bits du fichier .dfm, voilà pourquoi. ccool:

Merci.

Avez-vous essayé le nouveau F1 de XE.
Je trouve cela une rétrogradation par rapport à D5 dans sa façon de fonctionner et l'aide est incomplète.
Pour le reste XE est extra.

[ShaiLeTroll]

Et encore, l'aide de XE est la meilleure depuis 2006 ...
Mais, je confirme qu'il faut s'habituer à son fonctionnement particulier (et là la RAM consommé, plus que la RAD Studio ) moins pratique qu'un bon vieux HLP, assez incomplet (je suis sous C++Builder, c'est la misère certaines doc), pour IntraWeb l'aide est fournie mais pas installée pour une simple raispon qu'elle n'est absolument pas terminée (autant lire le code on comprend mieux)

Pense à la Doc Embarcadero Wiki

Parfois, j'ouvre aussi le HLP de BCB6 lorsque la documentation d'une fonction se limite à son prototype dans l'aide 2007

[Lung]

Parfois, j'ouvre aussi le HLP de BCB6 lorsque la documentation d'une fonction se limite à son prototype dans l'aide 2007

Pareil.
Je m'ouvre un D6 rien que pour l'aide.

Ils auraient pu faire l'effort de la recopier dans les versions supérieures.