С Новым годом! Форум программистов, компьютерный форум, киберфорум
Lazarus
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/21: Рейтинг темы: голосов - 21, средняя оценка - 4.71
46 / 20 / 5
Регистрация: 29.12.2015
Сообщений: 1,863
1

Получение номера строки и количество символов в строке также как в Notepad++

27.09.2018, 11:45. Показов 4113. Ответов 7
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте. Подскажите событие SynEdit получение номера строки и количество символов в строке чтобы получилось также как это сделано в Notepad++
Пока что я использую SynEdit1Change но оно срабатывает не всегда. Событие которое бы срабатывало каждый раз при смене каретки чет не нашел.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
27.09.2018, 11:45
Ответы с готовыми решениями:

Найти количество гласных и согласных букв в строке, а также символов (, . : ? !
Задана строка S, содержащая русскоязычный текст, записанный малыми буквами. Найти количество...

Определить,есть ли в этой строке русские символы "а" и "е" ,а также количество каждого из этих символов
Дана строка символов.Определить,есть ли в этой строке русские символы "а" и "е" ,а также количество...

Clojure Заменить в строке все минусы на плюсы, а также подсчитать количество слов в строке
Помогите, пожалуйста, решить задачу: Необходимо заменить в строке все минусы на плюсы, а также...

Посчитать количество символов в созданом файле, а также определить количество знаков препинания
Программа №1 Создать файл и записать в него 3 строки. Посчитать количество символов в созданом...

7
Эксперт Pascal/Delphi
2386 / 1298 / 1492
Регистрация: 29.08.2014
Сообщений: 4,661
28.09.2018, 09:21 2
Onclick, onkeyup пробовали?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
28.09.2018, 09:32 3
У SynEdit-а есть событие OnProcessCommand, которое срабатывает на каждый чих, не надо обрабатывать несколько событий, связанных с клавиатурой/мышью отдельно.
1
46 / 20 / 5
Регистрация: 29.12.2015
Сообщений: 1,863
28.09.2018, 11:15  [ТС] 4
А может ктодать ссылдку на описания параметров события OnProcessCommand
Мне его нужно в кое каких местах программно вызвать.ю Или для этогго достаточно кое что другое сделать
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
28.09.2018, 11:17 5
Вот его вызывать вручную точно не нужно. Проблем не оберешься. Что именно хочется сделать, для чего ты планировал вызывать обработчик OnProcessCommand?
0
46 / 20 / 5
Регистрация: 29.12.2015
Сообщений: 1,863
28.09.2018, 14:33  [ТС] 6
Цитата Сообщение от volvo Посмотреть сообщение
Вот его вызывать вручную точно не нужно. Проблем не оберешься. Что именно хочется сделать, для чего ты планировал вызывать обработчик OnProcessCommand?
Короче нужно выполнять этот код:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
CountChInScript := 0;
  CountScript := 0;
  StatusBar1.Panels.Items[0].Text := 'Sel Ln: ' + IntToStr(sRMMVTEdit.CaretY);
  StatusBar1.Panels.Items[1].Text := 'F.Col: ' + IntToStr(UTF8Length(sRMMVTEdit.Lines[sRMMVTEdit.CaretY - 1]));
  if UTF8Length(sRMMVTEdit.Text) > 0 then
  begin
    str := sRMMVTEdit.Lines[sRMMVTEdit.CaretY - 1];
    StatusBar1.Panels.Items[2].Text := 'Col Text: ' + IntToStr(GetCountChInTextAndInScript(str, CountChInScript, CountScript));
  end else
    StatusBar1.Panels.Items[2].Text := 'Col Text:  0';
 
  StatusBar1.Panels.Items[3].Text := 'Col Script: ' + IntToStr(CountScript);
 
  if chbParsingGivenFace.Checked then
    sRMMVTEdit.RightEdge := (CountChInScript + 40)
  else
    sRMMVTEdit.RightEdge := (CountChInScript + 50);
При каждом изменении SynEdit точнее при изменении текста или позиции каретки
Но также есть CheckBox - chbParsingGivenFace
Так что при изменении chbParsingGivenFace данный код тоже должен срабатывать и при старте программы
Впрочем я думаю вынести этот код в отдельный метод и его вызывать когда нужно.

Добавлено через 2 часа 57 минут
OnProcessCommand не подходит. Ибо срабатывает до внесеных изменений а не после.
Например нажимаю Enter для добавления новой строки и в тоге вот это
Delphi
1
StatusBar1.Panels.Items[0].Text := 'Sel Ln: ' + IntToStr(sRMMVTEdit.CaretY);
Возвращает предыдущую строку.
А мне же нужно чтобы действовал также как OnChange
Только чтобы после смены каретки например после переходами на строки событие тоже срабатывало. Если короче то как и в Notepad это сделано только кроссплатформенный способ.

Добавлено через 4 минуты
К тому же если менять положение каретки мышкой то событие OnProcessCommand не срабатывает
Так что тут походу собственное событие прийдется писать на отлов изменений x и y каретки.
В принципе при написании текста каретка тоже меняется.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
28.09.2018, 15:56 7
Лучший ответ Сообщение было отмечено Alexandr_7 как решение

Решение

Цитата Сообщение от Alexandr_7 Посмотреть сообщение
Так что тут походу собственное событие прийдется писать на отлов изменений x и y каретки
Тебе бы исходники компонента почитать, там событий больше, чем ты себе представить можешь. Скажем, OnStatusChange:

Pascal
1
2
3
4
5
procedure TForm1.SynEdit1StatusChange(Sender: TObject;
  Changes: TSynStatusChanges);
begin
  StatusBar1.Panels.Items[0].Text := 'Sel Ln: ' + IntToStr((Sender as TSynEdit).CaretY);
end;
отображает изменения и при тыке мышью, и при перемешении каретки с клавиатуры, и при печати текста, как хочешь...
1
46 / 20 / 5
Регистрация: 29.12.2015
Сообщений: 1,863
28.09.2018, 17:32  [ТС] 8
Цитата Сообщение от volvo Посмотреть сообщение
Тебе бы исходники компонента почитать, там событий больше, чем ты себе представить можешь. Скажем, OnStatusChange:
А есть на русском вики по компоненту?
0
28.09.2018, 17:32
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
28.09.2018, 17:32
Помогаю со студенческими работами здесь

Подсчитать количество символов в тексте, а также количество пропусков.
Подсчитать количество символов в тексте, а также количество пропусков. "Не спокушайтеся думкою бути...

В исходной строке а определить количество слов, содержащих ровно п символов строки x
В исходной строке а определить количество слов,содержащих ровно п символов строки x.

В строке символов установить пробелы вместо символов,номера позиций которых при делении на 6 дают в остатке 3
и вот 2 задачка. В заданной строке символов установить пробелы вместо символов,номера позиций...

В начале каждой строки текстового файла записать количество символов в этой же строке
Написать программу которая копирует или преобразовывает текст входного текстового файла(файлов)так...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
Что такое NullReferenceEx­­­ception и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru