菜鸟求助 ( 积分: 0 )

F

fuxin198311

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-08

• #1

我有一个名叫修改的按钮 点击名字变成保存再点击还原成修改 我的代码写到这里就不会 在这请教各位了 后面的代码咋写呢
procedure TForm2.BitBtn2Click(Sender: TObject);
begin
edit14.Visible:=false;
combobox1.Visible:=true;
bitbtn2.Caption:='保存';

 

寒

寒战

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-08

• #2

if edit14.Visible then

 

H

herui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-08

• #3

procedure TForm2.BitBtn2Click(Sender: TObject);
begin
if bitbtn2.Caption:='保存' then
bitbtn2.Caption:='修改'
else
bitbtn2.Caption:='保存' ;
end;

 

Z

zqw0117

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-08

• #4

procedure TForm2.BitBtn2Click(Sender: TObject);
begin
if bitbtn2.Caption='保存' then
bitbtn2.Caption:='修改'
else
bitbtn2.Caption:='保存' ;
end;