C cqytech Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-22 #1 把颜色转成字符串,保存在INI中, 下次打开程序时,从INI中读取字符串,并转成颜色值。 如何现实?
C cqytech Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-22 #2 把颜色转成字符串,保存在INI中, 下次打开程序时,从INI中读取字符串,并转成颜色值。 如何现实?
L LanderLiu Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-23 #3 应存成一个字符串,打开时使用.value负值到控件的color 属性就可以了.
S SupermanTm Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-08 #5 var N: Integer; S: String; begin N:= Integer(xColor); Str(N,S); WritePrivateProfileString(PChar(Sect),PChar(KeyName),PChar(S),PChar(IniFileName); end;
var N: Integer; S: String; begin N:= Integer(xColor); Str(N,S); WritePrivateProfileString(PChar(Sect),PChar(KeyName),PChar(S),PChar(IniFileName); end;