Mam pytanko.......
Jak wyświetlić np. przez ShowMessage() wartość binarną zmiennej typu double ?
0
1
Co masz przez to na myśli?
W najprostszym wydaniu pewnie coś w stylu:
Function DoubleToBinary(var Value: Double): String;
Var I: uint8;
Begin
Result := ''; // można by też bawić się z SetLength(Result, ...) i pisaniem po indeksach, ale zakładam, że nie zamierzasz wywoływać tej procedury miliony razy na sekundę
For I := 0 To sizeof(Value)-1 Do
Result += IntToBin(PByte(@Value+I))+' ';
End;