پس ضمينه MDI FORM

[hamid67fathi]

سلام
چطور ميشه يه تصوير رو در پس ضمينه MDI Form تکرار کرد ؟؟

[ramsess]

ابتدا یه شیئ picture به فرمت اضافه کن و این دستورات رو بنویس
On Error Resume Next
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
MDIForm1.Picture = LoadPicture(CommonDialog1.FileName)
End If
البته ممکنه یه مشکل پیش بیاد که تصویر کاملا دیده نشه و احتیاج به refresh داشته باشه
یه دکه دیکه بزار و این کد رو بنویس
On Error Resume Next
Form17.WindowState = 2
Form17.WindowState = 0
موفق باشید

[xxxxx_xxxxx]

منظورتون از تكرار كرد چيه؟

[hamid67fathi]

منظورم اينه که وقتی يک عکس رو به عنوان پس ضمينه انتخاب ميکنی فول اسکيرين بشه يا هی تکرار بشه
تا کل صفحه پر بشه .
در فرم MDI Form (فرم مادر ) ميخوام انجام بدم

[vahidm]

سلام دوست عزیز شما می تونید یه کار دیگه هم بکنید که در یک نمونه برنامه کوچیک بهتون نشون میدم
امیدوارم که مشکلتون حل بشه
خدانگهدار

[reza_mn]

تو این روشتون اگه دو تا فرم تو mdi باشه و یکی رو جابجا کنی طوری که فرم mdi اسکرول بخوره با تغییر اسکرول فرم پس زمینه هم جابجا میشه و باز بک گراند اصلی فرم mdi ظاهر میشه.

[hamid67fathi]

سلام
ممنون که راهنمايی ميکنيد
اما اين چيزی نيست که من ميخواستم
صفحات وب رو که ديد دارای بس ضمينه هستن و با کوچک يا بزرگ کردن صفحه تغيير ميکنن
من يه همچين چيزی در ويبی ميخوام ..
ممنون

[hamid67fathi]

2 روز بعد !!!

[parselearn]

'Tile Picture
Dim intX As Integer
Dim intY As Integer
For intX = 0 To me.Width Step PSkin.Width
For intY = 0 To me.Height Step PSkin.Height
me.PaintPicture PSkin.Picture, intX, intY
Next intY
Next intX