Schreiben in *.txt

[Albi]

Diese Procedure heißt ExportInTxt, wenn diese in einer Procedure aufrufe müßte das doch so gehen. Ich habe es so gemacht:

Code:

begin
  ExportInTxt;
  WordApplication1.Disconnect;
  if OpenDialog1.Execute then
    FileName:=OpenDialog1.FileName