Datei open Dialog Windows XP Delphi 7 32

[himitsu]

Und so?

Delphi-Quellcode:

LoadReport.InitialDir  := Trim(Form1.PfadZuTxtO);
LoadReport.FileName    := '';
LoadReport.DefaultExt  := '.rtf';
LoadReport.Filter      := 'RichText (*.rtf)|*.rtf';
LoadReport.FilterIndex := 1;
LoadReport.Options     := [ofPathMustExist, ofFileMustExist];
LoadReport.Title       := 'Lade Textvorlage';
Form1.Statusbar1.SimpleText := 'Lade Textvorlage';
if LoadReport.Execute then

Wenn LoadReport eine Komponente auf der Form (DFM) ist, dann wäre es wohl schöner, wenn DefaultExt, Filter, FilterIndex, Options und Title stattdessen im OI eingestellt werden.