Мастера DELPHI, Delphi programming community Рейтинг@Mail.ru Титульная страница Поиск, карта сайта Написать письмо 
| Новости |
Новости сайта
Поиск |
Поиск по лучшим сайтам о Delphi
FAQ |
Огромная база часто задаваемых вопросов и, конечно же, ответы к ним ;)
Статьи |
Подборка статей на самые разные темы. Все о DELPHI
Книги |
Новинки книжного рынка
Новости VCL
Обзор свежих компонент со всего мира, по-русски!
|
| Форумы
Здесь вы можете задать свой вопрос и наверняка получите ответ
| ЧАТ |
Место для общения :)
Орешник
Коллекция курьезных вопросов из форумов
Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / rsdn.org

 
Чтобы не потерять эту дискуссию, сделайте закладку « предыдущая ветвь | форум | следующая ветвь »

Ошибка в WStrRScan !!! [Delphi, Windows]


QAZ   (15.02.15 16:08

в функции которая используется в частности в ExtractFileName, зачем-то добавлен код, изза которого в ExtractFileName отрезается первый символ результата
function WStrRScan(const Str: PWideChar; Chr: WideChar): PWideChar;
begin
 Result := Str;
 while Result^ <> #0 do inc( Result );
 while (DWORD( Result ) >= DWORD( Str )) and
       (Result^ <> Chr) do dec( Result );
 if (DWORD( Result ) < DWORD( Str )) then
   Result := nil
 else inc(Result); <<<<<<--вот эта строка !!!
end;


версия КОЛ 3.22
естественно с директивой UNICODE_CTRLS


ParanoiS ©   (16.02.15 11:27[1]

Обсуждалось уже. Правь KOL.pas, да и всё.


QAZ   (16.02.15 15:53[2]

эт понятно, главно чтоб автор помнил


ParanoiS ©   (03.03.15 20:07[3]

оказалось, запомнил! :) в новой версии поправлено.


Rayssa   (25.11.15 04:04[4]

Удалено модератором


версия для печати

Написать ответ

Ваше имя (регистрация  E-mail 







Разрешается использование тегов форматирования текста:
<b>жирный</b> <i>наклонный</i> <u>подчеркнутый</u>,
а для выделения текста программ, используйте <code> ... </code>
и не забывайте закрывать теги! </b></i></u></code> :)


Наверх

  Рейтинг@Mail.ru     Титульная страница Поиск, карта сайта Написать письмо