Entwickler-Ecke

Dateizugriff - Dateiinhalt in Editfelder laden


Doc_Shaggyman - Mo 07.07.03 11:49
Titel: Dateiinhalt in Editfelder laden
Hi Leute - folgendes Problem:

Ich möchte aus einer bestehenden .dat Datei, die reinen Text enthält Zeilenweise in Editfelder laden. So möchte ich Logininformationen in einem Programm automatisch beim start ins Programm laden.

Ein Beispiel:

Eine Bestehende Datei data.dat enthält folgenden Text:
(übrigens: das Zeugs in Klammern sind nur Bemerkungen und nicht in der datei enthalten)


pop3.host.de (--> soll in Editfeld 1)
user@host.de (--> soll in Editfeld 2)
Passwort (--> soll in Maskeditfeld)
5 (--> soll als Value für Spinedit festgelegt werden)

Wie ich das alles einbinde weiß ich, das ist kein Problem - ich muss nur wissen, wie ich die Textdatei zeilenweise auslesen und den Text in die entsprechenden Felder laden kann.

Schonmal Danke im voraus

Baddy


BeniSchindler - Mo 07.07.03 14:17
Hi,

probier einfach mal die Datei in eine StringList zu Laden. Aud dieser StringList kannst du die Zeilen dann ganz einfach auslesen. Hier ist mal ein kurzes Beispiel wie es bei deinem Fall aussehen könnte.


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
 
procedure TForm1.LoadSettingsFromFile(AFileName : string);
begin
  With TStringList.create() do try
    //Lade die Datei in eine Stringlist
    LoadFromFile(AFileName);
    //Setze die Felder und Variablen mit den Zeilen aus der StringList.
    Edit1.text := Strings[0];
    Edit2.text := Strings[1];
    MaskEdit1.text := Strings[2];
    SpinEdit := StrToInt(Strings[3]);
  Finally
    Free;
  End;
end;


Doc_Shaggyman - Di 08.07.03 09:42
Ist diese Stringlist eine Komponente aus der Delphi-Komponenten-Toolbar, oder kann ich die einfach so eintragen?

Und nochwas:

Delphi-Quelltext 
1:
 
procedure TForm1.LoadSettingsFromFile(AFileName : string)


Muss bei TForm1.LoadSettingsFromFile nach dem Dateinamen das ": string" stehen, oder nicht?

Baddy


Klabautermann - Di 08.07.03 10:50
Hallo,
Doc_Shaggyman hat folgendes geschrieben:
Ist diese Stringlist eine Komponente aus der Delphi-Komponenten-Toolbar, oder kann ich die einfach so eintragen?

tStringList ist ein Objekt aus der Unit Classes. Du findest sie also in keiner Komponentenleiste kannst sie aber wenn du diese Unit eingebunden hast verwenden.

Doc_Shaggyman hat folgendes geschrieben:
Und nochwas:

Delphi-Quelltext 
1:
 
procedure TForm1.LoadSettingsFromFile(AFileName : string)


Muss bei TForm1.LoadSettingsFromFile nach dem Dateinamen das ": string" stehen, oder nicht?

Im Procedurekopf ja, beim Aufruf nicht.

Gruß
Klabautermann


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!