Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Программа и интерфейс
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Результаты опроса: Была полезна консоль в программа (в Memo или RichEdit) ?
Да, это лучше чем стандартная консоль Windows 1 14.29%
Да, была бы полезна для отладки, и вообще пригодится 1 14.29%
Нет, лучше использовать стандартную консоль Windows 0 0%
Нет, консоль вообще не нужна в приложениях 5 71.43%
Голосовавшие: 7. Вы еще не голосовали в этом опросе

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 24.05.2011, 15:09
KiL0z KiL0z вне форума
Прохожий
 
Регистрация: 27.05.2010
Сообщения: 23
Репутация: 10
Вопрос Делаем консоль из Memo

Делаю проект, нужна консоль как в Notepad++ (левый рис.). В Total Commander то же есть консоль (правый рис.), но несколько не такая как нужна


На просторах Internet нашёл коспонент TConsoleIO (к сожалению ссылки на автора не было), который позволяет перенаправить вывод данных в Memo.

Однако как в TMemo запретить правку всей области, кроме точки ввода (т.е. позиции где в консоли обычно мигает курсор и редактируется текст, например
Цитата:
D:\Dir1\Dir2\Dir3\>dir
Том в устройстве D имеет метку DATA
Серийный номер тома: 54FD-E549

Содержимое папкиD:\Dir1\Dir2\Dir3

24.05.2011 22:52 <DIR> .
24.05.2011 22:52 <DIR> ..
23.05.2011 17:12 <DIR> Dir4
05.02.2011 21:35 4*082*176 ProgSamles.exe
D:\Dir1\Dir2\Dir3\>
ProgSamles.exe|
где жирным не редактируемая часть,
а курсивом редактируемая область {с условным курсором в конце}
) ???

Пусть запрещена правка в TMemo и отслеживается нажатия клавиш и буфер обмена - если текст редактируется с указанной позиции, то отображать изменения в Memo, а если за ей пределами (выше, т.к. ниже редактируемой строки не должно ничего быть), то возможно только копирование в буфер обмена. При нажатии клавиш, если курсор не в области правки, ставится в конец области правки и введенный символ вводится уже туда, а если он уже там то просто вводится символ в позицию курсора.


ВОПРОСЫ:
Как определить позицию курсора в тексте?
Как переместить курсор в произвольную позицию (существующею в тексте)?

PS Пишу в Delphi 2010
Вложения
Тип файла: zip ConsoleIO.zip (8.0 Кбайт, 48 просмотров)
Тип файла: zip ColnsoleIOexample.zip (232.4 Кбайт, 32 просмотров)
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 03:16.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025