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

← →
Tempora (2006-05-13 12:36) [0]

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

← →
begin...end © (2006-05-13 12:42) [1]

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

← →
Loginov Dmitry © (2006-05-13 12:43) [2]

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

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

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

← →
Loginov Dmitry © (2006-05-13 12:44) [3]

← →
Tempora (2006-05-14 08:10) [4]

Спасибо.

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