-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Jetzt habe ich es hinbekommen! Hatte noch einen Fehler drin! Mein Array war immer so groß wie die Listbox, es sollte aber nur so groß wie mein Zähler sein! Nun geht es mit low und high!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Low( DynArray) = 0
High( DyArray) = 59
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Wenn ich das so 1:1 übernehme, dann bekomme ich als Ergebnis 0 heraus!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
:shock: Habe mir deins und marabu's nochmal angeschaut. Aber wie definier ich nun low und high für mein Beispiel?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Ahhh, Danke, jetzt habe ich es auch verstanden! Wie rum ist es denn nun besser, oder ist es egal!
for i:=1 to zaehler do
begin
gesamtzeit:=gesamtzeit+DynArray;
Oder:
for i:=0 to zaehler-1 do
begin
gesamtzeit:=gesamtzeit+DynArray;
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Im Moment steht er auf 40! Also es werden 40 Zeiten aus meiner Listbox in das Array geschrieben und dann zusammen addiert!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Ja schon klar, aber wieso geht das denn nicht:
for i:=0 to zaehler do
begin
gesamtzeit:=gesamtzeit+DynArray;
Kommt jedenfalls ein falsches Ergebnis raus!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Soooo, nun geht's! Ich hatte die Objektvariable nicht im PrivateTeil drin stehen! Nochmals vielen Dank!
Habe nun eine Schleife in der ich den Inhalt zusammen zähle:
for i:=1 to zaehler do
begin
gesamtzeit:=gesamtzeit+DynArray;
Warum muss ich eigentlich unten nochmal i-1 schreiben? Ansonsten kommt ein falsches Ergebnis raus!
Trotzdem, nochmal vielen Dank!
Gruß!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Habe einen Fehler: "Im Projekt ist eine Exception der Klasse EAccesViolation aufgetreten. Meldung: Zugriffsverletzung bei Adresse...."
Und markiert wird dann anschließend diese Zeile hier:
DynArray := StrToTime(ListBox2.Items);
Gruß!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Ich verstehe nicht was die Function macht! Wo liest sie die Daten aus der Listbox ein?
Und in der Procedure:
dda := StrToTimeArray(RichEdit.Lines);
total := Math.Sum(Copy(dda, 0, 3));
Was wird da zusammen addiert?
Kann ich das nicht einfach dann so machen:
SetLength(listbox1.count-1)
????
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Wie funktioniert das von marabu!? Kann dort mit vielen Befehlen nicht viel anfangen!
Gibt es nichts einfacheres? Wo man z.B. die obere Grenze eines Arrays mit listbox1.count-1 festlegen kann.
Gruß!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Ich habe es jetzt so:
zeiten:array of TDateTime;
for i:=1 to listbox2.Count-1 do
begin
zeiten:=strtotime(listbox2.Items);
end;
Uns so geht es auch!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Irgendwie funtkioniert es noch nicht so!
Ich habe jetzt:
for i:=0 to listbox2.Count-1 do
begin
zeiten:=strtoTime(listbox2.Items);
end;
Wenn ich das Array auslese kommt nur unsinniges bei raus!
Gruß!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Hat sich erledigt. Habe den Fehler selber gefunden!
Habe jetzt nur noch die Frage, wie kann ich z.B. die ersten 30 Einträge in dem Array zusammen addieren kann!
Möglichst mit einer Schleife!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Sorry, hatte einen Fehler. Ich meinte natürlich nicht das Memo sondern:
for i:=1 to listbox1.Count-1 do
begin
zeiten:=strtoTime(listbox2.Items);
end;
Jetzt gehts erst einmal von der Syntax. Aber nun schreibt er: Listenindex überschreitet das Maximum (59)!
"zeiten" ist meine globale Variable
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Wenn ich dann aber das Array füllen möchte mit:
for i:=1 to listbox1.Count-1 do
begin
zeiten:=memo1.Lines;
end;
Dann kommt immer der Fehler: Inkompatible Typen: 'TDateTime' und 'String'
Gruß!
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
12. Jul 2007
Hallo an Alle!
Ich habe eine gefüllte Listbox (im Zahlenformat TDateTime z.B. "00:13:34").
Nun möchte ich den Inhalt der Listbox in ein Array einlesen lassen. Aber ich habe keine Ahnung welchen Datentyp ich dafür nehmen soll?!
time:array of TDateTime;
So geht's wohl anscheinend nicht!
Und meine zweite Frage ist, wenn ich das Array mit den Daten habe, dann soll er mir in einer Schleife...