Datei kann nicht geschrieben werden - Warum und wie ändern?

[marabu]

Hallo Tom,

im event handler für OnClick() von btn_generate würde ich nur Code zur Manipulation der Benutzerschnittstelle unterbringen, den Rest würde ich in mehrere Prozeduren auslagern. Einfach geht das indem du Actions verwendest:

Delphi-Quellcode:

procedure Tcomplete.cmd_GenerateExecute(Sender: TObject);
begin
  with Sender as TAction do
  begin
    Enabled := False;
    GeneratePage(FileName);
    Enabled := True;
  end;
end;

Du musst keine Datei vorher löschen, die du später mit SaveToFile() überschreibst. Erstellst du die Datei nur, damit sie im Browser angezeigt werden kann?

Freundliche Grüße vom marabu