Import danych z pliku tekstowego

Mam problem z pewnym zagadnieniem i z góry przepraszam jeżeli pomyliłem działy.
Mam plik z danymi w formacie :
data, godzina, wartość pomiaru
Chciałbym wrzucić to do bazy danych do tabeli w formacie Data_pomiaru Wynik_pomiaru chciałbym aby było to jak najbardziej zautomatyzowane tzn w formie jakiegoś pliku wykonywalnego. podajemy np lokalizacje pliku txt i program sam wrzuca do bazy. Jezeli pomiar się to pomiar zostaje pominięty jeżeli jest nowy pomiar to jest zapisywany w bazie jako kolejny
Czy jest możliwe takie rozwiązanie?
Bardzo proszę o pomoc.

Jasne, że jest.

Podrzucę Ci trochę kodu - to działa w mojej przeglądarce:

Odczyt z pliku tekstowego - ciach:

procedure TFormOknoPotomne.Odczyt;
var i,j: Integer;
linia: String;
plik: TextFile;
begin
FormMenu.DBNavigator.Enabled:=false;
i:=DBGrid.Columns.Count; linia:='';
AssignFile(Plik,Nazwa);
Reset(Plik);
Query.First;
while not (Query.Eof or Eof(Plik)) do begin
Query.Edit;
for j:=1 to i do begin
Readln(Plik,Linia);
DBGrid.Fields[j-1].Text:=linia;
end;
Query.Post;
Query.Next;
end;
if not Eof(plik) then if Application.MessageBox('Plik jest dłuższy od bazy.'
+#13+'Dodać pozostałe rekordy?',' ',MB_ICONQUESTION or MB_YESNO)=IDYES then
while not Eof(Plik) do begin
Query.Append;
for j:=1 to i do if not Eof(Plik) then begin
Readln(Plik,Linia);
Memo.Lines.Add(linia);
DBGrid.Fields[j-1].Text:=linia;
end;
Query.Post;
end;
CloseFile(Plik);
FormMenu.DBNavigator.Enabled:=true;
end;

Zapis do pliku tekstowego:

procedure TFormOknoPotomne.Zapisz;
var i,j: Integer;
linia: String;
plik: TextFile;
begin
FormMenu.DBNavigator.Enabled:=false;
i:=DBGrid.Columns.Count; linia:='';
AssignFile(Plik,Nazwa);
Rewrite(Plik);
Query.First;
while not Query.Eof do begin
for j:=1 to i do begin
linia:=DBGrid.Fields[j-1].Text;
Writeln(Plik,Linia);
end;
Query.Next;
end;
CloseFile(Plik);
FormMenu.DBNavigator.Enabled:=true;
end;

Te procedurki zrzucają dane dowolnego formatu.

Pozdrawiam
Sebastian Tomczyk
http://www.stelektronik.pl/