Discussion :

[innosang]

Bonjour,

lorsque je récupère un champs texte après une requete, le texte se voit concaténé d'une multitude d'espaces à l'arrière. Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
tree.items.AddChild(noeud , 'Reference' + querybis.fields[0].AsString + ' Date de sortie ' + querybis.Fields[2].AsString  ) ;

Si vous savez pourquoi, ce serait cool de m'éclairer

Merci. Bonne fin de journée à tous. 8)

[Pascal Jankowski]

Ton querybis.Fields[2] est une date ??

essaie cela à la place

DateToStr(querybis.Fields[2].AsDate);

[innosang]

oui c'est une date mais le probleme n'est pas là.

les espaces se concatènent après :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
'Reference' + querybis.fields[0].AsString

[Pascal Jankowski]

Et le querybis.fields[0] c'est de quel type dans ta base ?

[innosang]

c'est de type texte ... (base access)

[Pascal Jankowski]

A mon avis c'est lors de l'enregistrement de ce champ que les espaces ont été placés.

1) Revoir la procédure qui instruit ce champ dans la base

2) Tu peux aussi réaliser une function qui supprime les espaces en fin de chaine,
et tu l'appelles quand tu récupères ce champ.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
function supprimmeEspaceEnFin(s: string):string;
....
puis
....
  tree.items.AddChild(noeud , 'Reference' + supprimmeEspaceEnFin(querybis.fields[0].AsString) + ' Date de sortie ' + querybis.Fields[2].AsString  ) ;

[innosang]

c'est à dire que lorsque je rajoute les données dans la base access à la main bein les espaces sont toujours présents.

[NoisetteProd]

Ton problème ne serait-il pas au niveau de la déclaration de ton chanps dans access ?? Le nombre total de caractere ne serait-il pas de 50 par hasard ??? Definit ton champ en champ date et ca ira surement mieux !