Как известно число с плавающей запятой (обычной точности) содержится в 4 байтах: 1- порядок +3 мантисса. Как узнать адреса этих байтов в Visul Basic 6.0?
{В обычном Бейсике это делается с помощью операторов
X=2.5
x1= VARPTR(X)
A(1)= PEEK(x1)
A(2)=PEEK(x1+1)
A(3)= PEEK(x1+2)
A(4)=PEEK(x1+3)}
Действительно оператор VARPTR жив!!!
А как быть с оператором PEEK??? GetMem в моем справочнике и Help-е отсуствует. С целью получения содержания этих 4-х байт (A(1), A(2), A(3), A(4)) дополните Пожалуста следующий конкретный пример для Visul Basic 6.0.
Dim X As Single
X=2.5
x1= VARPTR(X)
А(1)=???
А(2)=???
А(3)=???
А(4)=???