Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Глюк при Length(Form1.RichEdit1.Lines.Text) [D6, Win95/98, Win2k]

hooky-mars © (2002-05-14 21:56:00)
Saluer!
При таком расположении дел:
...
Form1.RichEdit1.Lines.Text:="<b a>";
e:=Length(Length(Form1.RichEdit1.Lines.Text));
showMessage(IntToStr(e));

e как ни странное равно 7, а символов 5! И так при любом кол-ве символов. Откудо нивозмись берутся лишние 3 символа!
Что ето за глюк, и как бороться с этим? (мне приходиться отнимить эти 3 лишних символа, но это не надёжно)

MBo (2002-05-16 18:12:00) [1]
в текстовых файлах dos и windows и соответственно в содержимом окон текстовых редакторов перевод строки обозначается двумя символами под номерами 13 и 10 (CR и LF).

попробуй сделать
procedure TForm1.RichEdit1Change(Sender: TObject);
begin
label1.caption:=inttostr(length(richedit1.lines.text));
end;

этот перевод строки может быть даже в пустом визуально редакторе - и его можно стереть backspace или del

hooky-mars (2002-05-16 17:46:00) [2]

> MBo
Поясните пожалуйста

MBo (2002-05-15 18:19:00) [3]
перевод строки #13#10

hooky-mars (2002-05-15 18:14:00) [4]
До меня только дошло проверить код. Я неправильно написал надо так
Length(Form1.RichEdit1.Lines.Text));
И при этом раскладе 7 символов!!!!!! при Form1.RichEdit1.Lines.Text:="<b a>";
Так откуда лишние символы?

Игорь Шевченко (2002-05-15 17:50:00) [5]
Все update packs установлены на D6 ?

hooky-mars (2002-05-15 17:48:00) [6]

> Игорь Шевченко

На D6 молча. Этот код находится в потоке( но этоже никак невлияет на кмпиляцию?)

Игорь Шевченко (2002-05-15 17:45:00) [7]
hooky-mars © (15.05.02 17:42)

А оно и не компилируется :-)
на D5, по крайней мере...

hooky-mars (2002-05-15 17:42:00) [8]

> Игорь Шевченко

А это может быть без ведома того кто пишет код?

Игорь Шевченко (2002-05-15 17:40:00) [9]
Режим compiler errors был отключен :-)

hooky-mars (2002-05-15 17:38:00) [10]
Но какже тогды компилирование происходило?

hooky-mars (2002-05-15 17:37:00) [11]

> Anatoly Podgoretsky

Да я сам токо заметил

Anatoly Podgoretsky (2002-05-14 22:37:00) [12]
Ух ты, даже не заметил, ну ты телепат однако

Doom (2002-05-14 22:18:00) [13]
Length(Length ----------??????????
Text :string ???

Anatoly Podgoretsky (2002-05-14 22:10:00) [14]
7-5=2
Случайно не crlf, хотя не должно

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »