loads
سه شنبه 09 تیر 1388, 15:39 عصر
سلام
من از کد زیر تو سیستم خودم استفاده کردم (برای تغییر رزولیشن) . خیلی عالی جواب داد . سوالم اینه که تو سیستم های کاربرهای دیگه هم بخوبی جواب میده ؟ چیزی که بهش شک کردم اون DirectX7 هستش که تو کد اومده
Dim DX_Main As New DirectX7
Dim DD_Main As DirectDraw4
Private Sub DX_Init()
Set DD_Main = DX_Main.DirectDraw4Create("")
DD_Main.SetDisplayMode 800, 600, 32, 85, DDSDM_DEFAULT
End Sub
Private Sub Form_Load()
DX_Init
Hide
End Sub
من از کد زیر تو سیستم خودم استفاده کردم (برای تغییر رزولیشن) . خیلی عالی جواب داد . سوالم اینه که تو سیستم های کاربرهای دیگه هم بخوبی جواب میده ؟ چیزی که بهش شک کردم اون DirectX7 هستش که تو کد اومده
Dim DX_Main As New DirectX7
Dim DD_Main As DirectDraw4
Private Sub DX_Init()
Set DD_Main = DX_Main.DirectDraw4Create("")
DD_Main.SetDisplayMode 800, 600, 32, 85, DDSDM_DEFAULT
End Sub
Private Sub Form_Load()
DX_Init
Hide
End Sub