Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

Разбить несколько слов...   Найти похожие ветки 

 
Антоний   (2005-09-05 13:09) [0]

Подскажите, как это сделать?
Вот есть строка, например:
"Мама мыла раму".
А надо это в МЕМО вывести так:
М
а
м
а

м
ы
л
а

р
а
м
у


 
Digitman ©   (2005-09-05 13:11) [1]

и какие проблемы ?


 
КиТаЯц ©   (2005-09-05 13:14) [2]

Вроде так...
const s:= "Мама мыла раму"
var i: integer;

begin
 for I:=1 to Length(s) do
   Memo.Lines.Add(S[i])
end;


 
Gydvin ©   (2005-09-05 13:41) [3]

или

const s:= "Мама мыла раму"
var i: integer;
p:string;
begin
for I:=1 to Length(s) do
  p:=p+copy(s,i,1)+#13#10;
memo1.text:=p;
end;



Страницы: 1 вся ветка

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
9-1118048201
WandR
2005-06-06 12:56
2005.10.16
Ландшафт


11-1108223021
mordush
2005-02-12 18:43
2005.10.16
KOL,KOL и ещё раз KOL


2-1126869633
Dimon777
2005-09-16 15:20
2005.10.16
Фильтрация в DBGridEh


14-1127418388
vecna
2005-09-22 23:46
2005.10.16
Полезный линк.


14-1127555455
Goga
2005-09-24 13:50
2005.10.16
переведите на delphi Спасибо