Opendialog ?

[Vader]

hallo,

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var HandleDerDatei : THandle; 
    DT             : TDateTime; 

begin 
DT:= StrToDateTime('01.04.1999 15:15'); 
HandleDerDatei:= FileOpen('C:\bootlog.txt', fmOpenWrite  
OR fmShareDenyNone); 
FileSetDate(HandleDerDatei,DateTimeToFileDate(DT)); 
FileClose(HandleDerDatei); 
end;

hier in diesem code muß ich die datei reinschreiben bei der ich das datum ändern will

Delphi-Quellcode:

HandleDerDatei:= FileOpen('C:\bootlog.txt', fmOpenWrite  
OR fmShareDenyNone);

ich möchte das mit opendialog machen, wie geht das ???
mfg vader

[mkinzler]

Mit openDialog.Execute öffnest du den Dialog. nach dem Auswählen einer Datei durch den Anwender befindet sich der dateiname( inkl. Pfad) in der Eigenschaft Opendilaog.FileName.

HandleDerDatei:= FileOpen(Opendialog.FileName, fmOpenWrite );

[Vader]

danke
mfg vader