powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Windows [игнор отключен] [закрыт для гостей] / Lazarus: отображение непечатаемые символы в TEdit
5 сообщений из 5, страница 1 из 1
Lazarus: отображение непечатаемые символы в TEdit
    #39549373
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Натолкнулся на такую вещь: если многострочный текст из любого наследника стринглиста присвоить тексту TEdit
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
//например так
Edit.Text:= Memo1.Text;

//или так
var i: integer;

  Edit1.Clear;
  if Memo1.Lines.Count > 0 then
  begin
    for i := 0 to Pred(Memo1.Lines.Count) do
      if i < Pred(Memo1.Lines.Count)
        then
          Edit1.Text:= Edit1.Text + Memo1.Lines.Strings[i] + LineEnding
        else
          Edit1.Text:= Edit1.Text + UTF8Trim(Memo1.Lines.Strings[i]);
  end;  


то на винде символы перевода каретки не видны, а вот на Линуксе отображаются





Что это, баг лазаревского виджетсета? Или особенности Оси?
=====================
Док.

Win7 Ultim x64/Deb 9.1(GNOME, MATE; gtk2) i386:
FB 3.0.2.32703, диалект 3, SS,
Lazarus 1.9(r.56145); FPC 3.1.1 (r.36290), IBX by -Rik-; IBE 2017.4.19.2
...
Рейтинг: 0 / 0
Lazarus: отображение непечатаемые символы в TEdit
    #39549400
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ох, не туда... перенести бы в дельфийский форум...
...
Рейтинг: 0 / 0
Lazarus: отображение непечатаемые символы в TEdit
    #39549522
Andy_OLAP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Докох, не туда... перенести бы в дельфийский форум...
Так ведь разные CRLF в Windows и Unix. В Windows вырезается, в Linux 0xD вырезается, а 0xA идет в отображение. Это не баг, это фича.
...
Рейтинг: 0 / 0
Lazarus: отображение непечатаемые символы в TEdit
    #39549753
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Andy_OLAPв Linux 0xD вырезается, а 0xA идет в отображение
интересно, можно штатными средствами IDE "вырезать" 0xA вручную или забить, и заменить перевод каретки каким-нибудь мола используемым символом, типа тильды?

зы. модераторы в этой ветке, видимо, одним глазом за всем присматривают. Перенес ветку сюда . Эту имеет смысл закрыть.
...
Рейтинг: 0 / 0
Lazarus: отображение непечатаемые символы в TEdit
    #39549824
Andy_OLAP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Докинтересно, можно штатными средствами IDE "вырезать" 0xA вручную
Очевидно, что "Edit1.Text:= Edit1.Text + Memo1.Lines.Strings[i] + LineEnding" заменить на "Edit1.Text:= Edit1.Text + Memo1.Lines.Strings[i] + "; " ", раз у Вас Edit1 идет, затем ";", затем string1 и так далее.
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Windows [игнор отключен] [закрыт для гостей] / Lazarus: отображение непечатаемые символы в TEdit
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]