- 618 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 08:37:43 ]
- Cうろ覚えだけど愚直に移すならこんな感じか。
type
Float = Single;
PFLoat = ^Single;
TFloatArray = array [0..High(Integer) div SizeOf(FLoat)-1] of Float;
PFloatArray = ^TFloatArray;
var
range_0: array [0..1] of Float = (0,255);
ranges: array[0..0] of PFloatArray = (@range_0);
ranges[0][0] ==> 0
ranges[0][1] ==> 255
