Hallo,
siehe
OH AssignFile, ReWrite, WriteLn, CloseFile.
Dann brauchst Du noch ein OpenDialog. Befindet sich auf der Palette Dialogs. Mit folgendem Code kannst Du ihn dann öffnen:
Delphi-Quellcode:
if OpenDialog1.Execute then
begin
//Datei schreiben
end;
Grüsse, Daniel