panel的背景在程序中更改后,为什么重启动软件后背景颜色没有变化?请教100(50分)

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-10

• #1

panel的背景在程序中更改后,为什么重启动软件后背景颜色没有变化?请教100

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-10

• #2

>>panel的背景在程序中更改后

让大家看看你在程序里如何修改的就知道毛病了

 

S

shaofun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-10

• #3

把改动的参数存入注册表或INI文件中，当程序启动时再从中读取即可

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-11

• #4

用的是if colordilog.execute then panel.color:=colodilog.color;语句.

 

Z

zj1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-11

• #5

同意shaofun的说法，这样的设置一般要存放到ini或者注册表中，下次启动再重新改

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-11

• #6

请问如何用ini或者注册表中实现，详细一点，在加50分

 

Z

zj1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-11

• #7

procedure TForm1.ModifyiniClick(Sender: TObject);
var
ColorIni: TIniFile;
begin
ColorIni := TIniFile.Create(ExtractFilePath(application.ExeName)+'Color.ini');
ColorIni.WriteInteger('Panel', 'PanelColor',Panel1.Color);
ColorIni.Free;
end;

procedure TSetDogForm.FormCreate(Sender: TObject);
var
ColorIni: TIniFile;
Pcolor:integer;
begin
ColorIni := TIniFile.Create(ExtractFilePath(application.ExeName)+'Color.ini');
Panel1.Color:=ColorIni.ReadInteger('Panel', 'PanelColor',ClBtnFace);
ColorIni.Free;
end;

 

陈

陈晨

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-12

• #8

同意以上所说,
你的原因在于设置了PANNEL的背景色后要重画窗体才能改变她的颜色,而不是重新启动
当你重新启动的时候又回到你原来软件初期的颜色了,因此建议上面的方法,OK

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-13

• #9

tinifile 的详细用法，求救，帮助太少。

 

C

CJF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-13

• #10

其实就是帮助里面那几个方法了,很简单的,多试试就可以了.

 

Z

zj1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-13

• #11

这个问题实在是。。。。。。太简单了。。。

多看看帮助吧，方法就那么几个

 

I

iseek

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-13

• #12

我就没有用过INI文件，一直用注册表，很好用。

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-20

• #13

to iseek:
请教用注册表解决方法，email:kl78pgy@263.net

 

M

menxin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-20

• #14

你就再写详细点吧，这50分真不想和你抢，呵呵[]

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #15

多人接受答案了。