Ukazatelové typové konstanty
Verze z 9. 10. 2012, 22:00, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky)
Deklarace konstanty typu ukazatel obvykle obsahuje konstantní adresový výraz pro určení hodnoty ukazatele.
Pokud povolíte rozšířenou syntaxi překladače (direktivou {$X+}), můžete inicializovat typové konstanty typu PChar řetězcovou konstantou.
- Příklady
type Smer = (Velvo, Vpravo, Nahoru, Dolu); UkRetezec = ^String; UkUzel = ^Node; Node = record Dalsi: UkUzel; Symbol: UkRetezec; Hodnota: Smer; end; const S1: string[4] = 'DOLŮ'; S2: string[2] = 'NAHORU'; S3: string[5] = 'VPRAVO'; S4: string[4] = 'VLEVO'; N1: Node = (Dalsi: nil; Symbol: @S1; Hodnota: Down); N2: Node = (Dalsi: @N1; Symbol: @S2; Hodnota: Up); N3: Node = (Dalsi: @N2; Symbol: @S3; Hodnota: Right); N4: Node = (Dalsi: @N3; Symbol: @S4; Hodnota: Left); TabulkaSmeru: UkUzel = @N4;