کرسر برای فرم

[look20]

با سلام و خسته نباشید من در فرمی که ساختم یک موس بصورت دلخواه اتنخاب کردم وقتی فرمم لود میشه شکل موس به اون شکل تغییر می کنه حالا می خوام فقط این شکل توی پنجره فرمم باشه نه جای دیگه
یعنی وقتی موس رو وارد محیط فرمم می کنم موس به شکلی که براش تعریف کردم در بیاد و وقتی موس رو از فرم خارج می کنم به شکل خود موس سیستم در بیاد
کد
MouseHelper1.SetCursor App.Path & "\Mouse.cur"این کد قسمت فرممه و این کد زیر هم برای زمانی که اگه فرم رو بستم موس به شکل خود سیستم باشه


Private Sub Form_Unload(Cancel As Integer)
'set the old cursor, if not done before
MouseHelper1.SetCursor

End Sub
برای تغییر شکل موس از یه OCX استفاده کردم فقط همونطور که گفتم موندم چطور تعریف کنم وقتی موس رو از فرم خارج کردم به شکل خود سیستم در بیاد

[amir.mehrvarz]

با سلام و احترام
دوست عزيز اون قسمت كد كه مربوط به فراخواني شكل ماوس مي باشد را در رويداد Form_MouseMove قرار بده. با اين كار هربار كه وارد محيط فرم مي شويد شكل ماوس شما به شكلي كه براي اون تعريف كردي در مياد و به محض خارج شدن از محيط فرم دوباره به شكل اول بر مي گردد.


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Form1.MousePointer = 2
End Sub

[look20]

با سلام و احترام
دوست عزيز اون قسمت كد كه مربوط به فراخواني شكل ماوس مي باشد را در رويداد Form_MouseMove قرار بده. با اين كار هربار كه وارد محيط فرم مي شويد شكل ماوس شما به شكلي كه براي اون تعريف كردي در مياد و به محض خارج شدن از محيط فرم دوباره به شكل اول بر مي گردد.


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Form1.MousePointer = 2
End Sub


با سلام ببخشید این کد جواب میده ولی من میخوام کرسر به شکلی که تعریف کردم بیاد نه یه علامت + ببینید وقتی توی فرم هستم کرسر + نشون داده میشه و وقتی خارج فرم هستم کرسری که تعریف کردم در صورتی که باید عکس این عمل انجام بشه در ضمن من از این ocx که ضمیمه کردم استفاده کردم لطف می کنید راهنمایی کنید

[kooroush]

سلام نمی دونم منظورتو خوب گفتم یا نه ولی mouse pointer فرم رو بزار تو حالت آخر (99 custom ) و بعد تو مشخصه موس آیکن آدرس کروس رو بده اینوری دیگه حتی لازم نیست از اون اکتیویکس استفاده کنی و امیدوام منظورتو درست گرفته باشم .....



وخداوند نیاز را آفرید تا انسانها یادی از هم کنند و بعد تشکر را به عمل آورند ...

[look20]

با سلام متوجه نشدم میشه توضیح بذین اگه میشه نمونه رو بسازین البته اگه امکان داشته باشه

[kooroush]

امیدوارم منظورتون همین بوده باشه !!!!!:افسرده:


وخداوند نیاز را آفرید تا انسانها یادی از هم کنند و بعد تشکر را به عمل آورند ...

[look20]

متوجه شدم مشکل برطرف شد ببخشید دوست عزیز فقط برای cur-ico هستش برای پسوند ani (مربوط کرسر متحرک ) رو چطور بشناسونم مثلا mouse.ani

[amir.mehrvarz]

لطفا پيوست را ملاحظه فرمائيد.

[look20]

لطفا پيوست را ملاحظه فرمائيد.
با سلام واقعا دستون درد نکنه
ببخشید اگه کرسر انیمیشنی باشه منظورم مثل ساعت شنی چطور باید تعریف کنم منظورم اینکه که نه از خود ویندوز بلکه اختیاری مثل همون( mouse pointer فرم رو بزار تو حالت آخر 99 custom و بعد تو مشخصه موس آیکن آدرس کروس رو بده اینوری)
منظورم رو متوجه شدید یعنی پسوند cur و ico نباشه یعنی برای کرسرهایی که پسوند ani دارند چکار کنم

[kooroush]

واسه پسوند ani هم من یک برنامه دیدم همین جا و سرچ بزن اگه پیدا نکردی تا بعد از ظهر آپ می کنم برنامه اش رو.

[amir.mehrvarz]

با سلام
لطفا مجددا پيوست را مشاهده كنيد . اميدوارم اون چيزي كه مي خواي باشه.

[look20]

با سلام مشکل کاملا حل شد واقعا ممنون ان شاء ا... خداوند همیشه شمارو توی راهی قرار بده که بتونید به مردم کمک کنید