Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Вниз

Memo1   Найти похожие ветки 

 
Михайлов Антон   (2003-02-23 11:16) [0]

Программисты,
Как в Memo1 сделать:
1)Например все слова "Hello" менять на жирный шрифт и красный цвет
2)Как например для отдельного слова "Hello"(для всех слов Hello в тексте) сделать hint="hint for hello"
Буду очень благодарен за помощь!!!


 
Song   (2003-02-23 11:23) [1]

1. Можно сказать никак.
2. onMouseMove+TMemo.Hint


 
Михайлов Антон   (2003-02-23 11:25) [2]

А с richedit такое проделать можно (1 и 2)??


 
Palladin   (2003-02-23 11:27) [3]


> Михайлов Антон (23.02.03 11:16)

1. ты в блокноте (notepad) пробовал изменить стиль только одного слова?


 
Михайлов Антон   (2003-02-23 11:29) [4]

Ну можно же сделать както подцветку синтаксиса...
Предложите хотябы компоненту которой это можно сделать


 
Palladin   (2003-02-23 11:30) [5]


> Михайлов Антон (23.02.03 11:25)

можно, на то он и RichEdit.


 
Михайлов Антон   (2003-02-23 11:35) [6]

Хе :)
Вопрос стоит в то как это сделать :))
Может поможете??


 
Palladin   (2003-02-23 11:56) [7]

вот
на скорую руку набросал


procedure TForm1._ChgSubStrStyle(p_strText:string);
var
txt:string;
ocp:integer;
ocp2:integer;
b,p1:integer;
begin
txt:=RichEdit1.Lines.Text;
ocp:=RichEdit1.SelStart;
ocp2:=RichEdit1.SelLength;
b:=0;
while true do
begin
p1:=pos(p_strText,txt);
if p1=0 then break;
b:=b+p1;
txt:=copy(txt,p1+length(p_strText)-1,length(txt));
RichEdit1.SelStart:=b-1;
RichEdit1.SelLength:=length(p_strText);
RichEdit1.SelAttributes.Color:=clred;
end;
RichEdit1.SelStart:=ocp;
RichEdit1.SelLength:=ocp2;
end;


выделяет подстроку указаную в параметре в красный цвет


 
Palladin   (2003-02-23 12:02) [8]

а ведь требовалось от меня всеголишь залезть в help и посмотреть описание TRichEdit...


 
Михайлов Антон   (2003-02-23 12:06) [9]

Всё это хорошо, только он выделяет всю строку, а как сделать только слово??


 
Song   (2003-02-23 12:08) [10]

>>Предложите хотябы компоненту которой это можно сделать
SynEdit
>>Всё это хорошо, только он выделяет всю строку, а как сделать только слово??
SelLength установи в длину слова, а SelStart на начало слова.


 
Palladin   (2003-02-23 12:17) [11]


> Михайлов Антон (23.02.03 12:06)

какую нфиг строку...
ты слово в параметре укажи которое тебе выделить надо...
и он его выделит во всем ричэдите...


 
Михайлов Антон   (2003-02-23 12:19) [12]

2 Palladin
ненаю, у мя всю строку с этим словом выделяет!!!


 
Palladin   (2003-02-23 12:23) [13]

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


 
Михайлов Антон   (2003-02-23 12:25) [14]

Подскажи где ты вычитал, а то немогу понять чё к чему


 
Palladin   (2003-02-23 12:36) [15]


> help и посмотреть описание TRichEdit...



 
MAN-In-RED   (2003-02-23 14:28) [16]

Ужас...


 
Егорычев Михаил   (2003-02-23 15:47) [17]

В Memo никак. Используй TrichEdit. SetAttributes.


 
Palladin   (2003-02-23 17:35) [18]


> Егорычев Михаил © (23.02.03 15:47)

то есть предыдущее мы не читаем, да? :)



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

Форум: "Основная";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.01 c
7-17411
ychnik
2003-01-05 16:16
2003.03.06
Работа с буфером


8-17199
BlackSun
2002-11-22 21:45
2003.03.06
Помогите насчет DirectX


6-17220
Владик_1
2002-12-25 13:47
2003.03.06
Тупичек:( Надо из окна IE взять адрес(URL)?


14-17290
zzet
2003-02-19 14:39
2003.03.06
---|Ветка была без названия|---


1-17051
EndDie
2003-02-25 14:04
2003.03.06
Пакеты-plugins - КАК?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский