Показаны различия между двумя версиями страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
blackbox:faq:startup [2025/07/19 00:02] iadenisov |
blackbox:faq:startup [2025/07/19 00:14] (текущий) comdiv |
||
|---|---|---|---|
| Строка 6: | Строка 6: | ||
| MODULE Startup; | MODULE Startup; | ||
| - | IMPORT Log, Dialog, Services; | + | IMPORT |
| TYPE | TYPE | ||
| Строка 12: | Строка 12: | ||
| PROCEDURE (a: Action) Do; | PROCEDURE (a: Action) Do; | ||
| - | VAR res: INTEGER; | + | VAR res: INTEGER; |
| BEGIN | BEGIN | ||
| Dialog.Call(" | Dialog.Call(" | ||
| Строка 20: | Строка 20: | ||
| VAR a: Action; | VAR a: Action; | ||
| BEGIN | BEGIN | ||
| + | Dialog.appName := " | ||
| NEW(a); | NEW(a); | ||
| - | Services.DoLater(a, | + | Services.DoLater(a, |
| END Setup; | END Setup; | ||
| END Startup. | END Startup. | ||
| </ | </ | ||