PDA

View Full Version : مبتدی: باز کردن فرم 2


کاظم فلاحی خواه
سه شنبه 03 مرداد 1391, 00:02 صبح
من توی برنامه ام دو تا فرم دارم form 1 و form2 حالا می خوام با کلیک روی دکمه ای در فرم 1 فرم 2 رو باز کنم خواهش می کنم کمک کنید .
hossein_h62
سه شنبه 03 مرداد 1391, 11:45 صبح
سلام
Uses Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;
mohammad amin
چهارشنبه 04 مرداد 1391, 03:28 صبح
سلام
Uses Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;


سلام دوست عزیز

برای باز کردن یک فرم باید در event (رویداد) آن کلیک (on click) بنویسید :
form2.show
or
form2.visible:=true

برای بستن هم

form1.Hide
or
form2.visible:=false


سپاس فراموش نشود!