Console Mode Pascal/sk: what changed
Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | 1 | ## Programovanie v Pascale pre konzolu | |
| 2 | 2 | ||
| 3 | - | ||
| 3 | + | od User:Kirkpatc, preložil User:Moriquend | |
| 4 | 4 | ||
| 5 | - | ||
| 5 | + | Veľa z nás písalo pascalovské programy dávno pred tým, ako sa grafické používateľské rozhrania (GUI) a integrované vývojové prostredia (IDE) stali rozšírenými. Mnoho ostatných sú začiatočníci v programovaní v Pascale a potrebujú si preskúšať základné vlastnosti a nástroje jazyka. A iní potrebujú písať konzolové (rozumej: bežiace v textovom móde) aplikácie na vykonávanie komplexných úloh správy systému. | |
| 6 | 6 | ||
| 7 | - | ||
| 7 | + | Lazarus poskytuje ideálne prostredie pre učenie sa Pascalu a vývoj konzolových programov. Môže byť pritom využítá všetka funkcionalita IDE, vrátane editora zdrojového kódu (Source Editor) so zvýrazňovaním syntaxe, prístupu ku knižniciam, komplexným vyhľadávaním a nástrojmi na dopĺňanie kódu, a taktiež overovaním syntaxe. Pokiaľ nechcete formulár s jeho vizuálnymi komponentami, nepotrebujete ho, lebo Lazarus aj bez neho stále ostáva veľkolepým prostredím pre vývoj programov. Môžete kompilovať (prekladať) a spúšťať váš program počas vývoja, a to bez opúšťania editora. | |
| 8 | 8 | ||
| 9 | - | ||
| 9 | + | Pre začatie vytvárania konzolového programu choďte do hlavnému menu a vyberte Project -\> New Project a potom vyberte buď Program alebo Custom program. IDE tak nevygeneruje všetky extra súbory spojené s plno-grafickou aplikáciou, a ani neotvorí Object Inspector. Ale otvorí Source Editor (editor zdrojového kódu) so základnou kostrou programovej štruktúry a očakáva, že začnete písať svoj program. | |
| 10 | 10 | ||
| 11 | - | ||
| 11 | + | Keď ste už dokončili svoj program (alebo jeho časť) môžete ho skompilovať a spustiť vybratím Run -\> Run z hlavného menu alebo kliknutím na zelený trojuholník (Run) z tlačidlovej lišty. Akékoľvek hlásenie prekladača (varovania, stavové alebo chybové správy) sa zobrazia v Message Boxe (okne správ). A snáď sa tam objaví takáto správa: | |
| 12 | 12 | ||
| 13 | - | ||
| 13 | + | 'Project "Project1" successfully built.:)'. | |
| 14 | 14 | ||
| 15 | - | ||
| 15 | + | Ale kde je náš program??!! | |
| 16 | 16 | ||
| 17 | - | ||
| 18 | - | ||
| 19 | - | ||
| 20 | - | ||
| 17 | + | Môžete ho spustiť tak, že pôjdete do konzolového okna (terminálu) a napíšete meno programu. V unixe/Linuxe, ak je program v súčasnom adresári, pravdepodobne musíte napísať: | |
| 21 | 18 | ||
| 22 | - | ||
| 19 | + | `./Project1` | |
| 23 | 20 | ||
| 24 | - | ||
| 25 | - | ||
| 26 | - | ||
| 27 | - | ||
| 21 | + | pokiaľ by adresár nebol súčasťou štandardnej cesty (PATH). Avšak, môže sa vám zdať veľmi nepohodlné neustále preskakovať z Lazara do terminálového okna a späť. Našťastie existuje mechanizmus, ktorý umožňuje otvárať terminálové okno priamo v prostredí Lazara. | |
| 28 | 22 | ||
| 29 | - | ||
| 23 | + | Z halvného menu vyberte Run -\> Run Parameters a zaškrtnite políčko "Use launching application". Prvýkrát, ako toto urobíte a vyskúšate Compile/Run, pravdepodobne dostanete nepeknú hlášku hovoriacu: | |
| 30 | 24 | ||
| 31 | - | ||
| 25 | + | ` "xterm: Can't execvp /usr/share/lazarus//tools/runwait.sh: Permission denied". ` | |
| 32 | 26 | ||
| 33 | - | ||
| 27 | + | Ak sa to stalo, tak potrebujete zmeniť oprávnenia pre príslušný súbor, tj. /usr/share/lazarus/tools/runwait.sh a zabezpečiť, aby ste ho mohli spúšťať (napríklad použitím príkazu chmod +x názov_súboru na Unixoch, alebo na Windows použitím utility pre zmenu oprávnení); toto by ste mali urobiť ako root. Od tejto chvíle,kedykoľvek spustíte svoj program, objaví sa konzolové okno a budet ev ňom vidieť všetok váš i/o (read, write a pod.) | |
| 34 | 28 | ||
| 35 | - | ||
| 29 | + | Po tom, čo sa váš program prestane vykonávať, na obrazovke sa objaví správa "Press enter" ("Stlačte enter"). Čiže máte možnosť vidieť všetok výstup vygenerovaný vaším programom. Keď stlačít 'enter', okno sa zavrie. | |
| 36 | 30 | ||
| 37 | - | ||
| 38 | - | ||
| 39 | - | ||
| 31 | + | Editor Lazara môžete použiť na vyskúšanie si všetkých príkladov zo štandardných kníh o Pascale a môžete si samozrejme napísať aj vlastné. | |
| 32 | + | ||
| 33 | + | Medzi najužitočnejšie procedúry patri tie na vykonávanie systémových príkazov, alebo na spúšťanie iných programov (ktoré mohli byť napísané v Pascale, C, Perle alebo sú to shellové skripty, či dávkové súbory) | |
| 34 | + | ||
| 35 | + | Tu je jeden príklad:: | |
| 36 | + | ||
| 37 | + | Program TryShell; | |
| 40 | 38 | uses classes, unix; | |
| 41 | 39 | var S: longint; | |
| 42 | 40 | begin | |
| 43 | - | ||
| 44 | - | ||
| 41 | + | S := shell ('/bin/ls -la *.p*'); //zobrazí všetky .pp, .pas, .php, .png atď súbory v aktuálnom adresári | |
| 42 | + | writeln ('Program skončil s návratovou hodnotou : ', S) | |
| 45 | 43 | end. | |
| 46 | - | ||
| 47 | 44 | ||
| 48 | - | ||
| 49 | - | ||
| 50 | - | ||
| 45 | + | Môžu byť vykonávané aj o niečo komplexnejšie príkazy. Napríklad, ak ste už prezerali CVS repozitáre pre FPC a Lazarus (pozrite [fpc buildfaq](http://www.stack.nl/~marcov/buildfaq.pdf)), mohli by ste chcieť mať na svojom systéme vždy najnovšie zdrojové súbory Lazara a FPC. Dalo by sa to zabezpečiť takýmto programom: | |
| 46 | + | ||
| 47 | + | Program LazUpdate; | |
| 51 | 48 | uses classes, unix; | |
| 52 | - | ||
| 49 | + | var s : longint; | |
| 53 | 50 | begin | |
| 54 | - | ||
| 55 | - | ||
| 56 | - | ||
| 57 | - | ||
| 51 | + | S := shell ('cd /usr/local/src/fpc/devel/fpc ; make clean'); | |
| 52 | + | S := shell ('cd /usr/local/src/fpc/devel/lazarus ; make clean'); | |
| 53 | + | S := shell ('cd /usr/local/src/fpc/devel ; cvs -z 3 update -Pd fpc >& ~/cvscheckout.log'); | |
| 54 | + | S := shell ('cd /usr/local/src/fpc/devel ; cvs -z 3 update -Pd | |
| 58 | 55 | lazarus >& ~/cvslaz.log'); | |
| 59 | 56 | end. | |
| 60 | - | ||
| 61 | 57 | ||
| 62 | - | ||
| 63 | - | ||
| 64 | - | ||
| 65 | - | ||
| 58 | + | Pamätajte, že príkaz | |
| 66 | 59 | ||
| 67 | - | ||
| 68 | - | ||
| 69 | - | ||
| 70 | - | ||
| 60 | + | `shell ('cd /nejaky_adresar');` | |
| 71 | 61 | ||
| 72 | - | ||
| 62 | + | nasledovaný | |
| 73 | 63 | ||
| 74 | - | ||
| 75 | - | ||
| 76 | - | ||
| 64 | + | ` shell ('urob nieco v tomto adresari');` | |
| 65 | + | ||
| 66 | + | nefunguje, pretože po každom volaní funkcie shellu sa vykonávanie programu vracia do adresára, odkiaľ program štartoval. Takže potrebujeme v každom riadku (shell príkaze) špecifikovať viacero príkazov. | |
| 67 | + | ||
| 68 | + | Samozrejme, nemusíte zadávať každý príkaz ako samostatný riadok Pascalu. Celkom dobre môžete vytvoriť skript podobný tomuto (prevzaté z [fpc buildfaq](http://www.stack.nl/~marcov/buildfaq.pdf)): | |
| 69 | + | ||
| 70 | + | #!/bin/sh | |
| 77 | 71 | cd /usr/local/src/fpc/devel | |
| 78 | 72 | cd fpc | |
| 79 | 73 | make clean | |
| 80 | 74 | cd .. | |
| 81 | 75 | cd lazarus | |
| 82 | 76 | make clean | |
| 83 | 77 | cd .. | |
| 84 | 78 | cvs -z 3 update -Pd fpc >& ~/cvscheckout.log | |
| 85 | - | ||
| 86 | - | ||
| 79 | + | cvs -z 3 update -Pd lazarus >& ~/cvslaz.log | |
| 87 | 80 | ||
| 88 | - | ||
| 89 | - | ||
| 90 | - | ||
| 81 | + | Uložte ho do súboru, napríklad updatelaz.sh, a potom tento súbor zavolajte z vnútra vášho pascalovského programu. Asi takto: | |
| 82 | + | ||
| 83 | + | Program LazUpdate1; | |
| 91 | 84 | uses classes, unix; | |
| 92 | - | ||
| 85 | + | var S : longint; | |
| 93 | 86 | begin | |
| 94 | - | ||
| 87 | + | S := shell ('updatelaz.sh') | |
| 95 | 88 | end. | |
| 96 | - | ||
| 97 | 89 | ||
| 98 | 90 | --- | |
| 99 | - | ||
| 91 | + | *From the Free Pascal wiki, page "Console Mode Pascal/sk", as it stood on 2006-07-08 after a change by Swen, 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).* |