![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Opredelenie kol-va simvolov v tekste [D7, XP]
Alral © (2006-08-07 00:27:00)Kak opredeit kol-vo simvolov v tekste i virazit v Integer?
Ega23 (2006-08-07 16:16:00) [1]Табуляция за пробелы не считается...
Ega23 (2006-08-07 16:15:00) [2]
var
i, cnt:Integer;
begin
cnt:=0;
for i:=0 to Memo.Lines.Count-1 do
cnt:=cnt+Length(Memo.Lines[i]);
Alral (2006-08-07 16:09:00) [3]>Извини обманул. В свойство TMemo.Text включаются ещё и символы CR/LF.
A eto chto za simvoli? Kuda ih nado?
Alral (2006-08-07 16:06:00) [4]A ih kuda?
Германн (2006-08-07 01:57:00) [5]Извини обманул. В свойство TMemo.Text включаются ещё и символы CR/LF.
Alral (2006-08-07 00:38:00) [6]spasibo
Германн (2006-08-07 00:36:00) [7]
kol-vo simvolov v tekste:=Length(Memo1.Text). Включая пробелы.
Alral (2006-08-07 00:27:00) [8]Imeetsja vvidu TMemo