Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Habe eine Lösung für mein Problem gefunden:
for i := 0 to zaehler-1 do
begin
if Trim(ListView1.Items.Item.caption)='+491' then
begin
DynArray2 := StrToTime(ListView1.Items.Item.SubItems);
end;
end;
for i := Low(DynArray2) to High(DynArray2) do
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Super! Jetzt klappt's! Nun muss ich mir mal Gedanken machen, wie ich das mit dem Prüfen des Inhalts hinbekomme! Und das er dann was mit dem Inhalt in der zweiten Spalte (gleiche Zeile macht).
Ist es sinnvoll die komplette erste Spalte mit RegExpr zu durchsuchen oder gibt es da etwas einfacheres?
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Ahhhh, stimmt!
Wie ist den die Syntax um die 2. Spalte von oben nach unten in mein Array zu lesen!
Danke.
Gruß!
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Einen Ansatz habe ich noch nicht. Da ich voher noch ein Problem habe!
Habe ein dynamisches Array und will es mit dem Inhalt der zweiten Spalte füllen!
for i := 0 to zaehler-1 do
DynArray := StrToTime(li.subItems);
Bekomme aber jedesmal ein "Überschreitet maximum(1). Das komische ist: Wenn ich mir li.subItems anzeigen lasse, zeigt er mir den Inhalt der letzten Zeile an. Dann ist das mit dem...
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Danke!!!! Nun geht es so wie ich möchte!
Wie kann ich denn jetzt den Inhalt prüfen. Ich hatte mir das so vorgestellt: Es wird in Spalte 1 Zeile für Zeile nachgeschaut. Wenn ein bestimmter Inhalt (bestimmte Zahl) gefunden ist dann soll er mit dem Inhalt in der zweiten Spalte (aber der gleichen Zeile) etwas machen!
Gruß!
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
Hier nochmal meine Vorstellung von dem Programm:
- ich habe ein Memo welches mit RegExpr nach bestimmten Zeichen durchsucht wird
- die Ergebnisse sollen in eine Spalte einer Listview
- danach soll eine zweite Spalte (von der ersten Zeile angefangen)der Listview einträge aus einer vorhandenen Listbox übernehmen!
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
17. Jul 2007
So kann ich es nicht machen! Da ich mit RegExpr eine Spalte füllen lassen möchte!
try
r.Expression := '{2}:{2}:{2}';
if r.Exec(Memo1.Lines.Text) then
repeat
listbox1.items.Add(r.Match); //hier soll er es in Zukunft in eine Spalte der Listview eintragen
until not r.ExecNext;
finally
r.Free;
l.Free;
Forum: Object-Pascal / Delphi-Language
Delphi
by Testy,
16. Jul 2007
Hallo!
Ich habe eine Listview mit zwei Columns! In die 1. Spalte lasse ich zahlen mir RegExpr einlesen.
Im nächsten Schritt möchte ich etwas in der zweiten Spalte einlesen lassen.
Nun habe ich aber das Problem, dass er nicht in der ersten Zeile (in der zweiten Spalte) anfängt, sondern unter der letzten Zeile!
Die erste Spalte lese ich so ein:
ListItem := listview1.Items.Add;
...