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

Вниз

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

 
ДухКороляАртура ©   (2004-03-12 22:16) [0]

Ситуация такая : есть текст в Memo, как определенноее слово в этом тексте выделить? Заранее спасибо.


 
Anatoly Podgoretsky ©   (2004-03-12 22:24) [1]

SelStart/SelLength


 
ДухКороляАртура ©   (2004-03-12 22:52) [2]

Не догоняю, можно чуть по подробнее


 
Defunct ©   (2004-03-12 23:02) [3]

F1


 
Юрий Зотов ©   (2004-03-12 23:11) [4]

Я тут подсчитал...

Ответ "SelStart/SelLength" - 18 символов
Ответ "F1" - 2 символа.

Итого, "чуть по подробнее" оказалось в 9 раз короче. Хотя и действительно намного подробнее, с этим не поспоришь.
:о)


 
ДухКороляАртура ©   (2004-03-13 13:48) [5]

Выделить в смысле сделать слово например жирным


 
Юрий Зотов ©   (2004-03-13 14:01) [6]

> ДухКороляАртура ©   (13.03.04 13:48) [5]

В Memo - никак. Для этого есть RichEdit, а в нем - SelAttributes.


 
TUser ©   (2004-03-13 14:33) [7]

uses strutils;

...

with richedit1 do begin
  Lines.BeginUpdate;
  i:=pos("слово",text);
  if i<>0 then begin
     repeat begin
        selstart:=i;
        sellength:=length("слово");
        selattributes.style:=fsBold;
        i:=posex("слово",text,i);
        end
     until i=0;
  Lines.EndUpdate;
  end;


 
TUser ©   (2004-03-13 14:34) [8]

ЗЫ. 310 символов, безпробелов - 225.



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

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

Наверх





Память: 0.46 MB
Время: 0.034 c
3-1078474240
Laymer
2004-03-05 11:10
2004.04.04
И опять про Access


6-1075204305
Gorlum
2004-01-27 14:51
2004.04.04
Почта


3-1078816971
Лысый
2004-03-09 10:22
2004.04.04
Готовое приложение


7-1074033240
KyRo
2004-01-14 01:34
2004.04.04
Виртуальная машина


1-1079693529
АМБ
2004-03-19 13:52
2004.04.04
Скомпилированный файл имеет малые размеры





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский