Как выделить текст в richEdit

[malish]

мне нужно что бы выделялся текст который я напишу в поле для текста.. + с прокруткой richEdit до выделеного текста, можно так сделать ? как ?)
Поиск не отвечает ;(

[xsnakes]

c("richEdit1")->setFocus();
c("richEdit1")->selStart = strpos( c("richEdit1")->text, c("edit1")->text );
c("richEdit1")->selLength = strlen( c("edit1")->text ); 

А вот прокрутка не знаю, в мемо автоматом крутит... где-то было такое!

[malish]

Большой и низкий поклон вам ) Но как еще сделать скролинг ?

[xsnakes]

В делфи есть метод ScrollBy, а в дс именно в TRichEdit нету )
Поищу другой способ...

[malish]

Да придеться переделывать в memo ...

[xsnakes]

Вот как Нашёл на сайтах делфи http://www.sql.ru/forum/actualthread.aspx?tid=288746

c("richEdit1")->Perform(0xB7, c("richEdit1")->selStart ,0); 

[xsnakes]

И того весь код такой:

c("richEdit1")->setFocus(); 
c("richEdit1")->selStart = strpos( c("richEdit1")->text, c("edit1")->text );
c("richEdit1")->selLength = strlen( c("edit1")->text );
c("richEdit1")->Perform(0xB7, c("richEdit1")->selStart ,0); 

[malish]

Ну ты вообще человек
Добавь в решебник )

[xsnakes]

В фак Решебник я переместил фак, а то получается 2 фака )

[xsnakes]

Что ещё полезно знать
setFocus() всётаки нужен!
setFocus() надо писать в начале кода... Т.к. сначала передаём фокус, потом выделяем, иначе может получиться, что при передачи фокуса в конце кода выделится весь текст, как и происходит с TEdit!

И ещё надо сделать проверку найден ли текст!

$selStart = strpos( c("richEdit1")->text, c("edit1")->text ); 
if($selStart !== false){
 c("richEdit1")->setFocus(); 
 c("richEdit1")->selStart = $selStart;
 c("richEdit1")->selLength = strlen( c("edit1")->text ); 
 c("richEdit1")->Perform(0xB7, $selStart, 0); 
} 

[malish]

Я так вот сделал:

if( c("edit1")->text == null){
}else{
$strpos = strpos( c("fmEdit->memo")->text, c("edit1")->text );
if ( $strpos === false ){
}else{
c("fmEdit->memo")->selStart = $strpos;
c("fmEdit->memo")->selLength = strlen( c("edit1")->text );
c("fmEdit->memo")->Perform(0xB7, c("fmEdit->memo")->selStart ,0);
c("fmEdit->memo")->setFocus();
}
} 

А можно ли как - то сделать что бы искал дальше ?

[vGhost]

Поиск не отвечает ;(

А пользовались?
тыкаем: richedit скроллинг

[malish]

Да да да да да да и еще раз!
Я понял про какую вы тему !
Ссылка битая.

[vGhost]

Как это битая, в той теме нет не одной битой ссылки, там либо код прям в теме написан, дибо двски выложенные на этом форуме, либо ссылки на микрософт.

[malish]

Та не..в этой теме Я понял про какую вы тему говорите.

[vGhost]

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

[malish]

Та всеравно ссылка битая. Ладно всё проехали

[xsnakes]

А пользовались?
тыкаем: richedit скроллинг

А там не в конец ли скролит? Во всех темах вроде в конец...
Я ведь сначала там искал... Там вроде все скролят в конец...


vGhost, ты дал ссылку такого вида, вместо ссылки на результат поиска
http://community.develstudio.ru/#
Потому она и не работает!

[malish]

А как что бы многократный поиск только именно от начала строки ?

[xsnakes]

http://community.develstudio.ru/show...ll=1#post36010
Просто при первом нажатии кнопки устанавливаешь c("fmEdit->memo")->selStart на 0. Поиск начнётся с 0, затем будет идти дальше...
Можно сделать галочку, искать ли с текущей позиции курсора или с начала.

Где-то надо держать переменную, которая будет отвечать за то, "начало поиска" или "процесс поиска"... При первом нажатии туда запишется, что идёт "процесс поиска" и не будет уже искать тоже самое с начала, а продолжит... после завершения поиска вернуть переменной значение "начало поиска".

Думаю понятно... Что тут не понятного при первом поиске ставить каретку на 0?

[malish]

Та нифига! Яуже столько перепробовал..пизец. щас пробую с помощью инкремента ... ;(

[vGhost]

А там не в конец ли скролит? Во всех темах вроде в конец...
Я ведь сначала там искал... Там вроде все скролят в конец...

Нет, там есть код который скролит на N строк, а также я где то ещё точно писал как скролить к нужной строке. Поиск по словосочетанию perform vGhost должен помоч в итоге, ток там много всего будет, хотя это много не плохо бы всё в решебник запихать..

И xsnakes, выйди в аську, "дело" есть.

vGhost, ты дал ссылку такого вида, вместо ссылки на результат поиска
http://community.develstudio.ru/#
Потому она и не работает!

Ява скрипты не отключайте в браузерах и всё будет работать: http://c.vghost.tk/dem/link.htm

З.Ы. есть у меня ещё интересный пример, прада с багом, но я не редактор делал тогда, а пытался идею донести как лучше сделать, если его кто до ума доведёт (баг исправит), получится не плохо имхо..
вот тема вобщем http://community.develstudio.ru/showthread.php/1171

[malish]

Как это поможет решить мою проблему ?)

[xsnakes]

Например так... Ну это просто...
Тут фигня в том, что каретка ставится на 0 перед поиском... Т.е. перед поиском юзер может поставить каретку обратно в конец...
Поэтому надо делать переменную global $find; и ставить туда например true, когда открываем поиск, а когда нажимаем поиск, ставить false.
Сделать условие если переменная true, то ставить каретку на 0 и искать иначе просто искать...

Короче надо подстраивать под свой проект код, а не писать всё что сказал xsnakes

Сделать например кнопку "Поиск ниже", "Поиск выше" как в EmEdit (по мне очень удобный редактор)

[malish]

Аха ) можно сказать копи паст моего кода..нельзя было просто написать c("richEdit1")->selStart = 0; ?

[xsnakes]

Твоего кода? Я свой код из фака скопировал!
Я тебе что не говорил? Злишь!...

Просто при первом нажатии кнопки устанавливаешь c("fmEdit->memo")->selStart на 0

[malish]

Хм..просто хотел по другому сделать..ну а теперь как искать текст вверх ЗНаю надоел но как то не получаеться..

[xsnakes]

Надо было мне я бы нашёл и сделал... И так уже не мало нашёл... На крайняк развернул бы текст задом на перёд
За тебя всё делать тоже не прикольно!

[malish]

Всё ? ты что тю тю ? там еще работы гора!

[xsnakes]

Повернут поиск в зад гора? )
Вот файл поиска по PHP редактору в DS
D:\Program Files\DevelStudio 3.0 alpha\system\dfm\uPHPEditor.php
В нём и покопайся, некоторые строки ссылаются на другие файлы, так что надо будет искать и другие файлы с функциями )

[malish]

Ссыль не кликабельна
Щас поисчу что нибудь...

[xsnakes]

Вот тебе счастье! Я о таком и не знал, как и о stripos, но потратив меньше минуты нашёл...
http://www.php.su/functions/?strripos

[malish]

class ev_fmPHPEditor_f_prev {
    
    static function onClick(){
        
        $GLOBALS['__findIndex'] -= 1;
        
        if ($GLOBALS['__findIndex']<0)
            $GLOBALS['__findIndex'] = count($GLOBALS['__find'])-1;
        
        ev_fmPHPEditor_f_text::onKeyUp(0, 13);
        
        $GLOBALS['__findIndex'] -= 1;
    }
} 

Переведите пожалуйста

[malish]

Вот тебе счастье! Я о таком и не знал, как и о stripos, но потратив меньше минуты нашёл...
http://www.php.su/functions/?strripos

Не хочет ;(

[xsnakes]

Ну ё моё... опять сомаму надо делать...

А всё дело в том, что оно ищет последний текст... т.е. чтобы найти пред последний, надо отрезать текст, ну или указывать отрицательную позицию, что было бы правильней!

Хотя не... отрицательная позиция не работает...

[malish]

Да там капец..ящас пробую, уже запутался

[xsnakes]

Та придётся резать строку... Я почти сделал, ток дето баг...

Хм... Заработало... Хз де ошибка была, написал заного, получилось!

$edit = c("richEdit1");
$selStart = strripos( substr($edit->text,0,$edit->selStart), c("edit1")->text );
if($selStart !== false){
 $edit->setFocus();
 $edit->selStart = $selStart;
 $edit->selLength = strlen( c("edit1")->text );
 $edit->Perform(0xB7, $selStart, 0);
} 

[malish]

СПАСИБО!
Я надеюсь я не сильно тебя достал )