salut je construit un tableau dans un memo que je doit envoyer par email comme
ceci-
Code Matricule Type Véhicule Désignation Marque
---- --------------- --------------- ---------------------- --------------------
83 02917 00 16 Utilitaire CAMION FRIGI ISUZU ISUZU
17 00225 300 30 Utilitaire HILUX FRIGO TOYOTA
50 00276 304 30 Utilitaire HILUX FRIGO TOYOTA
129 00090 302 30 Utilitaire HILUX FRIGO TOYOTA
20 00041 301 30 Utilitaire HILUX DC 4/2 TOYOTA
[/QUOTE]le problemme c'est que je n'arrivent pas a aligner les colone j'ai utiliser le code suivant :
je voudrai que les colone soit bien aligner je n'arrive avec ce que il sufit qu'une chaine soit plus longue que les autre pour qu'il est décalage pour les colone dans mémo j'arrive a voir la séparation dans ce post je n'arrivent pas a avoit plus d'un blan
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Reserver.First; FMenu.Memo1.Clear; FMenu.Memo1.Lines.Add('Suite a votre reservation du :'+sd.ReservationDateDu.Text+' nous vous transmetons la confirmation avec le détails :'); FMenu.Memo1.Lines.Add(' '); FMenu.Memo1.Lines.Add(Format('%-6s %-20s %-15s %-40s %-30s',['Code','Matricule','Type Véhicule','Désignation','Marque'])); FMenu.Memo1.Lines.Add(Format('%-6s %-20s %-15s %-40s %-30s',['----','---------------','---------------','------------------------------','--------------------'])); While not Reserver.Eof do begin FMenu.Memo1.Lines.Add(Format('%-6s %-20s %-15s %-40s %-30s',[ReserverCode.Value,ReserverMatricule.Value,ReserverLibType.Value,ReserverDesignation.Value,ReserverLibMarque.Value])); // FMenu.Memo1.Lines.Add(ReserverCode.Value+' '+ReserverMatricule.Value+' '+ReserverLibType.Value+' '+ReserverDesignation.Value+' '+ReserverLibMarque.Value); Reserver.Next; end; end;
Partager