Connecting the Forms to the Data-Layer (part 5)
This is the whole Desktop Code Sheet ;/ Created with PureVision64 v6.01 x64 ;/ Thu, 05 Oct 2023 18:19:52 ;/ by Peter Hollyer XIncludeFile "Blog_Constants.pb" XIncludeFile "Blog_Windows.pb" XIncludeFile "Utils/ComboBoxExModule.pbi" XIncludeFile "Utils/ListExModule.pbi" XIncludeFile "Models/DB.pbi" XIncludeFile "Models/SolarSystem.pbi" XIncludeFile "Models/Galaxy.pbi" Global WorkGalaxy.GALAXY::Galaxy Global WorkSolarSystem.SOLARSYSTEM::SolarSystem XIncludeFile "Views/frmSolarSystem.pbi" XIncludeFile "Views/frmGalaxy.pbi" Declare frmMainCustom() ;- Main Loop If Window_frmMain() frmMainCustom() Define Index, ID ;This Loads the ListIcon with all Galaxies in the Database GALAXY::LoadListIcon(#Gadget_frmMain_liList) ;If there ARE Records select the First If ListEx::CountItems(#Gadget_frmMain_liList) > 0 ListEx::SetState(#Gadget_frmMain_liList, 0) EndI...