Delphi-Quellcode:
function ColorToString(s:
String):TColor;
var
R,G,B: ^Byte;
begin
R:=s[1];
G:=s[2];
B:=s[3];
ColorToString:=
RGB(R,G,B);
end;
das funktioniert aber nicht ...
naja, ich glaub das mit den pointern hab ich noch nicht ganz verstanden