Printable View
من دو تا فرم درست کردم و در فرم دوم یه track bar گذاشتم ... به طوری که کاربر توسط این track bar میتونست width فرم اول رو به اندازه ی خودش تنظیم کنه. خوب این که خیلی راحت کار کرد.
ولی ....
امروز همین کار رو کردم با این تفاوت که برای این دو تا فرم یک parent هم تعریف کردم. ولی کد کار نکرد !
ولی این parent نباشه کار میکنه !
آیا طرز کد نویسی روی پروژه های mdi تکنیک خاصی داره ؟
لطفا راهنمایی کنید.
سلام
فرم اول کیه؟ همان فرمی کهtrackbar روی ان قرار دارد؟نقل قول:
من دو تا فرم درست کردم و در فرم دوم یه track bar گذاشتم ... به طوری که کاربر توسط این track bar میتونست width فرم اول رو به اندازه ی خودش تنظیم کنه...
لطفاً کدی که گفته اید کار کرده و کدی که کار نکرده را بگذارید، چوندرست متوجهمنظورتان نشده ام.
بهتر توضیح میدم :
دو تا فرم درست کردم (form1,form2) روی form2 یک trackbar گذاشتم که کاربر میتونست اندازه ی width فرم اول رو تغییر بده. توی این کار از هیچ فرم parent استفاده نکردم و خیلی راحت کار کرد.
ولی ...
تو پروژه ی بعدی همین کار رو تکرار کردم با این تفاوت که یک فرم parent هم ساختم و اون دو تا فرم رو بهش نسبت دادم، ولی نشد !
سلام
متاسفانه گمانم شما از روش های ضد OOP موجود در VB6 در VB9 استفاده کرده اید...
وجود این قابلیت های برای افرادی که از VB9 آمده اند خوب است ولی برای VB9 مایه ننگ و مسخره است.
شما باید اشاره گر هر شی را برای دستکاری داشتهخ باشید و اینکه از نام کلاسس آن استفاده کنید اصلا و ابداً صحیح نیست.
اشاره گر شی در VB در واقع همان متغییری است که کلاسس با آن New شده، شما اگر این متغییر را به هرجا انتقال دهید میتوانید باشی اش هر کاری انجام دهید.
در form2 شما باید یک متغییر عمومی به form1 داشته باشید.
یعنی در form2 کد زیر را اضافه کنید
حالا فقط باید متغییر SubFormHandler را پر کنید، این متغییر را باید جایی مقدار دهی کنید Form1 را New کرده اید و در واقع هم اشاره گر Form1 و هم Form2 را دارید....کد:Public Class Form2
Inherits System.Windows.Forms.Form
Public SubFormHandler As Form1
Private Sub ...
'...
Me.SubFormHandler.Width = 400;
'...
End Sub
'....
form2handler.SubFormHandler = form1handler
مثلاً اگر form1 را از داخل form2 میسازید، کدی شبیه این خواهد شد.
و یا اگر form1 و form2 را هر دو در یک جای مشخص میسازید (هرجایی، مثلاً در همان parent) کدی شبیه این نیاز دارید.کد:Dim x As New Form1
'...
'...
Me.SubFormHandler = x
'...
درنهایت کلاً انجام همچین کاری صحیح نیست و در نهایت فقط باید فرمهای child شما به فرم والد متصل باشند و خودشان مستقلاً نباید با هم کاری داشته باشند، کاری که انجام میدهید اصلاً مطابق با اصول برنامه نویسی پروژهای متوسط و بزرگ نیست و در برنامه های کوچک هم انجامش منطقی نیست.کد:Dim x As New Form1
Dim y As New Form2
'...
'...
y.SubFormHandler = x
'...
کد نویسی بی قائده و قانون موجب میشود بعد از مدت کدی اسپاگتی مانند داشته باشید و هر چیزی از این سر کد آن سر کد را متاثر کند و در نهایت برنامه نویس اصلی را هم گیج و سردرگم کند، توصعه و اشکال یابی این برنامه هم میتوانید بسیار طاقت فرسا باشد.
از راهنماییتون ممنون. واقعا سطح بالا صحبت میکنید ... سعی میکنم بفهمم چی میگید.
اگه بگم چیزی متوجه نشدم چی کار میکنید ؟
سلام
چه کار کنم خوبه؟ میخواهید سرم را بکوبونم به مانیتور؟ (البته مانیتور مانیتور که نه! یک چیز ارزان تر که ورشکست نشم!)نقل قول:
اگه بگم چیزی متوجه نشدم چی کار میکنید ؟
همه ما وقتی به دنیا می آییم، صفر صفر هستیم، ولی در طی زمان و با پشتکار فیزیک کوانتم را هم یاد میگیرم !
خیالتان راحت و آسوده بخوابید! در بین انسانها علامه مادرزاد نداریم!
بقیه صحبت ها را ول نکنید، نخواستیم، این ها را یکبار دیگر بخوانید.
اگر باز متوجه نشدید باید یک نمونه کد-پروژه برایتان آپلود کنم.نقل قول:
در form2 کد زیر را اضافه کنید
کد:Public Class Form2
Inherits System.Windows.Forms.Form
Public SubFormHandler As Form1
Private Sub ...
'...
Me.SubFormHandler.Width = 400
'...
End Sub
'....
اگر form1 و form2 را هر دو در یک جای مشخص میسازید (هرجایی، مثلاً در همان parent) کدی شبیه این نیاز دارید.
کد:Dim x As New Form1
Dim y As New Form2
'...
'...
y.SubFormHandler = x
'...
'...
x.Show
y.Show
'...
(البته این هفته زمان اپدیت یک برنامه ام است و باید حجم زیادی کد را حاضر کنم... نتیجتاً می افتد برای پنجشنبه، جمعه... :11:)
SubFormHandler چیه ؟
سلام
یک متغییر، شما اسمش را Gholi بگذارید!نقل قول:
SubFormHandler چیه ؟
این متغیر شی form1 را نگه میدارد.
Form1 و String در واقع مثل یک نقشه مهندسی هستند، که چیدمان قطعات در RAM و وظایف را مشخص میکنند، همواره منفرد هستند، فقط یکی، ولی عملیاتی نیستند.کد:Dim x As Form1
Dim y As Form1
Dim z As DataSet
x = New Form1
y = New Form1
z = DataSet
x.Width = 110
z.AcceptChange
دقیقاً مثل یک نقشه مهندسی و کامل یک ماشین، که چیدمان قطعات و وظایف را مشخص میکند، نقشه واحد است و مثلاً نقشه مهندسی پیکان زرد با پیکان قرمز تفاوتی نمیکند، ولی عملیاتی نیست، (همانطور که بارها گفته ام) به این معنی که شما نمیتوانید سوار کاغذ نقشه شوید و انتظار داشته باشید راه رود، نمیتوانید دستور دهید، درش باز شود، نمیتوانید ...
باید از روی نقشه کاغذی یک یا چند نمونه واقعی بسازید، آنگاه نمونه عملی را میتوانید در پارکینگ پارک کنید، درش را باز کنید، فرمان حرکت دهید، فرمان توقف بدهید، فرمان .... این دستور ساختن نمونه جدید در دات نت با کلمه New صورت میگیرد.
آن نقشه همان کلاسس است و بعد از New یک شی واقعی میشود.
اشیای واقعی ساخته شده از روی یک کلاسس مشخص، میتوانند مستقل عمل کنند، مثل ماشین های پیکان ساخته شده از روی یک نقشه، با وجود نقشه واحد، بعد از ساخت هر کدام میتوانند تحت قابلیتهای نقشه اولیه مستقلاً عمل کنند، یکی در حرکت باشد و یکی در توقف ....
مجدداً به کدی که چند خط بالاتر نوشته ام نگاه کنید... Form1 واحد است و چیزی برای اجرا ندارد ولی x و y شی حقیقی هستند.
شما به شی واقعی که وجود دارد میتوانید فرمان دهید و انتظار اطلاعت داشته باشید نه به یک کلاسس یا نقشه غیر واقعی.
مفاهیم اصلی شی گرایی و وراثت و پلی مورفیزم را به سادگی میتوانید در طبیعت و دنیای غیر برنامه نویسی پیدا کنید، در اصل تفکر پایه این مفاهیم پیشرفته برنامه نویسی یک نوع کپی برداری طبیعت واقعی است.
(
VB6 دستورات صحیحی مثل این را قبول داشت...
Dim x As New Form1
x.Show
ولی متاسفانه متاسفانه متاسفانه VB6 که از OOP (شی گرایی) پشتیبانی نمیکرد، دستورات مایه خجالتی مثل Form1.Show را مجاز میدانست، همچنان برنامه نویسان دیگر زبانها VB کارها را مسخره میکنند، به علت وجود دستور افتضاح و صد در صد ضد OOP مثل Form1.Show .... :41:
از آن بدتر اینکه مایکروسافت دستورات افتضاحی مثل این را برای کمک به VB6 کارها در VB7-8-9 حذف نکرد :13:
و همچنان این لکه ننگ وجود دارد.:11:
البته vb7-8-9 به علت وجود دات نت در ذات نمیتوانند از OOP تخطی کنند و دستور اشتباه فوق را هم به کمک کلاسسی در فضای My و با عضو Shared ای انجام میدهند، وگرنه اگر کد را در #C وارد کنید و یا VB را بدون فضای My کامپایل کنید، به مجرد استفاده از کلاسس برای دسترسی به اعضا یش با خطا سینتکسی مواجه خواهید شد و جلوی کامپایل گرفته میشود.
)
از راهنماییتون خیلی ممنون.
اگه امکان داره در صورتی که وقت کردید یه پروژه ی ساده درست کنید و برام آپلود کنید تا بهتر یاد بگیرم ...
برای چی کار با فرم های MDI در vb2008 اینقدر متفاوت شده ؟
یه جورایی میشه گفت نسبت به vb6 سخت تر شده و کسی که از vb6 داره به vb2008 سفر میکنه، گیج میشه.
سلام
به نظر من که خیلی ساده تر شدهنقل قول:
برای چی کار با فرم های MDI در vb2008 اینقدر متفاوت شده ؟
یه جورایی میشه گفت نسبت به vb6 سخت تر شده و کسی که از vb6 داره به vb2008 سفر میکنه، گیج میشه
آیا پیچیده است؟
اون مبحث مخالف شی گرایی را هم که VB6 ساپروت میکده، اگر دقت بیشتری کنید به راحتی متوجه پوچ بودم و غیر عقلانی بودنش میشوید!!!کد:Dim f As New frmChild
f.MdiParent = Me
f.Show()
چرا؟
شما 3 دکمه روی پنجره خود میگذارید! با نام متغییر های Button1 و Button2 و Button3
برای تغییر متن یا رنگ هر دکمه دستور مثل این را میدهد "Button2.Text = "a
حالا اگر کسی از شما مشابه همین سوال را بپرسد و بگوید چرا نمیتوانم بنویسم "Button.Text = "h و خود زبان برنامه نویسی از روی جادو و جنبل متوجه شود منظورم کدام دکمه بوده شما چه جوابش را میدهد؟
آیا دستور Button1.Text منطقی تر و مشخص تر و شفاف تر تر است و امکانات بیشتری به شما میدهد یا
فکر میکنید دستور Button.Text منطقی تر است؟؟؟؟
form هم یک شی است مثل Button
همانطور که هر پنجره میتوانید چندین button داشته باشد، هر برنامه یا mdi میتواند چندین Form داشته باشد (آیا photoshop را ندیده اید؟) پس چطور انتظار دارید که با نام form و نه نام متغییر بتوانید form را دستکاری کنید؟؟؟
کاری با صحیح و غلطش ندارنم، خودتان باشید کدام دستور منطقی است؟
کد:---1---
Dim f1 As New Form1
Dim f2 As New Form1
f1.Text = "hello"
f2.Text = "x"
یا
---2---
Dim f1 As New Form1
Dim f2 As New Form1
Form1.Text = "hello"
Form1.Text = "x"
دو نمونه برایتان اپلود کردم...نقل قول:
اگه امکان داره در صورتی که وقت کردید یه پروژه ی ساده درست کنید و برام آپلود کنید تا بهتر یاد بگیرم ...
نمونه اول آن چیزی است که خواسته اید و بنابر چند خط آخر پست 4 با قوانین VB9 سازگار است ولی با قوانین برنامه نویسی ساختار یافته چندان مطابق نیست.
نمونه دوم هم یک مثال ساده است که هم با vb9 سازگار است و هم با قوانین برنامه نویسی ساختار یافته
rapidshare.com/files/165934611/MDI.zip