В VCL работает правильно, а в KOL неправильно

← →
=Sniper= (2003-06-14 17:13) [0]

Procedure TForm1.addtagtofile(to_cho_vvesti : string);
var
s,s1: string;
begin
s:=copy(richedit1.text,0,richedit1.selStart);
s1:=copy(richedit1.text,richedit1.selstart,length(richedit1.text));
richedit1.text:=s + to_cho_vvesti + s1;
richedit1.text;
end;

проседура, которая изумительно работает в программе, которая написана с VCL
<a href= http://www.ogldelphi.km.ru/cgi-bin/bsdcc.pl?editor>HTML editor v.0.2.4 (164Kb)</a>
Неправильно работает в программе написанной с помошью KOL!!!
<a href= http://www.ogldelphi.km.ru/cgi-bin/bsdcc.pl?editor03b>HTML editor v.0.3.1 (35Kb)</a>

← →
Vladimir Kladov (2003-06-14 19:33) [1]

Не text, а RE_Text. В любом случае этот способ медленный, для начинающего сойдет. Вы серьезно таким способом надеетесь и текст размером 100Мбайт модифицировать? См. ReplaceSelection.

← →
=Sniper= (2003-06-14 19:46) [2]

Я более лучшего пока не придумал! :-) Я не думаю, что когда либо размер html" ки вообще перевалит за 1Mb :-))))
Я начинающий в KOL НО НЕ в Delphi! ;-)

← →
Vladimir Kladov (2003-06-14 20:00) [3]

Для html-ки бывает и 1М достаточно, чтобы его загрузка задумалась на полчаса, даже с локального диска (не думаю, что будет быстрее, если его отконвертить в richedit). Какими словами крыл я составителей описания JavaScript, которые умудрились главный индекс запихать в 1 html фал, размером больше 1 метра. (Хорошее описание, пришлось переделывать индекс для себя, бить его на 26 частей). А просто rich-документ размером больше 10М - это вполне реально. ReplaceSelection действительно помогает.

Я не обвиняю вас, в том, что вы начинающий. Просто предлагаю улучшить свой опыт в плане борьбы за скорость при работе с большими объемами данных, освоить более совершенные методы, что ли. Брать текст как большую строку, что-то с ним делать, потом засовывать все назад - несолидно.

← →
=Sniper= (2003-06-14 20:03) [4]

Ругается на строчку
copystr := richedit1.re_text (reText,false);
типа ему здесь "[" а не "(" скобку надо!

Чего-то я не нашёл ReplaceSelection! Где он?

← →
BaRToV (2003-06-14 20:20) [5]

2 =Sniper=

> Я начинающий в KOL НО НЕ в Delphi! ;-)
Качни эту прогу:
http://delphikol.narod.ru/progs/xHelpGenCm.zip

← →
=Sniper= (2003-06-14 20:28) [6]

Есть уже! :-) Ещё утром взял! :-)

← →
BaRToV (2003-06-14 20:34) [7]

> Чего-то я не нашёл ReplaceSelection! Где он?
Там и ищи, все ответы там...

← →
=Sniper= (2003-06-14 21:42) [8]

Да млин! :-] Где он!!!????

← →
Vladimir Kladov (2003-06-14 21:48) [9]

>ему здесь "[" а не "(" скобку надо!
не врет, именно [ ему и надо. Это свойство-массив, а не функция.

← →
=Sniper= (2003-06-15 13:03) [10]

2 BaRToV:
Я не могу найти нигде этот ReplaceSelection!!! Где он???

← →
Vladimir Kladov (2003-06-15 16:07) [11]

Сейчас научу. Открываем в редакторе Delphi файл KOL.PAS, нажимаем Ctrl+F, вводим слово ReplaceSelection, и нажимем ENTER.

← →
=Sniper= (2003-06-15 17:43) [12]

Млин а я думал что это пример на чьём-то сайте лежит!!!
Во я дал!!! LOL

В VCL работает правильно, а в KOL неправильно Найти похожие ветки