Howto Use TSaveDialog/ru: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: Howto Use TSaveDialog/ru

New		Line
1	+	## Как использовать TSaveDialog
2	+
3	+	Простой пример:
4	+
5	+	1\. Поместите виджет SaveDialog на форму (в любое место, он все равно не будет отображаться).
6	+
7	+	` `![`Component_Palette_Dialogs.png`](/wiki-images/7/72/Component_Palette_Dialogs.png)` `\
8	+	` (Вторая слева иконка на `[[Dialogs tab]]`)`
9	+
10	+	2\. Добавьте на форму компонент Memo.
11	+
12	+	` `![`tmemo.png`](/wiki-images/1/1b/Tmemo.png)
13	+
14	+	3\. Добавьте на форму кнопку.
15	+
16	+	` `![`tbutton.png`](/wiki-images/b/b2/Tbutton.png)
17	+
18	+	[[IDE Window: Object Inspector\|Инспектор объектов]] отображает свойства кнопки Button1. Измените свойство Caption, которое сейчас 'Button1', на 'Сохранить'. Нажмите на вкладку События в Инспекторе объектов. Выберите строку с текстом OnClick: справа появится маленькая кнопка с тремя точками. Нажмите на эту кнопку и в редакторе исходного кода автоматически создастся выбранное событие. Допишите код:
19	+
20	+	``` pascal
21	+	procedure TForm1.Button1Click( Sender: TObject );
22	+	begin
23	+	if SaveDialog1.Execute then
24	+	Memo1.Lines.SaveToFile( SaveDialog1.Filename );
25	+	end;
26	+	```
27	+
28	+	Метод [[doc:lcl/dialogs/tcommondialog.execute.html\|Execute]] отображает диалог сохранения файла. Возвражает [[True\|true]] если пользователь выбрал сохранение файла, [[False\|false]] если пользователь отменил сохранение.
29	+
30	+	Свойство [[doc:lcl/dialogs/tfiledialog.filename.html\|Filename]] возвращает полный путь к файлу, включая имя диска.
31	+
32	+	## См. также
33	+
34	+	- [[Howto Use TOpenDialog/ru]]
35	+	- [[Dialogs tab]]
36	+	- [[Standard tab\|TButton]]
37	+	- [[Standard tab\|TMemo]]
38	+
39	+	---
40	+	From the Free Pascal wiki, page "Howto Use TSaveDialog/ru", as it stood on 2020-02-17 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).

Back to history