SSeg: Porovnání verzí
Skočit na navigaci
Skočit na vyhledávání
(Vytvorená stránka „Vrací aktuální hodnotu registru SS. ;Deklarace function SSeg: Word; ;Režim :Windows, Reálný, Chráněný ;Poznámky :Výsledkem typu Word je segmentová adresa...“) |
|||
(Nejsou zobrazeny 2 mezilehlé verze od stejného uživatele.) | |||
Řádek 53: | Řádek 53: | ||
[[Category:System]] | [[Category:System]] | ||
[[Category:Funkce System]] | [[Category:Funkce System]] | ||
+ | [[Category:Funkce pro operace s ukazateli a adresami]] |
Aktuální verze z 5. 10. 2012, 20:58
Vrací aktuální hodnotu registru SS.
- Deklarace
function SSeg: Word;
- Režim
- Windows, Reálný, Chráněný
- Poznámky
- Výsledkem typu Word je segmentová adresa zásobníkového segmentu.
- Viz také
- CSeg
Vzorový příklad
{CSeg.PAS} {Vzorový příklad funkce CSeg, DSeg, SSeg, SPtr, Ofs a Seg.} { Pro Windows: } { uses WinCrt; } procedure WriteHexWord(w: Word); const hexChars: array [0..$F] of Char = '0123456789ABCDEF'; begin Write(hexChars[Hi(w) shr 4], hexChars[Hi(w) and $F], hexChars[Lo(w) shr 4], hexChars[Lo(w) and $F]); end; var i: Integer; begin Write('Aktuální kódový segment je $'); WriteHexWord(CSeg); Writeln; Write('Globální datový segment je $'); WriteHexWord(DSeg); Writeln; Write('Segment zásobníku je $'); WriteHexWord(SSeg); Writeln; Write('Ukazatel zásobníku je na $'); WriteHexWord(SPtr); Writeln; Write('i je na ofsetu $'); WriteHexWord(Ofs(i)); Write(' v segmentu $'); WriteHexWord(Seg(i)); end.