-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Satty67, Du hast recht. :cheers: Menno, ich hatte die Zufallsdatums also garnicht in die Listbox aufgenommen.
Mit 'Items.add' gehts.
Aber noch was:
Ich habe vor diesen letzten Versuchen mit QuickSort, ectra, die im hiesigen Forumthread beschriebenen 'ShellSort'- und 'BubbleSort' Routinen probiert und die funktionieren eben auch mit 'Listbox1.items.
Ist das nicht merkwürdig?
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Hier das ganze Dingens:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Ich werd' nicht mehr. Habe Dein hiesiges Beispiel mit dem Zeiger auf CompareDates probiert und kriege schon wieder diese Fehlermeldung, daß ich das Maximum überschreite. Das ist doch nicht normal?!?
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Nö, geht nicht:
procedure TForm1.Button1Click(Sender: TObject);
var
MStr:TStrings;
Lo,Hi:integer;
begin
MStr:=TStrings.Create;
Lo:=0;
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Weils nicht funzt, Toms.
Schau mal hier:
http://www.siteupload.de/t975238-CustomSorterrorListboxsortierenJPG.JPG
Diesen Fehler kriege ich selbst, wenn ich z. B. diesen hier mache:
var
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
4. Jul 2009
Ein 'Hallo' an Popov und alle Delphianer hier.
Da bin ich wieder. Ich habe mal einige Vorschläge versucht umzusetzen und bin gescheitert.
Popov, Deine 'Listboxsortieren' Routine hängt an folgendem Problem:
EStringlistError:"Listenindex überschreitet das Maximum 199'".
Also von 400 Einträgen ist das ungefähr die Hälfte und das Problem hängt hier:
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
28. Jun 2009
Ich danke euch. Nein nein, ich ignoriere nichts. Ich nehme alle Vorschläge dankend an.
Habe nur gerade die wahnwitzige Idee, ein kleines Proggi mit mehreren Listboxen zu machen, die gleichzeitig die Daten mit verschiedenen Routinen sortiert. Ich hatte vor Tagen nur begonnen, die Quicksort-Routine ins Programm zu schreiben und zu verändern. Deshalb wollte ich diese erst vollenden.
Popov, die...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
28. Jun 2009
Uff, soviel Hilfe und Unterstützung...Danke Euch :-D
Ich habe grad Zeit und versuche mal die Listbox mit einer im Forum gefundenen QuickSort Routine zu
sortieren. Die gefundene Routine sortiert aber ein Integer - Array. Mein Versuch eine Stringlist zu sortieren endet erstmal hier:
"...EStringlisterror-Exception...Listenindex überschreitet das Maximum(400)". Liegts am '-1' Item der...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
24. Jun 2009
Danke Dir luckie,
werde das morgen mal probieren. Würde mich interessieren, was 'Listbox.sorted' für ein Algorithmus ist. Mal sehen. .-)
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
24. Jun 2009
Bei 400 Einträgen braucht die Sortierung ~20 Sekunden. Das ist zu lange. Meine Routine braucht nur etwas unter 1 Sekunde. Ich suche eine saubere Möglichkeit des Sortierens.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
24. Jun 2009
Hier bin ich wieder. Nichts für ungut, aber die Routine mit Bubblesort ist sehr sehr langsam.
Ich greife also hier wieder auf 'Listbox.sorted' zurück:
procedure TForm1.sortListe3(L:TListbox);
var i: integer;
Zeilendatum:String;
Zeilenrest:string;
temp:string;
doubleTmp:double;
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
30. Mai 2009
DANKE LUCKIE!
Dein Code funzt einwandfrei, ich bin begeistert.
Du bist wohl auch beruflich Programmierer. :-)
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
30. Mai 2009
Ok, das funzt nicht, Satty67. Wenn ich Sorted vorher auf False setze, ist alles durcheinander.
Ich versuchs mal mit Luckies Code.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
30. Mai 2009
Hallo Luckie .-)
Wenn Deine Lösung funzt, bin ich happy.
Ich habe früher schon mal versucht, mit Quick- und Bubble Sort was anzufangen und bin
gescheitert.
Ich danke Dir herzlich und werde die Routine gleich mal ausprobieren :thumb:
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
30. Mai 2009
Hallo sx2008,
das ist eine sehr einfache Lösung, aber:
Die Liste läßt sich nur einmal sortieren und dann kriege ich einen eConvert Error:
'1920-01-31' ist kein gültiges Datum.
Hier die Func:
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
30. Mai 2009
Hallo Satty67
erstmal Danke für Deine Antwort :-)
Du schreibst:
Die Liste wird ohne Tage gespeichert, die Tage sind werden in der 'sortieren Funktion eingefügt und entfernt. Sie dienen nur dem Sortiervorgang und müssen danach entfernt werden, weil sonst das weitere Proggi nicht funktioniert - es muß für weitere Funktionen das Datum an erster Stelle stehen.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Codix32,
29. Mai 2009
Hi Leute,
ich raffs nicht. Habe ein Programm, das in einer Listbox Text mit vorgestelltem Datum ausgibt.
Meine Funktionen können die Listbox auch sortieren und das Ganze als Text Datei abspeichern.
Das Problem ist, daß ich das Programm jedesmal schliesen und neustarten muß, damit das Sortieren funktioniert. Wird nach dem Start in die Listbox mehr als ein Eintrag gemacht und mehr als einmal...