Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


=Sniper= ©   (2003-06-14 17:13:00) 

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>HTMLeditor v.0.2.4 (164Kb)</a>
Неправильно работает в программе написанной с помошью KOL!!!
<a href= http://www.ogldelphi.km.ru/cgi-bin/bsdcc.pl?editor03b>HTMLeditor v.0.3.1 (35Kb)</a>


=Sniper=   (2003-06-15 17:43:00) [1]

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


Vladimir Kladov   (2003-06-15 16:07:00) [2]

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


=Sniper=   (2003-06-15 13:03:00) [3]

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


Vladimir Kladov   (2003-06-14 21:48:00) [4]

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


=Sniper=   (2003-06-14 21:42:00) [5]

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


BaRToV   (2003-06-14 20:34:00) [6]

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


=Sniper=   (2003-06-14 20:28:00) [7]

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


BaRToV   (2003-06-14 20:20:00) [8]

2 =Sniper=

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


=Sniper=   (2003-06-14 20:03:00) [9]

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

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


Vladimir Kladov   (2003-06-14 20:00:00) [10]

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

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


=Sniper=   (2003-06-14 19:46:00) [11]

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


Vladimir Kladov   (2003-06-14 19:33:00) [12]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо