Textdatei mit Inhalt erstellen

[Thendo]

Zitat von taaktaak:

Zwei Anmerkungen:
1.

Delphi-Quellcode:

 CloseFile(myFile); 

  Reset(myFile); 

  CloseFile(myFile);

das Reset() und das 2te CloseFile() sind überflüssig

2. Normalerweise wäre der Code um eine minimlae Fehlerbehandlung zu ergänzen, also z.B.

Delphi-Quellcode:

 AssignFile(myFile,'DATEINAME'); 
 {$I-} rewrite(myFile); {$I+}
 if ioResult<>0 then ShowMessage('Fehler'
               else begin
  WriteLn(myFile, 'STANDARTTEXT ', adresse);  || Bei adresse soll der Text aus dem Edit1 hinkommen 
  WriteLn(myFile); 
  end;

 CloseFile(myFile);

Zu 1:
Habs rausgetan^^

Zu 2:
Könntest du bitte erklären was das bringt^^??
Blicke ich iwi nicht durch^^


Und hab noch ne Frage^^
wenn ich jetzt eine If Schleife mit ShellExcute mache:

Delphi-Quellcode:

if Checkbox1.Checked then
  ShellExecute(Handle, nil, 'DATEI.exe', nil, nil, SW_SHOW);
end;

Wie kann ich dem jetzt sagen das die datei in der variablerdner (text aus Edit2) liegt?