Discussion :

[valoji]

Bonjour,
Voilà j'ai 3 champs dans un mémo, et je voudrais avoir comme résultat çà :

Date d'entrée | Date de Sortie | UF
01/01/2005 | 15/05/2005 | 3000
01/01/2006 | 05/05/2006 | 2007

JE VOUDRAIS QUE MES '|' SOIT ALIGNEES

Malheureusement, je n'arrive pas à avoir ce résultat.
Voici mon code :

Code :

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
 
with Fiche_Pocadm.Query_PAT01_Pas do
  begin
    // Alimentation des paramètres de la requête
    ParamByName('vennumser').Value := nVennumser;
    Open;
     QRMemoPas.Lines.Clear;
     QRMemoPas.Lines.Add(format('%.15s | %.10s | %.4s', ['DATE ENTREE','DATE SORTIE','UF']));
     QRMemoPas.Lines.Add('_______________________________________________________________');
    while not Eof do
    begin
      QRMemoPas.Lines.Add(format('%.15s | %.10s | %.4s',[fieldbyname('pasdatent').asstring,fieldbyname('pasdatsor').asstring,
                            fieldbyname('ufocod').asstring]));
      next;
    end;
  end;

Merci pour votre aide
Valoji

[valoji]

Au mieux j'aimerais faire un tableau,
sans utiliser Qrsubdetail

Merci

[Rayek]

pour cela il te faut une fonte régulière (entendre par la une fonte dont tout les caractères ont la même taille)
Essai la fonte "Courrier" ou "Courrier new"

[valoji]

Dèjà fait, mais le résultat n'est pas terrible. De plus je suis en ARIAL partout (Plus de 300 éditions). Alors je dois respecter la nomenclature du logiciel.

Vajilo

[Rayek]

En mettant 3 QrLabel avec la possibilité d'être etendue

Puis apres tu les remplis de la manière suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
    QrLabel1.caption := '';
    QrLabel2.caption := '';
    QrLabel3.caption := '';
    while not Eof do
    begin
      QRLabel1.caption := QrLabel1.caption + fieldbyname('pasdatent').asstring + #13#10;
      QrLabel2.Caption := QrLabel2.Caption + fieldbyname('pasdatsor').asstring + #13#10;
     QrLabel3.caption := QrLabel3.Caption +fieldbyname('ufocod').asstring + #13#10; 
      next;
    end;

[valoji]

Je te remercie MALATAR,
Je n'avais pas pensé au label. Cela me convient parfaitement.

Pourquoi chercher compliquer, alors que peut faire simple.

Valoji