Sign in Join
Wiki copytemporary

Howto Use TOpenDialog/sk: what changed

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

OldNewLine
1-Jednoduchý (a veľmi krátky) návod:
2-
3-1\. Umiestnite ikonku OpenDialog na váš formulár (hocikam, nakoľko za behu programu je aj tak neviditeľná).
4-
5-`  `![`Component_Palette_Dialogs.png`](/wiki-images/7/72/Component_Palette_Dialogs.png)\
6-` `\
7-`  (Je to tá najlavejšia ikonka v paneli Dialogs)`
8-
9-2\. Do vašeho kódu umiestnite niečo takéto:
1+Jednoduchý (a veľmi krátky) návod:
102
11-``` pascal
12- var filename : string;
3+1\. Umiestnite ikonku OpenDialog na váš formulár (hocikam, nakoľko za behu programu je aj tak neviditeľná).
4+```
5+[![Component Palette Dialogs.png](/wiki-images/7/72/Component_Palette_Dialogs.png)](</File:Component_Palette_Dialogs.png>)
6+
7+ (Je to tá najlavejšia ikonka v paneli Dialogs)
8+```
139
14- if OpenDialog1.Execute then
15- begin
16- filename := OpenDialog1.Filename;
17- ShowMessage(filename);
18- end;
10+2\. Do vašeho kódu umiestnite niečo takéto:
1911```
12+var filename : string;
13+
14+ if OpenDialog1.Execute then
15+ begin
16+ filename := OpenDialog1.Filename;
17+ ShowMessage(filename);
18+ end;
19+```
2020
21-Metóda [[doc:lcl/dialogs/tcommondialog.execute.html|Execute]] zobrazí dialógové okno "Otvor súbor". Vráti true ak užívateľ vybral nejaký súbor, alebo false ak užívateľ okno zrušil. Vlastnosť [[doc:lcl/dialogs/tfiledialog.filename.html|Filename]] potom obsahuje celý názov súboru, vrátane disku a kompletnej cesty.
21+Metóda [ Execute](<http://lazarus-ccr.sourceforge.net/docs/lcl/dialogs/tcommondialog.execute.html> "doc:lcl/dialogs/tcommondialog.execute.html") zobrazí dialógové okno "Otvor súbor". Vráti true ak užívateľ vybral nejaký súbor, alebo false ak užívateľ okno zrušil. Vlastnosť [ Filename](<http://lazarus-ccr.sourceforge.net/docs/lcl/dialogs/tfiledialog.filename.html> "doc:lcl/dialogs/tfiledialog.filename.html") potom obsahuje celý názov súboru, vrátane disku a kompletnej cesty.
2222
23+
24+
2325## Prečítajte si tiež
2426
25-- [[Howto Use TSaveDialog/sk|Používame TSaveDialog]]
26-- [[Dialogs tab|TOpenDialog]]
27+ * [[Howto Use TSaveDialog/sk|Používame TSaveDialog]]
28+ * [[Dialogs tab|TOpenDialog]]
2729
2830---
29-*From the Free Pascal wiki, page "Howto Use TOpenDialog/sk", 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).*
31+*From the Free Pascal wiki, page "Howto Use TOpenDialog/sk", as the Internet Archive kept it on 2022-08-08. 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