PDA

View Full Version : ایجاد یک Tabsheet در زمان اجرا


babak869
دوشنبه 12 دی 1384, 21:45 عصر
با سلام
من میخوام بدونم چطور میشه در زمان اجرا یه صفحه جدید برای PageControl اضافه کرد .البته من در برنامه از کنترل WebBrowser هم استفاده کردم و صفحه من دارای کدنویسی خاصی است اما من میخوام با زدن دگمه New Page یه صفحه جدید در PageControl درست بشه که تمام کدنویسی و کنترلهای صفحه اول رو داشته باشه دقیقا مثل مرورگر Opera که با زدن دگمه New Page یه صفحه جدید مشابه صفحه قبل باز میشه
اگه دوستان راهنمایی کنند ممنون میشم
موفق باشید
دنی کوئیل
دوشنبه 12 دی 1384, 22:01 عصر
آقا بابک مشکل بعدی اون کنترل این است که در زمان اجرا شما نمی نوانید یکی از سزبرگ ها را مخفی نمائید
babak869
دوشنبه 12 دی 1384, 22:39 عصر
مساله ای نیست مشکل من در ساختن یه صفحه مانند صفحه اول است من کد ایجاد یک TabShhet رو دارم
اما من میخوام که صفحه جدید با تمام کنترلهای موجود روی صفحه اول ساخته بشه!!!
اینم کد ایجاد یک صفحه ساده


procedure TForm1.Button1Click(Sender: TObject);
var NP : TTabSheet;
begin
NP := TTabSheet.Create(PageControl1);
NP.PageControl := PageControl1;
PageControl1.ActivePage.Caption := 'Hello World!';
end;
Naficy
سه شنبه 13 دی 1384, 01:43 صبح
هر چند راههای بسیاری برای انجام کار مورد نظر شما وجود دارد، اما به نظرم برای کار شما بهترین روش استفاده از Frame است.
File->new->frame