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

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

Как проверить последний символ строки и...


Tempora ©   (2006-05-13 12:36:00) 

Есть переменная типа string.
Как убедиться чтобы она не оканчивалась на / (правый слеш).
И если она оканчивается, то автоматически его убирала.
Заранее спасибо.


Tempora   (2006-05-14 08:10:00) [1]

Спасибо.


Loginov Dmitry   (2006-05-13 12:44:00) [2]

begin...end ©   (13.05.06 12:42) [1]

Не успел :(


Loginov Dmitry   (2006-05-13 12:43:00) [3]

Используйте конструкцию:

if (условие) then (Операторы);

Еще см. Delete, Copy, SetLength.


begin...end   (2006-05-13 12:42:00) [4]

var
 S: string;
 L: Integer;
begin
 L := Length(S);
 if (L > 0) and (S[L] = '/') then
   SetLength(S, L - 1)
end


Наверх

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