4505
4505
InputHistories.ApplyFileDialogSettings(OpenDialog);
4506
4506
OpenDialog.Title:=lisChooseDelphiUnit;
4507
4508
OpenDialog.Filter:=lisDelphiUnit+' (*.pas)|*.pas|'+
4508
4509
dlgAllFiles+' ('+GetAllFilesMask+')|' + GetAllFilesMask;
4510
4510
if InputHistories.LastConvertDelphiUnit<>'' then begin
4511
4511
OpenDialog.InitialDir:=ExtractFilePath(InputHistories.LastConvertDelphiUnit);
4512
4512
OpenDialog.Filename :=ExtractFileName(InputHistories.LastConvertDelphiUnit);