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

Вниз

Глюк при Length(Form1.RichEdit1.Lines.Text)   Найти похожие ветки 

 
hooky-mars ©   (2002-05-14 21:56) [0]

Saluer!
При таком расположении дел:
...
Form1.RichEdit1.Lines.Text:="<b a>";
e:=Length(Length(Form1.RichEdit1.Lines.Text));
showMessage(IntToStr(e));


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


 
Anatoly Podgoretsky ©   (2002-05-14 22:10) [1]

7-5=2
Случайно не crlf, хотя не должно


 
Doom ©   (2002-05-14 22:18) [2]

Length(Length ----------??????????
Text :string ???


 
Anatoly Podgoretsky ©   (2002-05-14 22:37) [3]

Ух ты, даже не заметил, ну ты телепат однако


 
hooky-mars ©   (2002-05-15 17:37) [4]


> Anatoly Podgoretsky

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


 
hooky-mars ©   (2002-05-15 17:38) [5]

Но какже тогды компилирование происходило?


 
Игорь Шевченко ©   (2002-05-15 17:40) [6]

Режим compiler errors был отключен :-)


 
hooky-mars ©   (2002-05-15 17:42) [7]


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

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


 
Игорь Шевченко ©   (2002-05-15 17:45) [8]

hooky-mars © (15.05.02 17:42)

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



 
hooky-mars ©   (2002-05-15 17:48) [9]


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

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


 
Игорь Шевченко ©   (2002-05-15 17:50) [10]

Все update packs установлены на D6 ?


 
hooky-mars ©   (2002-05-15 18:14) [11]

До меня только дошло проверить код. Я неправильно написал надо так
Length(Form1.RichEdit1.Lines.Text));
И при этом раскладе 7 символов!!!!!! при Form1.RichEdit1.Lines.Text:="<b a>";
Так откуда лишние символы?


 
MBo ©   (2002-05-15 18:19) [12]

перевод строки #13#10


 
hooky-mars ©   (2002-05-16 17:46) [13]


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


 
MBo ©   (2002-05-16 18:12) [14]

в текстовых файлах dos и windows и соответственно в содержимом окон текстовых редакторов перевод строки обозначается двумя символами под номерами 13 и 10 (CR и LF).

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

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



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

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

Наверх




Память: 0.49 MB
Время: 0.013 c
1-88502
Serhy
2002-05-15 02:18
2002.05.27
Exception


1-88424
VAleksey
2002-05-17 06:28
2002.05.27
*.ini или что-то вроде этого


14-88632
Deus
2002-04-19 13:23
2002.05.27
А давайте поговорим о лицензионности...


1-88437
KPbIC
2002-05-15 13:51
2002.05.27
LIB файлы, как с ними быть?


1-88446
Димок
2002-05-17 14:28
2002.05.27
Как убрать свое приложение с панели задач?