PDA

View Full Version : تغییر نوع نمایش مکان نما از حالت عمودی به حالت افقی



mehr83
چهارشنبه 28 آذر 1386, 20:35 عصر
در حالت عادی در TextBox ها مکان نما بصورت یک خط عمودی نشان داده میشه
من میخوام بصورت یک خط افقی نشان داده بشه (به این صورت: -) و این خط رنگش و سرعت چشمک زدنش هم قابل تغییر باشه.
کسی میتونه کمکم کنه؟

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

mehr83
پنج شنبه 29 آذر 1386, 20:16 عصر
کسی نیست کمکم کنه؟؟؟؟؟؟؟؟؟؟؟؟؟

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

Ner'zhul Arthas
پنج شنبه 29 آذر 1386, 20:27 عصر
باید خودتون مکان نما رو بسازید.

mehr83
پنج شنبه 29 آذر 1386, 23:21 عصر
باید خودتون مکان نما رو بسازید.

یعنی چطوری؟
چیکار باید بکنم؟
میشه راهنمایی کنید و یه کم توضیح بدین
من واقعا به این کار نیاز دارم

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

amirsajjadi
جمعه 30 آذر 1386, 06:07 صبح
با سلام
با استفاده از توابع API میشه این کار رو کرد به این صورت :


Private Declare Function CreateCaret Lib"user32" (ByVal hwnd As Integer, ByVal hBitmap As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer) As Integer
Private Declare Function ShowCaret Lib"user32" (ByVal hwnd As Integer) As Integer
Private Declare Function GetFocus Lib"user32" () As Integer

Private Sub TextBox1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus
Dim hnd As Int32 = TextBox1.Handle.ToInt32
Dim w, h As Integer
w = 10 'Width
h = 2 'Height
Call CreateCaret(hnd, 0, w, h)
Dim X As Integer = ShowCaret(hnd)
End Sub

mehr83
جمعه 30 آذر 1386, 11:20 صبح
واقعا عالی بود
دستتون درد نکنه
فقط من هر کاری کردم نتونستم این مکان نما رو بیارم پائین
بالای textbox نشون داده میشه
حتی با تنظیمات textbox هم مکانش تغییر نمیکنه
و وقتی فرمم راست به چپ هست این مکان نما ناقص دیده میشه

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

mehr83
جمعه 30 آذر 1386, 11:34 صبح
وقتی صفحه کلید فارسی میشه و میخوام تو textbox فارسی تایپ کنم مکان نما به حالت اول بر میگرده

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

amirsajjadi
جمعه 30 آذر 1386, 17:44 عصر
درسته ؛ متاسفانه بعضی از API های ویندوز RightToLeft رو پشتیبانی نمیکنن
کارش نمیشه کرد

mehr83
جمعه 30 آذر 1386, 18:42 عصر
این مکان نما بالای TextBox نمایش داده میشه
نمیشه کاریش کرد که پایین TextBox نمایش داده بشه؟

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

Ner'zhul Arthas
جمعه 30 آذر 1386, 23:43 عصر
من همین ای پی آی شکل کاملتر استفادش رو دارم که میشه عکس گذاشت.
ولی به vb 5 اگر میخواید بذارم اینجا.

mehr83
شنبه 01 دی 1386, 08:09 صبح
من همین ای پی آی شکل کاملتر استفادش رو دارم که میشه عکس گذاشت.
ولی به vb 5 اگر میخواید بذارم اینجا.

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

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

Ner'zhul Arthas
شنبه 01 دی 1386, 13:02 عصر
من به دات نت تبدلیش کردم ولی دیگه عکس رو قبول نکرد.
این به وی بی 5 یا 6 باید باشه:

mehr83
دوشنبه 10 دی 1386, 00:34 صبح
کسی دیگه روشی بلد نیست؟؟

----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)