Bonjour à tous,
J'utilise un TClientDataSet et un TDataSetProvider pour créer une table dans un fichier XML.
La table comporte 2 champs :
XMLogID: TStringField;
XMLData: TWideMemoField // Ce champ peut contenir plusieurs milliers de carctères en UTF8
Dans le code ci-dessous, comment je fais pour assigner la valeur de XMLData qui est un pointeur au TWideMemoField XMLogXMLData: ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Procedure TDatabase.XMLog( LogID: String; XMLData: PByte; XMLCount: Integer); begin if (Database.XMLog.State <> dsInactive) then begin Database.XMLog.Append; Database.XMLogID.Value := LogID; Database.XMLogXMLData ??????? // comment lui passer le contenu de XMLData^ end; end;
Merci d'avance
Wilco
Partager