مشکل در لایبرری پروجکت

[محمدی 95]

سلام تو پروجکت من این خط ارور میده

Dim AA As ClasSlidingSlider

نیاز به چه کتابخانه ای هست? لطفا لینک یا توضیخ میدید?

[مجید آرتا 5,874]

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

[محمدی 95]

Sub Globals
   Dim FakeActionBar, UnderActionBar As Panel
   Dim PanelWithSidebar As ClsSlidingSidebar
   Dim btnMenu As Button
   Dim lvMenu As ListView
   Dim lblInfo As Label
End Sub

Sub Activity_Create(FirstTime As Boolean)
   Dim BarSize As Int: BarSize = 60dip
   FakeActionBar.Initialize("")
   FakeActionBar.Color = Colors.RGB(20, 20, 100) 'Dark blue
   Activity.AddView(FakeActionBar, 0, 0, 100%x, BarSize)

   Dim LightCyan As Int: LightCyan = Colors.RGB(0, 95, 170)
   UnderActionBar.Initialize("")
   UnderActionBar.Color = LightCyan
   Activity.AddView(UnderActionBar, 0, BarSize, 100%x, 100%y - BarSize)

   PanelWithSidebar.Initialize(UnderActionBar, 190dip, 0, 1, 500, 500)
   PanelWithSidebar.ContentPanel.Color = LightCyan
   PanelWithSidebar.Sidebar.Background = PanelWithSidebar.LoadDrawable("popup_inline_error")
   PanelWithSidebar.SetOnChangeListeners(Me, "Menu_onFullyOpen", "Menu_onFullyClosed", "Menu_onMove")

   lvMenu.Initialize("lvMenu")
   lvMenu.AddSingleLine("1st option")
   lvMenu.AddSingleLine("2nd option")
   lvMenu.AddSingleLine("3rd option")
   lvMenu.SingleLineLayout.Label.TextColor = Colors.Black
   lvMenu.Color = Colors.Transparent
   lvMenu.ScrollingBackgroundColor = Colors.Transparent
   PanelWithSidebar.Sidebar.AddView(lvMenu, 20dip, 25dip, -1, -1)

   lblInfo.Initialize("")
   lblInfo.Text = "Click the button to open/close the sliding menu."
   lblInfo.TextColor = Colors.Black
   lblInfo.TextSize = 24
   PanelWithSidebar.ContentPanel.AddView(lblInfo, 30dip, 30dip, 100%x - 60dip, 100%y - 60dip)

   btnMenu.Initialize("")
   btnMenu.SetBackgroundImage(LoadBitmap(File.DirAssets, "menu.png"))
   FakeActionBar.AddView(btnMenu, 100%x - BarSize, 0, BarSize, BarSize)
   PanelWithSidebar.SetOpenCloseButton(btnMenu)
End Sub

Sub Activity_Resume
End Sub

Sub Activity_Pause (UserClosed As Boolean)
End Sub

Sub lvMenu_ItemClick (Position As Int, Value As Object)
   lblInfo.Text = "LAST SELECTION: " & Value
   PanelWithSidebar.CloseSidebar
End Sub

Sub Menu_onFullyOpen
   Log("FULLY OPEN")
End Sub

Sub Menu_onFullyClosed
   Log("FULLY CLOSED")
End Sub

Sub Menu_onMove(IsOpening As Boolean)
   Log("MOVE IsOpening=" & IsOpening)
End Sub

مرسی آقا مجید این کد نویسی هست دسترسی به اسکرین ندارم

[مجید آرتا 5,874]

سلام

نیاز به قرار دادن کد نبود.شما موقعی که کامپایل میکنی بعد بهتون یک اخطاری متنی چیزی بهتون میده شما همون متن رو اینجا قرار بدید بنده چک کنم

[محمدی 95]

http://answercenter.ir/thread495.html

تو این تاپیک توسط آقای مصطفی حقیقی گذاشته شده فقط لایبرری داخلش نیست الان اصلا نمیتونم برم پشت کامپیوتر اخطار هم برای نبودن لایبرری داده میشه صد در صد اگه لایبرری رو کسی داره لطفا قرار بده اگر نداره توضیح بده چکار باید کنم???

[szasza 0]

 با سلام

دوست عزیز شما باید کتابخانه مربوطه را به لیست  کتابخانه های پروژه اضافه کنید .در مسیر نصب نرم افزار پوشه ای به نام (Libraries) وجود دارد که دو فایل مربوط به کتابخانه که دانلود کرده اید یکی به فرمت (jar) و دیگری (xml) می باشد را این مسیر ذخیره کنید . سپس به محیط نرم افزار بروید و در سمت راست قسمت پایین گزینه (Libs) را انتخاب کرده.حالا شما تمام کتابخانه های خود پروژه و کتابخانه ای که شما اضافه کرده اید را می توانید ببینید .آن را انتخاب کنید .خطلای برنامه شما بر طرف میشود .