Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.05.18;
Скачать: CL | DM;

Вниз

буфер. ричедит.   Найти похожие ветки 

 
Апостля   (2008-04-16 16:50) [0]

такая проблема. иногда выполняет процедуру, иногда просто оставляет ричэдит пустым. процедура:
procedure TForm1.searchtext(abc: string; size: integer; minus: integer);
var startpos,pos,endpos:integer;
begin
with richedit1 do begin
startpos:=0;
endpos:=length(richedit1.text);
     SetFocus;
     pos := FindText(abc,startPos,endPos,[stMatchCase]);
     SelStart:=pos-minus;
     SelLength := size;
     cutToClipBoard;
end;
richedit1.Clear;
richedit1.PasteFromClipboard;
end;
и еще вопрос, раз уж профи тут:
почему по подобной процедуре не ищет русский текст? я так понимаю он в буфер копирует в другой кодировке чтоли.. реально ли это обойти?


 
tesseract ©   (2008-04-16 16:55) [1]

Отладчик в руки.

>   SelStart:=pos-minus;
>   SelLength := size;


Здесь скорее всего "иногда " и случаеться.


 
Апостля   (2008-04-16 17:21) [2]

просто непонятно, что при одних и тех же входных переменных и при одинаковом тексте работает "через раз".. ладно, пасиб за ответ, попробуем с отладчиком потестить..


 
Апостля   (2008-04-16 17:22) [3]

и насчет второго вопроса подскажите, кто знает в чем трабл..



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

Текущий архив: 2008.05.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
2-1208585538
Мастак
2008-04-19 10:12
2008.05.18
Процесс не может получить доступ к файлу


2-1208239581
Антон Вл.
2008-04-15 10:06
2008.05.18
ehLib


15-1207309630
Zvr@b
2008-04-04 15:47
2008.05.18
Правила составления ТЗ для программистов


15-1207046845
pwr
2008-04-01 14:47
2008.05.18
Что б добавить?


4-1188896231
celerons
2007-09-04 12:57
2008.05.18
RAS WIN API Флаги при создании VPn