Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
AW: führende null entfernen
1. Aug 2018, 20:35
KodeZwerg das Problem ist diese Zeile:
while (Input[i] = LeadChar) do inc(i);
Das kann bei einem String der komplett aus LeadChars besteht in die Hose gehen, weil zumindest mal Input[Length(Input)+1] gecheckt wird, was mit ein bisschen Pech knallen kann.
Deswegen müsste es
while (i <= Length(Input)) and (Input[i] = LeadChar) do inc(i);
heißen
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
|