Bubblesort Array of String.

[Blueser]

Hi Leute,

ist es möglich die tstringlist doch noch in array umzuwandeln?
oder zumindest die listbox als array?

vielen dank im voraus!

würde mich um eine muster-syntax serh freuen!
muss aber leider bubblesort sein.

vielen vielen dank!

[Blueser]

edit: ich könnte ja jeden eintrag, der in der listbox angezeigt wird - also jede zeile - als ein integer definieren.

aber wie mach ich das??

[DeddyH]

Hallo und Willkommen in der DP :dp:,

sry, für mich ist das momentan ziemlich wirres Zeug, was Du da postest. Was genau möchtest Du denn erreichen, eine Stringliste mit Bubblesort sortieren?

[Uwe Raabe]

Zitat:

Zitat von DeddyH (Beitrag 1195801)

sry, für mich ist das momentan ziemlich wirres Zeug, was Du da postest.

+1:thumb:

[Blueser]

hi und danke für die antwort!

also :D :

ich arbeite mit einer tstringlist. ich habe schon versucht aus der tstringlist ein array zu machen, jedoch mag der kompiler das irgendwie nicht.

die aufgabe sieht folgendermaßen aus:

ich soll alles was von edit1.text in die listbox - und somit auch in der liste des arbeitsspeichers ist, welche ich ja mit tstringlist angelegt habe - geschrieben wird mit dem bubblesort algorithmus sortieren.

jedoch auf der basis eines arrays.... nun weiß ich nciht mehr weiter..

[Sir Rufo]

Also quasi so:

Größe des Arrays festlegen
Jeden String aus der Stringlist in das Array kopieren
Array sortieren

[DeddyH]

Bist Du wirklich sicher, dass Du die Daten extra noch in ein Array kopieren sollst? Das macht in meinen Augen keinen Sinn, nicht einmal als Übung :gruebel:

[Uwe Raabe]

Zitat:

Zitat von Sir Rufo (Beitrag 1195807)

Also quasi so:

Größe des Arrays festlegen
Jeden String aus der Stringlist in das Array kopieren
Array sortieren

Oder man hat eine aktuelle Delphi-Version und verwendet TStrings.ToStringArray. Nach dem Sortieren bekommt man das Array per TStrings.AddStrings dann auch wieder in die StringList (Clear nicht vergessen).

[Blueser]

hi leute!

ja genau so!

mein lehrer sagte es halt so. :?

edit: achso! d.h. also:

var
liste: array [1..5] of tstringlist.addstrings; ??

und die anweisung für den arbeitsspeicher sieht dann so aus(?):
liste.tstringlist.addstrings.create; (?)

[DeddyH]

OK, dann deklariere Dir eine Array of string-Variable, setze sie mit SetLength auf die Anzahl der Stringlist-Einträge, kopiere letztere dann hinein und sortiere sie. Vermutlich sollst Du dann im Anschluss das Array wieder zurückkopieren, das geht dann analog andersherum mittels einfacher Zuweisung.

[Sir Rufo]

Zitat:

Zitat von Uwe Raabe (Beitrag 1195810)

Zitat:

Zitat von Sir Rufo (Beitrag 1195807)

Also quasi so:

Größe des Arrays festlegen
Jeden String aus der Stringlist in das Array kopieren
Array sortieren

Oder man hat eine aktuelle Delphi-Version und verwendet TStrings.ToStringArray. Nach dem Sortieren bekommt man das Array per TStrings.AddStrings dann auch wieder in die StringList (Clear nicht vergessen).

Wenn es um die Methoden von TStrings gehen würde, hätte ich das anders geschrieben:

TStrings.Sort

Aber es geht wohl um eine Übung, wie man arrays befüllt und sortiert (nach alter Väter Sitte) ;)

EDIT:

@Uwe und jetzt hast du auch noch Verwirrung gestiftet :mrgreen:

[Blueser]

der bubblealgorithmus ist ja kein problem.

ich muss nur dieses verdammte tstringlist als array festgelegt bekommen :D

[Uwe Raabe]

Zitat:

Zitat von Sir Rufo (Beitrag 1195815)

@Uwe und jetzt hast du auch noch Verwirrung gestiftet :mrgreen:

Nee, nä? Sei froh, daß ich keinen Class-Helper empfohlen habe :wink:

[Blueser]

hier mein beitrag im anderem forum:

scheint so ein ungeschriebenes gesetz zu sein...

http://forum.delphi-treff.de/showthr...Integer-setzen!

[DeddyH]

Ohne Fehlerprüfungen:

Delphi-Quellcode:

(* Falls noch nicht verfügbar:
  type
    TStringArray = array of string *)

procedure TStringsToArray(Source: TStrings; Dest: TStringArray);
var
  i: integer;
begin
  SetLength(Dest, Source.Count);
  for i := 0 to Source.Count - 1 do
    Dest[i] := Source[i];
end;

[Blueser]

hi und danke für die antwort!

ich werd mich da jetzt mal ransetzen und versuchen nach dem heutigen tage, an dem ich 2 klausuren geschrieben habe - es zu raffen :-D:-D:-D

vielen dank nochmal!

sorry für mein chinesischen satzbau :D

[Sir Rufo]

Zitat:

Zitat von Uwe Raabe (Beitrag 1195820)

Zitat:

Zitat von Sir Rufo (Beitrag 1195815)

@Uwe und jetzt hast du auch noch Verwirrung gestiftet :mrgreen:

Nee, nä? Sei froh, daß ich keinen Class-Helper empfohlen habe :wink:

:thumb:

[Uwe Raabe]

Fast:

Delphi-Quellcode:

procedure TStringsToArray(Source: TStrings; var Dest: TStringArray);

[DeddyH]

Japp, das vergess ich regelmäßig bei dynamischen Arrays als Parameter :mrgreen:

[PhilmacFLy]

Noch besser

Delphi-Quellcode:

procedure TStringsToArray(const Source: TStrings; var Dest: TStringArray);

Dass man ja nix am Source verändern kann :)

[DeddyH]

Source ist eine Instanz und somit ein Pointer. Der Unterschied liegt hier lediglich darin, dass keine Kopie, sondern der Originalzeiger übergeben wird. Rein logisch ändert sich damit gar nichts.