کنترل فرم توسط کنترل OCX

[je_nickp]

یک کنترل OCX می خوام بنویسم که توسط کنترل باید یک سری خصوصیات فرمی که کنترل روی آن است دستکاری بشود مثلا عرض فرم کم و زیاد بشود، چه کار باید بکنم تا به خصوصیات فرم دسترسی پیدا کنم؟

[niloufar]

وا .... یعنی چی؟ منظورت همون Me.Name و Me.Caption و ... است؟ برای گرفتن شیئ پدر هم که Parent رو داریم :گیج:
اصلا یعنی چی که کلی OCX درست کنی که بیای و مثلا عنوان یا سایز فرم رو عوض کنی :گیج:

[بابک زواری]

یک کنترل در این زمینه هست به نام ArFormExtender رایگان هم هست بگردی میتونی برای دانلود یپدا کنی

[coder]

بفرض اگر بخواهی رنگ پس زمینه فرم را از داخل کنترل پیدا کنی :
UserControl.Ambient.BackColor
یعنی کنترل خودشو بنام usercontrol میشناسه و سند حاوی خودشو بنام Ambient
امیدوارم جوابتو داده باشم.

[Payam Moradi]

سلام

در UserControl یک متغییر به صورت ذیل تعریف کن :

Dim m_ParentFormو یک تابع هم به صورت ذیل:

Public Sub SetParentForm(iForm)
Set m_ParentForm = iForm
iForm.Caption = m_Caption
iForm.Top = 1000
Set iForm.Icon = m_Icon
' etc ...
End Sub
در فرمی که میخواهی آن را کنترل کنی در رویداد Load این تنظیم را انجام بده.(قبلا UserControl روی فرم قرار داده شد)با فراخوانی تابع موجود در UserControl تمام تنظیمات انجام میشود:

UserControl1.SetParentForm Me
با کمی تغییرات میتونی تمام تنظیمات در زمان دلخواه توسط UserControl انجام دهی.

موفق باشید. :flower: