Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: sekoto - Ottobre 20, 2020, 10:51:02 pm

Titolo: unire più TMemo in un unico TMemo
Inserito da: sekoto - Ottobre 20, 2020, 10:51:02 pm

Salve, come da titolo vorrei unire il contenuto di più TMemo in unico TMemo.
Esempio

TMemo1
aaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaa

TMemo2
bbbbbbbbbbbbbbbb
bbbbbbbbbbbbbbbb
bbbbbbbbbbbbbbbb

TMemo3
ccccccccccccccccccc
ccccccccccccccccccc
ccccccccccccccccccc

TMemoTotale
aaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaa
bbbbbbbbbbbbbbbb
bbbbbbbbbbbbbbbb
bbbbbbbbbbbbbbbb
ccccccccccccccccccc
ccccccccccccccccccc
ccccccccccccccccccc

come posso fare?
Grazie mille

Titolo: Re:unire più TMemo in un unico TMemo
Inserito da: bonmario - Ottobre 21, 2020, 07:58:17 am

Per fare una cosa fatta bene, fai un ciclo for, che legge le Tmemo 1, 2, e 3, e ne copia il valore nel totale.
Per fare una cosa veloce:
TMemoTotale.Lines.Text:=TMemo1.Lines.Text + TMemo2.Lines.Text + TMemo3.Lines.Text;

Ciao, Mario

Titolo: Re:unire più TMemo in un unico TMemo
Inserito da: sekoto - Ottobre 21, 2020, 12:48:57 pm

grazie mille, faccio qualche prova!