не работают визиблы

[crit]

что не правльно???? на форме главной 2 радиобаттона... на один щелкаем появляется форма с первым деревом и кнопками,если на второй щелкаю должно появица другое,а у меня чето хрень какая то,визиблы не работают(

[CODE]

procedure TForm10.BitBtn1Click(Sender: TObject);
begin
if radiobutton1.Checked=true
then form2.showmodal;
form2.TV.Visible:=true;
form2.TV2.Visible:=false;
form2.Button2.Visible:=true;
form2.Button3.Visible:=true;
if radiobutton2.Checked=true
then form2.show;
form2.TV.Visible:=false;
form2.TV2.Visible:=true;
form2.Button2.Visible:=false;
form2.Button3.Visible:=false;
form2.Button4.Visible:=false;
end;

end.
[\CODE]

[__STDC__]

procedure TForm10.BitBtn1Click(Sender: TObject);
begin
if radiobutton1.Checked=true
then begin
 form2.showmodal;
form2.TV.Visible:=true;
form2.TV2.Visible:=false;
form2.Button2.Visible:=true;
form2.Button3.Visible:=true;
end;
if radiobutton2.Checked=true
then begin
 form2.show;
form2.TV.Visible:=false;
form2.TV2.Visible:=true;
form2.Button2.Visible:=false;
form2.Button3.Visible:=false;
form2.Button4.Visible:=false;
end;
end;

Подозреваю что так надо..

[crit]

да нет всреавно почему то визиблы не срабатывают((

if  radiobutton1.Checked=true
then  begin
 form2.showmodal;
       form2.TV.Visible:=true;
       form2.TV2.Visible:=false;
       form2.Button2.Visible:=true;
       form2.Button3.Visible:=true;
       form2.Button4.Visible:=false;
       form2.Button5.Visible:=false;
               end;
if  radiobutton2.Checked=true
then begin
     form2.show;
     form2.TV.Visible:=false;
     form2.TV2.Visible:=true;
     form2.Button2.Visible:=false;
     form2.Button3.Visible:=false;
       form2.Button4.Visible:=true;
     form2.Button5.Visible:=true;
     end;end;

[__STDC__]

Сообщение от crit

да нет всреавно почему то визиблы не срабатывают((

а на какое событие у вас это все должно происходить?

[crit]

ну когда форма открывается, видимо на OnCreate

[__STDC__]

ну логично что они не работают.. форма-то один раз создается... повесьте на что-нибудь другое.. а код оставьте исправленный

[crit]

ну а на что например?

[__STDC__]

Сообщение от crit

ну а на что например?

мне-то откуда знать? вам виднее.. можете хоть на таймер... можете на щелчок по кнопке.. или по радиокнопке.. куда хотите =)

[crit]

блин чето совсем голова не варит(.. так я ж сделал по радиобатону,если один выбираешь то дерево то визибл false а другое true.. но они все оба появляются... не пойму..

[Vladya]

Я бы посоветовал Вам в событии кнопки написать только несколько строчек, Form2.Show и ShowModal (естественно с if) а потом в событии второй формы OnActivate сделать проверку какой переключатель отмечен и соотвецтвенно что должно быть видно а что нет
Вот небольшой примерчик набросал: