Sign in Join
Wiki copytemporary

Howto Use TSaveDialog/pl: what changed

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

OldNewLine
11**Jak używać TSaveDialog?**
22
3-[![tsavedialog.png](/wiki-images/4/4a/tsavedialog.png)](</File:tsavedialog.png>)
3+![](/wiki-images/e/e1/Tsavedialog.png)
44
5-Podstawowe wytyczne:
5+Podstawowe wytyczne:
66
7-1\. Umieść obiekt SaveDialog na swojej formie (gdziekolwiek, gdyż nie będzie on widoczny).
8-```
9-[![Component Palette Dialogs.png](/wiki-images/7/72/Component_Palette_Dialogs.png)](</File:Component_Palette_Dialogs.png>)
10- (Jest to drugi od lewej obiekt dialogowy na [[Dialogs tab/pl|zakładce Dialog]])
11-```
7+1\. Umieść obiekt SaveDialog na swojej formie (gdziekolwiek, gdyż nie będzie on widoczny).
128
13-2\. Dodaj obiekt memo na swoją formę.
9+` `![`Component_Palette_Dialogs.png`](/wiki-images/7/72/Component_Palette_Dialogs.png)\
10+` (Jest to drugi od lewej obiekt dialogowy na `[[Dialogs tab/pl|zakładce Dialog]]`)`
1411
15-[![tmemo.png](/wiki-images/f/f3/tmemo.png)](</File:tmemo.png>)
12+2\. Dodaj obiekt memo na swoją formę.
1613
17-3\. Dodaj przycisk na swoją formę.
14+![](/wiki-images/1/1b/Tmemo.png)
1815
19-[![tbutton.png](/wiki-images/b/b2/tbutton.png)](</File:tbutton.png>)
16+3\. Dodaj przycisk na swoją formę.
2017
21-Okno [[IDE Window: Object Inspector|Inspektor Obiektów]] wyświetli właściwości obiektu Button1. Zmień właściwość o nazwie 'Caption', która domyślnie wyświetla wartość 'Button1' na 'Save'. Kliknij na zakładkę Zdarzenia w Inspektorze Obiektów. Wybierz przycisk na prawo od OnClick: mały przycisk z trzema kropkami (... odsyłacz). Kliknij na niego, aby automatycznie przejść do Edytora źródeł. Twój kursor będzie umieszczony wewnątrz kawałka gotowego kodu. Kompletny kod:
22-```
23-procedure TForm1.Button1Click( Sender: TObject );
24- begin
25- if SaveDialog1.Execute then
26- Memo1.Lines.SaveToFile( SaveDialog1.Filename );
27- end;
18+![](/wiki-images/b/b2/Tbutton.png)
19+
20+Okno [[IDE Window: Object Inspector|Inspektor Obiektów]] wyświetli właściwości obiektu Button1. Zmień właściwość o nazwie 'Caption', która domyślnie wyświetla wartość 'Button1' na 'Save'. Kliknij na zakładkę Zdarzenia w Inspektorze Obiektów. Wybierz przycisk na prawo od OnClick: mały przycisk z trzema kropkami (... odsyłacz). Kliknij na niego, aby automatycznie przejść do Edytora źródeł. Twój kursor będzie umieszczony wewnątrz kawałka gotowego kodu. Kompletny kod:
21+
22+``` pascal
23+ procedure TForm1.Button1Click( Sender: TObject );
24+ begin
25+ if SaveDialog1.Execute then
26+ Memo1.Lines.SaveToFile( SaveDialog1.Filename );
27+ end;
2828```
2929
30-Metoda [ Execute](<http://lazarus-ccr.sourceforge.net/docs/lcl/dialogs/tcommondialog.execute.html> "doc:lcl/dialogs/tcommondialog.execute.html") wyświetla okno dialogowe zapisu pliku. Zwraca ono wartość [[True|true]], gdy użytkownik wybierze jakiś plik lub [[False|false]], gdy użytkownik anuluje operację.
30+Metoda [[doc:lcl/dialogs/tcommondialog.execute.html|Execute]] wyświetla okno dialogowe zapisu pliku. Zwraca ono wartość [[True|true]], gdy użytkownik wybierze jakiś plik lub [[False|false]], gdy użytkownik anuluje operację.
3131
32-Właściwość [ Filename](<http://lazarus-ccr.sourceforge.net/docs/lcl/dialogs/tfiledialog.filename.html> "doc:lcl/dialogs/tfiledialog.filename.html") zwraca pełną nazwę pliku wraz ze ścieżką i literą napędu (jeśli istnieje).
32+Właściwość [[doc:lcl/dialogs/tfiledialog.filename.html|Filename]] zwraca pełną nazwę pliku wraz ze ścieżką i literą napędu (jeśli istnieje).
3333
3434## Zobacz także
3535
36- * [[Howto Use TOpenDialog/pl|Jak używać TOpenDialog]]
37- * [[Dialogs tab/pl|Zakładka Dialogs]]
38- * [[Standard tab|TButton]]
39- * [[Standard tab|TMemo]]
36+- [[Howto Use TOpenDialog/pl|Jak używać TOpenDialog]]
37+- [[Dialogs tab/pl|Zakładka Dialogs]]
38+- [[Standard tab|TButton]]
39+- [[Standard tab|TMemo]]
4040
4141**Tłumaczenie**
4242
43-Na język polski przełożył: --[Sławomir Załęcki](</User:Slawek> "User:Slawek") 13:00, 9 September 2010 (CEST)
43+Na język polski przełożył: --Sławomir Załęcki 13:00, 9 September 2010 (CEST)
4444
4545---
46-*From the Free Pascal wiki, page "Howto Use TSaveDialog/pl", as the Internet Archive kept it on 2024-09-20. 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).*
46+*From the Free Pascal wiki, page "Howto Use TSaveDialog/pl", 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