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.