[lx2004nt]

Добрый день, подскажите пожалуйста. Есть некий алгоритм, от подставленных в него чисел он дает некий результат. Его надо записать в ворд и эксель на выбор, с сохранением фаила в определенную директорию с именем фаила ФИО клиента. Как это лучше сделать? Вот кусок кода, как нормально записать и красиво?

Эксель

Код:

begin
  SaveDialog1.DefaultExt := '.rtf';
  SaveDialog1.Filter := 'EXCEL files|*.xls';
  if SaveDialog1.Execute then
   begin
    // RichEdit1.Lines.SaveToFile(SaveDialog1.FileName);
    //Excel.Visible := True;
    AssignFile(F,saveDialog1.FileName);
    Rewrite(F);
     Writeln(F, 'xyz');
     Excel.Range['b2']:='Привет!';
     CloseFile(F);
     ShowMessage('Файл '+SaveDialog1.FileName+' сохранён. ');
  end;
end;

как записать во вторую ячейку? как подвинуть все крассиво что бы можно было на листе а4 распечатать данные?

Ворд

Код:

begin
  SaveDialog1.DefaultExt := '.doc';
  SaveDialog1.Filter := 'WORD files|*.doc';
  if SaveDialog1.Execute then
   begin
    // RichEdit1.Lines.SaveToFile(SaveDialog1.FileName);
    AssignFile(F,saveDialog1.FileName);
    Rewrite(F);
    Writeln(F, 'xyz');
     CloseFile(F);
     ShowMessage('Файл '+SaveDialog1.FileName+' сохранён. ');
  end;
end;

Посоветуйте лучший вариант Спасибо за помощь заранее.