Problème de fonction Format

Version imprimable

1 pièce(s) jointe(s)

Bonjour à tous

Je veux afficher à partir d'une Base SQLite les donnée dans un memo

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 // affichage de la liste des comptes
  MemoComptes.Lines.Add(String.Format('%18s|%35s|%25s|', [' Nom ', ' Banque ',  ' Solde Initial ']));
  // Ajouter une ligne au mémo pour chaque enregistrement de la table.
 
  while not DataModule2.FDQueryMaitre.Eof do
  begin
    MemoComptes.Lines.Add(String.Format('%18d|%-35s|%-25s|',[DataModule2.FDQueryMaitre.FieldByName('NomCpt')
      .AsString + '         ' + DataModule2.FDQueryMaitre.FieldByName('Banque')
      .AsString + '                    ' + FloatToStr(DataModule2.FDQueryMaitre.FieldByName
      ('SoldeInit').AsFloat) + ' ' + #128]));
    DataModule2.FDQueryMaitre.Next;
  end;

Lors de la première partie (affichage des Entêtes de colonne Pas de Pb tout est OK
Par contre dans la boucle While j'obtient le message d'erreur suivant
Pièce jointe 548438

Merci pour vos conseils

Bonjour,

le premier argument de vôtre format Format('%18d|%-35s|%-25s|'demande un entier %d or vous lui fournissez un string
vous pourriez aussi l'écrire ainsi :
Code:

1 2 3 4 format('%18s |%35s |%8.2f',[ DataModule2.FDQueryMaitre.FieldByName('NomCpt').AsString, DataModule2.FDQueryMaitre.FieldByName('Banque').AsString, DataModule2.FDQueryMaitre.FieldByName('SoldeInit').AsFloat]);
il faudrait aussi expliquer cette histoire de | et de #128 et les espaces ?

Si vous avez besoin d'un longueur fixe pensez au -
exemple pour le premier terme

Code:

Format('%.28s|',[DataModule2.FDQueryMaitre.FieldByName('NomCpt').AsString])

si je regarde le reste du code je pencherais pour
Code:

1 2 3 4 5 6 7 8 9 10 11 MemoComptes.Lines.Add(String.Format('%-20s|%-35s|%-25s|', [' Nom ', ' Banque ', ' Solde Initial '])); // Ajouter une ligne au mémo pour chaque enregistrement de la table. while not DataModule2.FDQueryMaitre.Eof do begin MemoComptes.Lines.Add(String.Format('%-20s|%-35s|%23.2f|', [DataModule2.FDQueryMaitre.FieldByName('NomCpt').AsString, DataModule2.FDQueryMaitre.FieldByName('Banque').AsString, FloatToStr(DataModule2.FDQueryMaitre.FieldByName('SoldeInit').AsFloat)])); DataModule2.FDQueryMaitre.Next; end;

23/03/2020, 14h52
blonde

Il faut que tu fournisses un entier pour ton premier argument, c'est ce que tu as noté dans le formatage : "d"

Essaye de remplacer par

Code:

'%18s|%-35s|%-25s|'

Edit : Fichtre, je n'ai pas été assez rapide pour répondre ;) Sergio est très très véloce
23/03/2020, 14h58
SergioMaster

Citation:

Envoyé par blonde

Sergio est très très véloce

:mrgreen:
23/03/2020, 14h59
blonde

Citation:

Envoyé par SergioMaster

Si vous avez besoin d'un longueur fixe pensez au .
exemple pour le premier terme

Code:

Format('%.28s|',[DataModule2.FDQueryMaitre.FieldByName('NomCpt').AsString])

je que pour conserver une longueur fixe il faut utiliser le caractère "-"

Doc :
Un spécificateur de largeur définit la largeur de champ minimale pour une conversion. Si la chaîne résultante est plus courte que la largeur de champ minimale, elle est comblée par des espaces afin d'accroître la largeur de champ. Par défaut, le résultat est justifié à droite en faisant précéder la valeur d'espaces, mais si le spécificateur de format contient un indicateur de justification à gauche (un caractère tiret "-" précédant le spécificateur de largeur), le résultat est justifié à gauche par l'ajout d'espaces après la valeur.
23/03/2020, 15h00
blonde

Bon, j'ai rien dit, je viens de tester, ça fonctionne ;)
23/03/2020, 17h22
gegila

Merci à tous pour vos réponses
En effet j'avais oublié que c'était un entier le premier champ. J'était parti sur un select * From nom de ma table

l'utilisation de | me permet de faire des séparations entre les ligne et #128 correspond à l'affichage du symbole Euro

et je me suis ravisé que je ne voulais pas afficher l'index.

Donc j'ai essayé est cela marche

Merci pour vos précieuses réponses :P
23/03/2020, 18h20
SergioMaster

Citation:

Envoyé par gegila

#128 correspond à l'affichage du symbole Euro

Ah, je n'avais pas vérifié, dans ce cas un %9.2m fera le nécessaire (sauf si bien sûr le poste est configuré pour un pays hors €uro ;))