Hello. I can not get rid of the desire to maintain the dialogue, but it is necessary that way. Help me please. Constantly gives an error about access to the network. In gratitude, I will not give up studying Delphi (well, I just like it).
Added.
Sorry, of course. And the folder is accessible to all. Everything is simple, but on Save problems, writes there is no access.
procedure Button1Click(Sender: TObject); begin ... Edit1.Text:=ShowBrowseFolderForm( 'Папка сохранения' ); ... // форма с выбором папки, все // отражается в Edit end; procedure Button2Click(Sender: TObject); begin Memo1.Lines.SaveToFile(Edit1.Text+'namefale'); end;