Suche Idee: Verlauf

[d3zemb3r]

Hallo,
momentan sitze ich an einer idee lücke.
Ich habe einen Webbrowser programmiert, und würde nun gerne den Verlauf speichern.

Er soll in einer .txt gespeichert werden, und mit datum ausgegeben werden wann es aufgerufen wurde.

Welche Art von Komponente wäre die sinnvollste, und wie lese ich diese daten aus?

[jaenicke]

Eine Komponente brauchst du da nicht, es reicht eine Klasse wie TStringList. Je nachdem wie umfangreich du das machen willst.

Möglich wäre auch eine nach Datum kategorisierte INI und TIniFile.

[d3zemb3r]

hmm.

wie würde ich die daten denn in eine StringList lesen??
Geht es auch die Einträge z.B

url1|datum1
url2|datum2

[jaenicke]

Du könntest z.B. "Datum+Zeit=Url" in jede Zeile schreiben. Also DateTimeToStr(now) als Name des Wertes und die Adresse als Wert. Zugreifen kannst du darauf dann mit Values, Names und ValueFromIndex oder so.

Allerdings dauert da die Suche dann immer länger, wenn die Anzahl der Einträge zu groß wird. Zudem ist die Frage, ob du nicht auch z.B. den Titel mit abspeichern willst usw., das könnte aber mit einem Trennzeichen passieren.

[d3zemb3r]

da ich in Delphi nicht der Mega Profi bin, weiss ich nicht wie ich es mit den | abfrage.
Kannst du da nenn beispiel geben?

[jaenicke]

Wie wäre es, wenn du erst einmal etwas versuchst und zeigst was du hast und wo du nicht weiterkommst? :roll:

Na gut, wenn es denn | als Trennzeichen sein soll, dann muss eben das so festgelegt werden.

Delphi-Quellcode:

var
  FileContents: TStringList;
begin
  FileContents := TStringList.Create;
  try
    FileContents.NameValueSeparator := '|';
    FileContents.LoadFromFile(Anwendungsdatenverzeichnis + 'Verlauf.txt');
    for i := 0 to FileContents.Count - 1 do
    begin
      ShowMessage(FileContents.Names[i]);
      ShowMessage(FileContents.ValueFromIndex[i]);
    end;
  finally
    FileContents.Free;
  end;
end;

[d3zemb3r]

Zitat:

Zitat von jaenicke

Wie wäre es, wenn du erst einmal etwas versuchst und zeigst was du hast und wo du nicht weiterkommst? :roll:

Na gut, wenn es denn | als Trennzeichen sein soll, dann muss eben das so festgelegt werden.

Delphi-Quellcode:

var
  FileContents: TStringList;
begin
  FileContents := TStringList.Create;
  try
    FileContents.NameValueSeparator := '|';
    FileContents.LoadFromFile(Anwendungsdatenverzeichnis + 'Verlauf.txt');
    for i := 0 to FileContents.Count - 1 do
    begin
      ShowMessage(FileContents.Names[i]);
      ShowMessage(FileContents.ValueFromIndex[i]);
    end;
  finally
    FileContents.Free;
  end;
end;

Vielen Dank.
Nur wie weiss delphi nun, was er auslesen soll?

[jaenicke]

Wie meinst du das? :gruebel: Der Quelltext liest aus jeder Zeile aus was vor und hinter dem Trennzeichen, also deinem | steht.
Schau dir den Quelltext doch erst einmal an und probiere es aus.