Bonjour,

J'utilise un composant TXMLDocument pour tester du XML dans mon code
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
void __fastcall TMainForm::Button1Click(TObject *Sender)
{
xmlDoc->ChildNodes->Clear();
 
xmlDoc->Version = "1.0";
xmlDoc->Encoding = "ISO-8859-1";
 
_di_IXMLNode xmlRootNode = xmlDoc->AddChild("MainForm");
 
xmlRootNode->AddChild("Height")->Text = IntToStr(MainForm->Height);
xmlRootNode->AddChild("Width")->Text = IntToStr(MainForm->Width);
xmlRootNode->AddChild("Top")->Text = IntToStr(MainForm->Top);
xmlRootNode->AddChild("Left")->Text = IntToStr(MainForm->Left);
 
_di_IXMLNode xmlPanelNode = xmlRootNode->AddChild("Panel1");
 
xmlPanelNode->AddChild("Caption")->Text = Panel1->Caption;
xmlPanelNode->AddChild("Color")->Text = ColorToString(Panel1->Color);
xmlPanelNode->AddChild("Boolean")->Text = BoolToStr(CheckBox1->Checked);
xmlPanelNode->AddChild("Strings")->Text = Memo1->Lines->CommaText;
 
ShowMessage(xmlDoc->XML->Text + " AND L = " +IntToStr(xmlDoc->XML->Text.Length()));        
}
A la 1ère exécution (F9), ça marche et le ShowMessage s'affiche mais aux exécutions d'après ça ne compile même plus, j'ai toujours l'erreur:
[Erreur Lieur fatale] Fatal: Expected file name:

Mais quelle est donc la raison de cette erreur !!!