You can try this:
[pascal]
var
I: Integer;
B: Byte;
begin
B := 0;
for I := 0 to High(Byte) do
B := B + 1;
[/pascal]

But for all I know, Byte is 0.255, so if you assign a too big number, it'll be overrided - if you assign "512", B = "255". The same is with other ordinal types, but I guess they all have negative values - fx. Shortint is -128..127. So if you assign "312" to a ShortInt variable, it'll be set to "57".

I hope it's clear.