Dateiinhalt in Editfelder laden

Doc_Shaggyman · Hält's aus hier Beiträge: 4 Win 98

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 · Beiträge: 82 Win 2k / suse9.1 D7 Prof / Kylix 3

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.

markieren

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;

_________________
Result := 42; Application.ProcessMessages;

Doc_Shaggyman · Hält's aus hier Beiträge: 4 Win 98

Ist diese Stringlist eine Komponente aus der Delphi-Komponenten-Toolbar, oder kann ich die einfach so eintragen?

Und nochwas:

markieren

Delphi-Quelltext

1:	procedure TForm1.LoadSettingsFromFile(AFileName : string)

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

Baddy

Klabautermann · Verfasst: 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:

markieren

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

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme