[วิดีโอ,B4X] การแปลงแอพ B4A เป็น B4i

Theera

Well-Known Member
Licensed User
Longtime User
ขอขอบคุณ mcqueccu ณ โอกาสนี้ด้วย ที่เพิ่มคำบรรยาย ภาคภาษาไทยให้ในคลิปวิดีโอ (เนื้อหาอยู่ค่อนข้างท้ายของคลิปวิดีโอ)


==หลักการแปลงแอพ B4A เป็น B4i มีดังนี้==
1.เพิ่มไลบารี่ที่จำเป็น ได้แก่ ไลบารี่ iXUI ,XUI Views และ iSQL (ถ้าไม่เพิ่ม ไลบารี่ iXUI และ XUI Views จะไม่สามารถคัดลอกวิวต่างๆ ในข้อที่3 ได้)
2.นำการเพิ่มโมดูล ไฟล์นามสกุล *.Bas ไปยังโครงงานใหม่ ในตัวอย่างนี้ ได้แก่ โมดูล actAdd.Bas และ โมดูล actDashboard.bas โดยตั้งความสัมพันธ์เป็นแบบ Relative Path
3.คัดลอกวิวต่างๆในแต่ละ layout โดย เปิด B4A Layout designer กับ เปิด B4i Layout designer คู่กัน จากนั้น ใช้ Ctrl+A ,Ctrl+C และ Ctrl+V ทำให้ได้ไฟล์ *.bil (เช่นเดียวกับ *.bal
ใน B4A)
4.แก้ไขข้อผิดพลาดในโครงการ B4i และใช้คำสั่งในการคอมไพล์แบบมีเงื่อนไข
-ประกาศตัวแปร Dim sql As SQL ใน Process_Globals ของ Main
B4X:
Sub Process_Globals
    Public App As Application
    Public NavControl As NavigationController
    Dim sql As SQL
End Sub

-ตั้งค่า NavControl.NavigationBarVisible เป็น False ในโมดูล Application_Start( Nav As NavigationController) เพื่อไม่ต้องการแสดงบาร์ไตเติ้ล
B4X:
Private Sub Application_Start( Nav As NavigationController)
    NavControl=Nav
    Dim PagesManager  As B4XPagesManager
    PagesManager.Initialize(NavControl)

    NavControl.NavigationBarVisible=False

End Sub

-ทำการ Sync files โดยทำการกด Ctrl + click to sync files: ide://run?file=%WINDIR%\System32\Robocopy.exe&args=..\..\Shared+Files&args=..\Files&FilesSync=True
B4X:
 #Region Shared Files
#CustomBuildAction: folders ready, %WINDIR%\System32\Robocopy.exe,"..\..\Shared Files" "..\Files"
'Ctrl + click to sync files: ide://run?file=%WINDIR%\System32\Robocopy.exe&args=..\..\Shared+Files&args=..\Files&FilesSync=True
#End Region



-แก้ไขจัดการ Splash Page โดยเพิ่มรูป splash.png และแก้ไข NavigationBar Property ให้เอาเครื่องหมายถูกออกไป เพื่อไม่ต้องการแสดงไตเติ้ลบาร์
 
Last edited:
Top