Вверх ↑
Разработчик
Ответов: 4698
Рейтинг: 426
#1: 2010-07-02 12:55:00 ЛС | профиль | цитата
После беглого осмотра есть следующие замечания:
1. Прототип компонента нерабочий (не найден метод doSplit).
2. Свойство Str здесь полностью лишнее, если заранее известна строка, которую надо разделять, гораздо лучше (и со стороны готовой программы, и со стороны разработчика) разделить ее по нужной позиции старым способом (с помощью мозгов).
3. Вот эта часть кода не совсем верна логически (то же самое во втором методе doPart) :
#pas
begin
lef:=Copy(str,1,position);
_hi_OnEvent(_event_onLeft, lef);
righ:=Copy(str,position,len - position);
_hi_OnEvent(_event_onRight, righ);
_hi_OnEvent(_event_onPart, ');
end;
Сначала надо присвоить значение всем переменным,а потом вызывать событие, чтобы не было вот такого, как в этой схеме: code_19169.txt
4. Неверно разбивается строка при свойстве Mode = Position, в примере твоем она не "захватывает" последнюю скобку в строке для выдачи в поток правую часть, а так же в твоем примере при том же значении св-ва Mode в onLeft в конце выдается ":", а в onRight в начале ":" - повторение символа-разделителя. Все эти ошибки - неверное определение начала и конца нужной части

P.S: если не сможешь сам поправить, обращайся, подтолкну в нужном направлении
карма: 10
0
файлы: 1code_19169.txt [1.8KB] [474]