Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#20

Re: Datei kann nicht geschrieben werden - Warum und wie ände

  Alt 29. Okt 2006, 15:48
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
  Mit Zitat antworten Zitat