Code:
var datei: textfile;
begin
assignfile(datei, savedialog1.filename);
rewrite(datei);
writeln(datei, panel1.caption);
writeln(datei, panel2.caption);
writeln(datei, panel3.caption);
writeln(datei, panel4.caption);
writeln(datei, panel5.caption);
closefile(datei);
end;
nicht ausprobiert, sollte aber gehen!