اشکال در نمایش فرم

[mnakhaei67]

79003
با سلام.کسی میدونه اشکال برنامه فوق چیه که درست اجرا نمیشه؟ممنون میشم اگه زود راهنماییم کنین

[یوسف زالی]

سلام.
یا به جای show از showmodal استفاده کنید یا بعد از close فرم های درونی فرم اصلی رو دوباره show کنید.

[mnakhaei67]

اگه میشه کدی که میگید با اون درست میشه برام بفرستید آخه چیزی که من تست کردم درست نمیشه.ممنون میشم

[imanpadid]

ضمن سلام.کدت مشکل داشت برات میفرستم .

procedure TForm1.Button1Click(Sender: TObject);
begin
if radiobutton1.Checked then
begin
form1.Visible:=false;
form2.Show;
end
else
if radiobutton2.Checked then
begin
form1.Visible:=false;
form3.Show;
end
else
if (radiobutton3.Checked) or (radiobutton4.Checked) then
begin
form4.Show;
form1.Visible:=false;
end;
end;