Sujet Précédent Sujet Suivant

Memo

clem68 - 8 févr. 2015 à 17:43
korgis Messages postés 420 Date d'inscription samedi 17 mai 2003 Statut Membre Dernière intervention 6 mai 2019 - 9 févr. 2015 à 20:19

Bonjour,

Dans ma form j ai un tmemo qui m affiche des relevé provenant d'un boitier électronique il m afiche ce ci en utilisant ce code memo2.Lines.SetText(sicomm1.SiC_PunchingCodeNumbers[n]) =>

10
11
12
13

or je souhaiterais que ces chiffre s'affiche comme ca dans le memo =>

10;11;12;13

Cordialement et bonne fin de journée

A voir également:

Memo
Memo delphi ✓ - Forum Delphi / Pascal
Mémo format - Forum Delphi / Pascal
Delphi memo ✓ - Forum Delphi / Pascal
Créer un memo en ligne ✓ - Forum Delphi / Pascal
Memo php - Forum PHP

2 réponses

Réponse 1 / 2

dubois77 Messages postés 675 Date d'inscription jeudi 17 avril 2008 Statut Membre Dernière intervention 19 février 2019 14
9 févr. 2015 à 12:54

Salut
vois ce que tu peux faire avec ce petit code :

procedure TForm1.Button5Click(Sender: TObject);
var i:integer; z:string;
begin
z := '';
for i:=0 to memo2.Lines.Count-1 do  z := z + memo2.lines[i] + ';' ;
memo2.Clear;
memo2.lines.Add(z)
end;

à utiliser après ton chargement de memo2 par ton code

Réponse 2 / 2

korgis Messages postés 420 Date d'inscription samedi 17 mai 2003 Statut Membre Dernière intervention 6 mai 2019 17
Modifié par korgis le 9/02/2015 à 20:28

Salut,

Ou bien comme ça :

with Memo do
    Text := StringReplace(Lines.CommaText, ',', ';', [rfReplaceAll]);

korgis

Discussions similaires

Débutant:couleurs dans un mémo ?

ecrire dans un memo apartir d'un button

comment selectionner une ligne dans un memo

recherche et deplacement de ligne dans un memo

contenu Memo sauvegarder ligne par ligne

Votre réponse

Discussions similaires