na gut, noch ein Beitrag von mir zu diesem "Blindenthread". 8)
Ihr habt nämlich das assign vergessen, bitte in Hilfe nachlesen:
Code:
procedure TForm1.CreateBtnClick(Sender: TObject);
var d : text;
begin
Table1.First;
AssignFile (d,'d:\SMS Alarmierung\SAT_Datenbank.dbf');
rewrite (d);
Repeat
WriteLn (d, table1.text.AsString, tabele1Alarm.AsString, ...);
Table1.Next;
Until Table1.Eof;;
close (d);
so sollte es gehen. Der Variablen d wird mit Assign ein physikalischer Platte-Dateiname zugeordnet.