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;