Вниз
Скачать: CL | DM;

конкретный символ в TMemo ...   Найти похожие ветки 

← →
spogi   (2003-04-04 00:41) [0]

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


← →
Anatoly Podgoretsky ©   (2003-04-04 01:12) [1]

Бесполезно у TMemo нет возможности управления шрифтом для отдельного символа.


← →
konstantinov ©   (2003-04-04 01:20) [2]

Если не ошибаюсь в RichEdit это можно.


← →
spogi   (2003-04-04 04:29) [3]

>> Konstantinov
a kak v RichEdit? esli mojno...

a mojno, skopirovat (to, cto v TMemo) kuda nibud, chtob mojno bila s simvolami rabotat?


← →
zacho ©   (2003-04-04 06:45) [4]

Читай про TRichEdit.SelAttributes, TRichEdit.SelStart, TRichEdit.SelLength и т.п.


← →
Anatoly Podgoretsky ©   (2003-04-04 09:44) [5]

spogi (04.04.03 04:29)
С симолами можно работать и Мемо, только расскрашивать нельзя.
И скопировать можно S := Memo.Text


← →
spogi   (2003-04-05 23:29) [6]

извените меня, у меня случайно пошло, цвет поменять, это естественно не должно быть, а с остальными проблем нет...
спосибо Anatoly, получился примерно вот так:

S:String;

S:=Memo1.Text;
конкретный сивол
For i:=0 to Length(S) do begin
S[i]:="a"; //все символы заменяются на "a"
end;


← →
Anatoly Podgoretsky ©   (2003-04-06 00:38) [7]

For i:=0 to Length(S) на единицу больше чем есть в мемо!!!


← →
Palladin ©   (2003-04-06 01:24) [8]

как он интересно получился :) ладно хоть примерно...


← →
spogi   (2003-04-06 02:58) [9]

ну я здесь написал не обращав не это вниманию, а в проекте я конечно так и сделал... Length(S) -1 ... Это уже ясно с сообщением типа:
"не существует S[i]" (или что-то в этом роде)...



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
11-54541
Vitalis
2002-07-02 16:22
2003.04.17
Вопросы по TKOLHTTP и UWrd


3-54427
dimka
2003-04-01 14:40
2003.04.17
Оптимизация файлов БД


3-54524
AVR
2003-03-31 18:31
2003.04.17
Поиск в списке LookupList по нескольким буквам


1-54682
Intell
2003-04-01 20:45
2003.04.17
Компоненты в стиле XP


14-54862
Василий Тёркин
2003-03-30 15:49
2003.04.17
Злоба дня




   Наверх