Textfile in DB einlesen

**Christian18**

Hallo,

ich habe ein kleines Problem. Ich habe eine Paradox7 Tabelle und eine Textdatei. Die Textdatei wollte ich in die DB einlesen. Hatte auch schon mal gegonnen. Das ; soll aber nicht in die DB rein. wie mache ich das

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.bClick(Sender: TObject);

var

  F: TextFile;

  S: string;

begin

  if OpenDialog1.Execute then          { Dialog zum Dateiöffnen anzeigen }

  begin

    AssignFile(F, OpenDialog1.FileName);   { Datei ausgewählt }

    Reset(F);

    Readln(F, S1);                          { Erste Zeile der Datei lesen }

    Edit1.Text := S1;                       { String in ein TEdit schreiben }

    CloseFile(F);

  end;

end;

Textfile in DB einlesen

Textfile in DB einlesen

Forumregeln