如何将字串加载到TRGBQuad?(50分)

我想把下面str的颜色数据加载到textcolor变量里,该如何做?
type
Ttextcolor = array[0..255] of TRGBQuad;

var
textcolor:Ttextcolor;
str:string;
begin
str:='00000000000080000080000000808000'+
'800000008000800080800000C0C0C000'+
'97805500C8B99D0073737B0029292D00'+
'52525A005A5A63003939420018181D00'+
'......'; //这里的数据我省略了,str总大小是1024个字节,256色颜色表

//这里如何将str数据加载到textcolor里?
end;

我查了一上午资料,还是没收获,

我已自己解决.将字串变为指针,通过内存流读写就成功了!