Procedurální typové konstanty

Z Delphi & Pascal (česká wiki)
Verze z 9. 10. 2012, 21:38, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (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...“)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaci Skočit na vyhledávání

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;
Viz také
Typové konstanty