Нужна функция для обрезания текста(см подр.)

[chiko666111]

Нужна функция на Дельфи, при передачи в которую String функция возвращает все, что идёт после знака "-".
Пример:
B:=Cut("one-two");
Переменная B будет равна "two"

[GreenWizard]

function Cut(const s: string): string;
begin
  Result := Copy(s, Pos('-', s) + 1, MaxInt));
end;

это для строк, которые точно содержат '-'

[FaTaL]

Сообщение от GreenWizard

function Cut(const s: string): string;
begin
  Result := Copy(s, Pos('-', s) + 1, MaxInt));
end;

это для строк, которые точно содержат '-'

А почему не?

Copy(s, Pos('-', s) + 1, Length(s))

[JUDAS]

Сообщение от FaTaL

А почему не?

Copy(s, Pos('-', s) + 1, Length(s))

а почему не

system.delete(S, 1, LastDelimiter('-',S));

п.с. проверь свою функцию на строке "скорый поезд Ростов-на-Дону - Москва"

Функция выглядит так:

function Cut(const  s: string): string;
begin
  Result := S;
  system.delete(Result, 1, LastDelimiter('-',Result)); 
end;

можно и так

function Cut(var  s: string): boolean;
var d : integer;
begin
  d:=LastDelimiter('-',s);
  result := d>0;
  if result then  system.delete(S, 1, d); 
end;

[Аватар]

"скорый поезд Ростов-на-Дону - Москва"

И что, где ТС спрашивает, что после последнего дефиса?

функция возвращает все, что идёт после знака "-".

Вполне логично предположить что все, что после первого

[Serge_Bliznykov]

JUDAS, кроме того, что автору топика нужно всё, что идёт после первого дефиса, ещё, на будущее, учтите, что операция delete крайне затратная, если в ней нет прямой необходимости, лучше её избегать.
Здесь она, например, не нужна.

[WorldMaster]

Сообщение от Serge_Bliznykov

операция delete крайне затратная, если в ней нет прямой необходимости, лучше её избегать.

Ну реально занудство ...

[Serge_Bliznykov]

Сообщение от WorldMaster

Ну реально занудство ...

угу. Оно!
просто не вижу смысла использовать очевидно неэффективный код, если можно использовать очевидно эффективный.

а так, да, согласен, занудство с моей стороны...

[WorldMaster]

Сообщение от Serge_Bliznykov

угу. Оно!
просто не вижу смысла использовать очевидно неэффективный код, если можно использовать очевидно эффективный.

а так, да, согласен, занудство с моей стороны...

А дайте пруф на delete. Чет мне теперь интересно стало что там внутри такого страшно не эффективного?

[Пепел Феникса]

Сообщение от WorldMaster

А дайте пруф на delete. Чет мне теперь интересно стало что там внутри такого страшно не эффективного?

в идеале лучше чтоб было только Pos/PosEx и только в конце Copy.
чтоб было как можно меньше выделений памяти.