Есть memo1 Edit1 и Memo2 так вот.....

← →
DOR (2003-06-15 10:53) [0]

Есть memo1 Edit1 и Memo2 так вот.....
В memo1 есть какой то список (имен например) а в edit1 есть какая то(фамилия например),и НУЖНО чтоб все имена(из memo1) и фамилии(из edit1.text) были вместе соеденены в memo2
Например:
Memo1:
Vasya
Misha
Grisha
--------
Edit1.text
Ivanov
---------
memo2:
Vasya Ivanov
Misha Ivanov
Grisha Ivanov

← →
Real (2003-06-15 11:03) [1]

for i:=0 to Memo1.Lines.Count-1 do
begin
Memo2.Lines[i]:=Memo1.Lines[i]+" "+Edit1.Text;
end;

← →
Всеволод Соловьёв (2003-06-15 11:07) [2]

for i:=low(memo1.lines) to high(memo1.lines) do memo2.lines.add(memo1.lines[i]+" "+edit1.text);

← →
Всеволод Соловьёв (2003-06-15 11:08) [3]

2Real
Твоя версия неправильная :) попробуй ее скомпилировать и использовать. Скажет что-то типа Access Violation :0

← →
Всеволод Соловьёв (2003-06-15 11:21) [4]

ммм.. перед заполнением нужно еще написать
memo2.lines.clear;

← →
Real (2003-06-15 11:31) [5]

2 ВСеволод

Никаких Access Violation не будет. Но код действительно не пашет тоды Add придется явно вызывать. А вот без low и high можно было обойтись.

← →
Song (2003-06-15 12:39) [6]

Безусловно надо Add вызывать или изначально добавить пустых строк в Memo2 по количество строк в Memo1

← →
ScableR (2003-06-15 14:00) [7]

Безусловно надо было исправить пример Реал"а

for i:=0 to Memo1.Lines.Count-1 do begin Memo2.Lines[i].Add(Memo1.Lines[i] +" "+Edit1.Text); end;

Не знаю, должно в принципе пахать (на машине, с которой пишу нету компилятора.)

← →
Palladin (2003-06-15 15:06) [8]

да я с вас фигею ребята, один думает что Lines это массив
другой у строки метод вызывает...

memo2.clear; for i:=0 to memo1.lines.count-1 do memo2.lines.add(memo1.lines[i]+" "+Edit1.Text);

ну а во вторых хотелось бы посоветовать автору не лезти с таким вопросам в форум, ибо мастера не снизойдут до такого, а вот остальные насоветуют очень много интересного, в основном как не надо делать...

← →
Anatoly Podgoretsky (2003-06-15 15:50) [9]

Есть memo1 Edit1 и Memo2 так вот..... Найти похожие ветки