Bonjour,
Je posséde la version Delphi 7 edition personnelle et je fais un programme pour importer des données situées dans une table access.
J'utilise la méthode de Thierry Aim http://thierryaim.developpez.com/tut...dodelphiperso/
pour rapatrier les données des tables. Tout fonctionne trés bien, sauf qu'il y a une table ou il y a un champs text [200] où les données ont des "caractères "=#00.
Lorsque je lis le recordSet celle-ci n'a aucune valeur !!
Je suis sur que dans le champs text il y a des données valides exemple:#00,#07,#00,#21,#00,#10,....
Comment je peux "rappatrier" ces données. Merci.
Code delphi : 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 var Y, i: Integer; begin Y := 1; StringGrid2.ColCount:=RecordSet2.Fields.Count + 1 ; // ajout 1 colonne RS2.MoveFirst; for i := 0 to RecordSet2.Fields.Count-1 do StringGrid2.Cells[i, 0]:= RecordSet2.Fields[i].Name ; repeat StringGrid2.RowCount := Y+1; for i := 0 to RecordSet2.Fields.Count-1 do if not VarIsNull(RecordSet2.Fields[i].Value) then <----indique vide StringGrid2.Cells[i, Y] := RecordSet2.Fields[i].Value; RecordSet2.Move(1, EmptyParam); Inc(Y); until RecordSet2.EOF; end;
Partager