Forum: Sonstige Fragen zu Delphi
Delphi
by jfheins,
18. Okt 2008
Wenn ichs dir sagen darf: Hast du nicht ;)
Das was du gemacht hast ist das, was ich dir oeben vorgeschlagen habe, und was sich Bucketsort nennt. Du hast es zwar etwas umständlich gemacht, aber es ist die gleiche Logik ;)
Ich habe nur das Array nicht alsfeld:array of byte;deklariert, sondern alsfeld:array of byte;
for i := 1 to length(edit1.text) do
for j := 1 to 26 do
if...
Forum: Sonstige Fragen zu Delphi
Delphi
by jfheins,
18. Okt 2008
Oder du nimmst ein array of Integer dass du mit 0 initialisiertst, und dann den String durchgehstvar
arr: array of Integer;
str: String;
i: Integer;
c: Char;
begin
for c=low(arr) to high(arr) do
arr = 0;
for i=1 to length(str) do