Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by turboPASCAL,
11. Dez 2009
Muss man auch nicht. In der Function wird Result automatisch geleert.
sicherlich, guter Style ist es nicht.
Mit der Geschwindigkeit kann es schon so sein, da Setlengt den Stringzähler
" s := x " (klappt ja bei Delphi nur noch per Umweg ) den ben. Platz
gleich reserviert ohne ihn jedes mal erneut um eins zu erhöhen.
Vill. bin ich auch nur zu müde um richtig nachdenken zu können. ;)
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by turboPASCAL,
11. Dez 2009
Hi,
ich verstehe euren Programmiertechnischen Aufwand nicht. :duck:
function ReverseAnsiString(const s: Ansistring): Ansistring;
var i : integer;
begin
for i := length(s) downto 1 do
Result := Result + s;
end;