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

[Аватар]

artemavd, так и спрашивать нужно было - как удалить последний символ. StringReplace хоть и умеет заменять символы на '', но это все таки горазо в большей степени удаление, чем замена

[spamer]

artemavd, это вы таким методом решили добавлять запятые после нужных слов, а последнюю удалять, т.к. лишняя выходит? Если да, то это немного бредовый алгоритм...

[artemavd]

на будущее, будь ласка, говори что надо удалять символ, а не заменять его, ибо это разное.

Ок, учту.

artemavd, так и спрашивать нужно было - как удалить последний символ. StringReplace хоть и умеет заменять символы на '', но это все таки горазо в большей степени удаление, чем замена

Ага, понял

Если да, то это немного бредовый алгоритм...

Тем не менее мою задачу это решает и я не вижу минусов. Приведи пример когда это может не сработать, тем самым доказав, что это бредовый алгоритм? Я его не считаю бредовым.

[Stilet]

Приведи пример когда это может не сработать

Пожалуйста: :1,:2,:3,,,,,,,,,,,,,,,,
Или скажешь, что такого у тебя и быть не может?
Соответственно:

s:=Trim(Edit.Text);
i:=Length(s);
while (i>1)and(not IsCharAlphaNumeric(s[i])) then dec(i);
Edit.Text:=Copy(s,1,i); // Или Copy(s,1,i-1) нужно проверять

[artemavd]

Или скажешь, что такого у тебя и быть не может?

Не поверишь, Виталий! Такого не будет точно, но, если твой код учитывает такое и он работает как предложенный ранее, то я его применю.

[spamer]

Вот:

procedure Comma(var aText: String; const aValue: String);
begin
    if (aValue = '') {or (aValue = ',') 
=> По желанию, если нужны отдельные запятые в строке - убираем доп. условие, иначе если
 не нежны отдельные запятые в строке - вводим доп. условие} then
        Exit;
    if (aText <> '') then
        aText := aText + ', ';
    aText := aText + aValue;
end;

// ---
var
s: String = '';
// ---
  Comma(s, '1');
  Comma(s, '2');
  Comma(s, '3');
  Comma(s, ',');
  Comma(s, ':');

Тем не менее мою задачу это решает и я не вижу минусов.
Приведи пример когда это может не сработать, тем самым доказав, что это бредовый алгоритм? Я его не считаю бредовым.

Сори, немного не так высказался, просто твой алгоритм не совсем оптимальный...имхо

[Stilet]

Не поверишь

Поверю. Если данные формируются машинным способом без ошибок.
Просто лишний раз предохраняться не помешает
На своей шкурке убедился