کنترل چرخش صفحه

[mamix 2]

سلام و درود و خسته نباشید فراوان

از دوستان و سروران کسی بلده چطوری میشه سنسور چرخش صفحه رو کنترل کرد و اون رو با یک باتن off - on کرد؟

[mamix 2]

استادای عزیزم فکر کنم موضوع خیلی مهمی باشه ک کمتر بحث شده تو انجمن

الان این کد فقط برنامه خودمو تغییر میده

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

ممنون میشم اساتید جواب بدن...

[jeqele 563]

ندیدم جایی کل گوشیو افقی عمودی کرد به صورت ثابت.

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

[حمید زارع 331]

اگه فقط برای برنامه خودتون میخوای با خاصیت SupportedOrientations میتونید تغییرش بدید...

 

 

SupportedOrientations  رو باید چجوری تغییر بدیم که صفحه بچرخه یا نه ؟

[mamix 2]

ندیدم جایی کل گوشیو افقی عمودی کرد به صورت ثابت.

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

سلام میشه بیشتر توضیح بدید؟

[sganji 678]

اگه فقط برای برنامه خودتون میخوای با خاصیت SupportedOrientations میتونید تغییرش بدید...

[امین شاهدی 5,777]

برای کنترل و اینکه با باتن On و Off شه اینجوری استفاده کن :

Dim p As Phone
p.SetScreenOrientation(0) 'landscape
p.SetScreenOrientation(1) 'portrait
p.SetScreenOrientation(-1) 'hardo

[mamix 2]

واقعا خیلی عالی بود ممنون

فقط چیزی که هس این که بخام شرط بزارم که با یه باتن کنترل کنم چطوری میشه؟یعنی اگه روشن بود خاموش کنه و اگه خاموش بود روشن کنه؟

من اینو نوشتم نشد

	Dim p As Phone
	If p.SetScreenOrientation(1)  Then
	p.SetScreenOrientation(-1) 'hardo
Else
If p.SetScreenOrientation(-1) Then
p.SetScreenOrientation(1) 
End If
End If