تغییر اندازه صفحه هنگام بازشدن کیبورد

[Radiomedia 36]

سلام خدمت اساتید

من یه لی اوت دارم (محتویاتش تکت باکس و باتن شبیه فرم ثبت نامه) که فیت اندازه صفحه است اما وقتی کیبورد باز میشه تکست های آخری و باتن ها میرن زیر کیبورد و قابل اسکرول نیستن.

تو انجمن سرچ کردم کتابخانه IME رو معرفی کردن و بین چندتا دستوری که داشت مطمین بودم که خط زیر برای انجام این کاره، اما سوال اینجاست کجا باید کد رو استفاده بکنم تا وقتی روی هرکدوم تکست ها کلیک کردم صفحه اسکرول بشه؟ من خط پایین هم نوشتم فایده ای نداشت..

ممنون میشم پاسخ بدید

Sub txt4_FocusChanged (HasFocus As Boolean)
	If HasFocus = True Then
		IME.AddHeightChangedEvent
	End If
	
End Sub

 

[Radiomedia 36]

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

ببینید ما با استفاده ازین کتابخونه هنگام کلیک روی تکست یه فراخوانی رویداد میدیم و در رویداد هم اندازه ارتفاع اسکرول بار رو نصف صفحه میکنیم (اسکرول بار اینجا در خودش یک لی اوت دیگه رو لود کرده که مثلا ارتفاع داخلیش هم 1000 هست و البته ثابت و کاری با ارتفاع داخلی نداریم وفقط ارتفاع نمایشی )

و اما کد واضح هست

Sub txt1_FocusChanged (HasFocus As Boolean)
	If HasFocus = True Then
		IME.AddHeightChangedEvent
	End If
End Sub

Sub IME_HeightChanged (NewHeight As Int, OldHeight As Int)
	If NewHeight < OldHeight Then 'اینجا وقتی کیبورد باز میشه مقدار قدیمی بیشتر از جدید هست چون تمام صفحه بوده'
		scrlView.Height = 50%y
	Else
		scrlView.Height = 100%y
	End If
End Sub