08.06.2010, 04:18
|
|
Познающий
Регистрация: 15.03.2009
Сообщений: 87
Провел на форуме:
893829
Репутация:
34
|
|
Очень просто
Кидаешь на форму 2 memo в memo1 кидаешь свои слова на кнопку кидаешь
var
i:integer;
begin
For i:=0 to memo1.lines.Count-1 do
if pos ('Вверх',memo1.lines[i])<>0 then
memo2.lines.Add(memo1.lines[i])
При нажатие на кнопку слова с "Сверх" с memo1 будут скопированы в memo2
Последний раз редактировалось 090808; 08.06.2010 в 04:20..
|
|
|