Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
1. Aug 2018
Da war irgendwas mit umkopieren der Daten in bereits allokierten Speicher (delete), aber unsere Assembler Freaks wissen da besser Bescheid.
Gruß
K-H
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
1. Aug 2018
:oops:
Typischer Fall von das eine Denken und das Andere tippen!
Gruß
K-H
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
1. Aug 2018
@Redeemer
Dafür müßtest Du das erste nicht 0 suchen, und dann kannst Du es am Stück löschen.
i:=0;
if length(mystring)>0 then begin
repeat
if mystring<>'0' then inc (i,1);
until (mystring<>'0') or (i>=length(mystring));
if i>0 then delete(mystring,1,i);