Скачать: CL | DM;

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

← →
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]

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

Не успел :(

---

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

Спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.048 c