"Delete" funktioniert nicht

[Sir Rufo]

Zitat von NeruvonoS:

ALSO
das programm läuft.
das macht doch echt kein spaß, warum gibt denn Delete keinen String wieder aus?
Grummel
nagut danke trotzdem euch beiden

Grüße
NeruvonoS

Wat macht ihr denn hier für ein Geschi**e um die Funktionalität von Delete.
Wenn die gewünschte function/procedure nicht ganz das macht, was sie soll,
dann definier einfach deine eigene:

Delphi-Quellcode:

function DeleteStr( const s : string; Index, Count : integer ) : string;
begin
  Result := s;
  Delete( Result, Index, Count );
end;

Jetzt hast du eine function, die den Ursprungs-String nicht ändert und einen String zurück liefert.

cu

Oliver

PS: Das ganze Trara um 4 Zeilen Code