Procedurální typové konstanty: Porovnání verzí
Skočit na navigaci
Skočit na vyhledávání
(Vytvorená stránka „Procedurální typové konstanty může obsahovat pouze identifikátor procedury nebo funkce, které je s typem konstanty kompatibilní vzhledem k přiřazení. ;Přík...“) |
|||
| Řádek 11: | Řádek 11: | ||
ErrorHandler: ErrorProc = DefaultError; | ErrorHandler: ErrorProc = DefaultError; | ||
| − | + | [[Category:Typové konstanty]] | |
| − | |||
Aktuální verze z 13. 10. 2012, 22:41
Procedurální typové konstanty může obsahovat pouze identifikátor procedury nebo funkce, které je s typem konstanty kompatibilní vzhledem k přiřazení.
- Příklad
type
ErrorProc = procedure(ErrorCode: Integer);
procedure DefaultError(ErrorCode: Integer); far;
begin
WriteLn('Error ', ErrorCode, '.');
end;
const
ErrorHandler: ErrorProc = DefaultError;
