Пример кода №5

Предыдущая тема Следующая тема Перейти вниз

Пример кода №5

Сообщение автор Marina-T в Чт Ноя 05, 2015 10:40 pm

Код:

...
if(lkPath[Length(lkPath)] <> '\')then
lkPath := lkPath + '\';
...

Код показывает плохое знание системных модулей, т.к. для данной операции есть стандартная функция IncludeTrailingPathDelimiter. Также приведенный пример кода не защищен от ошибки в случае строки с нулевой длиной.
avatar
Marina-T
Admin

Сообщения : 33
Дата регистрации : 2015-11-04
Возраст : 31

Посмотреть профиль http://auslogics.online-talk.net

Вернуться к началу Перейти вниз

Re: Пример кода №5

Сообщение автор SmartGuy в Пн Ноя 23, 2015 10:08 pm

Кроме того код не кросплатформенный. С тенденцией Delphi в сторону кросплатформы, лучше изначально писать код, который будет работать везде. Возможно он еще пригодится.

SmartGuy

Сообщения : 5
Дата регистрации : 2015-11-20

Посмотреть профиль

Вернуться к началу Перейти вниз

Re: Пример кода №5

Сообщение автор DELPHI team Auslogics в Вт Ноя 24, 2015 10:42 pm

Данный пример показывает неверное использование. В комментарии сказано, что нужно использовать функцию IncludeTrailingPathDelimiter, которая и является кросплатформенной.
avatar
DELPHI team Auslogics

Сообщения : 11
Дата регистрации : 2015-11-21

Посмотреть профиль

Вернуться к началу Перейти вниз

Re: Пример кода №5

Сообщение автор Спонсируемый контент


Спонсируемый контент


Вернуться к началу Перейти вниз

Предыдущая тема Следующая тема Вернуться к началу


 
Права доступа к этому форуму:
Вы не можете отвечать на сообщения