werte auslesen und in ini schreiben hilfee

[slm]

Hallo

ich habe 2 dateien die eine ist die ini datei in der die werte geschrieben werden sollen
(ini öffnen lesen schreiben ist kein problem)

[01.09.2005]
feld1=4:45
feld2=5:45
feld3=6:35
feld4=13:31
feld5=17:11
feld6=20:14
feld7=21:34

[02.09.2005]
feld1=4:41
feld2=5:46
feld3=6:36
feld4=13:30
feld5=17:09
feld6=20:12
feld7=21:30


und die zweite ist die datei in der die werte enthalten sind

[01.09.2005]
1 4:39 5:45 6:35 13:31 17:11 20:14 21:34
2 4:41 5:46 6:36 13:30 17:09 20:12 21:32
3 4:43 5:48 6:38 13:30 17:08 20:10 21:30
.
.
.
30 4:53 5:55 6:45 13:28 17:01 19:59 21:19


jetzt soll aus 1 2 3... 30 das datum erzeugt werden und dann in die ini als schlüssel eingetragen werden

desweiteren sollen die uhrzeiten in die felder eingetragen werden und hier ist mein problem wie stelle ich das an.

bitte um hilfe hab nichts brauchbares gefunden.


mfg slm

[Luckie]

Mit Explode und dem Leerzeichen als Trennzeichen kannst du jede Zeile einfach zerlegen. Der Rest sollte sich von allein ergeben.

[Sharky]

Hai slm,

Zitat von slm:

..desweiteren sollen die uhrzeiten in die felder eingetragen werden und hier ist mein problem wie stelle ich das an. ...

Du müsstest jede einzelene Zeile deiner Datei auswerten.

Code:

1 4:39 5:45 6:35 13:31 17:11 20:14 21:34

Diese Zeile kannst z.B. mit der DelimitedText-Funktionalität der TStringListe aufteilen. (Oder mit dieser Funktion aus der Code-Library).

Hier mal etwas Pseudocode:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  sl : TStringList;
begin
  sl := TStringList.Create;
  try
    sl.Delimiter := ' ';
    sl.DelimitedText := '1 4:39 5:45 6:35 13:31 17:11 20:14 21:34';
    Datum := sl.Strings[0];
    feld1 := sl.Strings[1];
    // usw.
  finally
    sl.Free;
  end;
end;

[slm]

ok ich danke euch

denke hab jetzt meine anhaltspunkte





slm