Monthly Archives: June 2023

Kan project bestand niet openen

Posted on by

Bij het openen van een project krijg ik deze foutmelding:

Kan project bestand niet openen:
/home/cyb/Git/DbInfoCodePrj/dbinfocode

Void key
Project.ReadProject.3436 Project.Open.794 FWelcome.ProjectItem_Click.400 CProjectList.ProjectItem_Click.523 ProjectBox.DrawingArea_MouseUp.487 ?

Ik kan het bericht alleen wegklikken en blijf daarmee in het Gambas openingscherm om een project te kiezen.

Het project zit in een git repository.

Ik schakel over naar een andere branch (die kort daarvoor gemerged is met deze branch).

Nu gaat het project wel open. Ik schakel terug naar de “defecte” branch, en bekijk de foutmelding.
Die verwijst naar het project-bestand, dus ik open in een externe editor de .project file.

Daar vind ik stukken van een mislukte merge terug:

mcedit .project

# Gambas Project File 3.0
Title=DbInfoCode
Startup=MMain
Icon=img/DbInfoCode.png
<<<<<<< HEAD Version=3.2.11 ======= Version=3.2.12 >>>>>>> main
Component=gb.image
Component=gb.gui.qt
Component=gb.form

Ik verwijder de git lijnen en laat de juiste versie staan..

# Gambas Project File 3.0
Title=DbInfoCode
Startup=MMain
Icon=img/DbInfoCode.png
Version=3.2.12
Component=gb.image
Component=gb.gui.qt
Component=gb.form

Ok! Het project opent weer normaal.

Dataconnection vanuit lib of app?

Posted on by

Ik vraag me af of ik de verbinding met de databank vanuit de applicatie moet doen of vanuit de lib die de data-classes bevat.

Nodig:

1 project als lib (zie properties bij maken nieuw gambas project)
1 project als gewone gambas3 applicatie.

Ik gebruik ook:
– gb.db (Database toegang) en “Settings” in project properties, componenten (voorzien in Gambas).
– bibliotheek “DataContext” in project properties, libraries (deze moet je zelf afhalen)

In de lib zitten
– de classes bv CEmployee beschrijft de employee (properties voor velden enz).
– de Module MEmplData: bevat procedures voor het aanmaken van records, opvragen vanuit de classe voor het laden van de variabelen in de properties, bewaren vanuit de classe van het “object/record”.
– de Module MEmpData bezit ook hConData AS Connection

– de applicatie gaat de lib.hCondata initialiseren met de toegangsgegevens van de databank met behulp van DataContext.makeConnection.
(gegevens die gelezen worden uit een settings file – dat gebeurt in de DataContext class CDataContext; je kan er context naar settings mee maken, aktieve context zetten wat ook bewaard wordt in settings, nieuwe settings file maken, lijst alle contexten in settings opvragen, enz)

– in de applicatie ga je gewoon de “current” datacontext gebruiken, en je kan “switchen” van context door de “current” aan te passen via DataContext, en te “herladen”, maw de connectie terug te maken.

Git vanuit gambas

Posted on by

Voor een eigen programma waar de inhoud wordt bijgehouden in een git repository, zou ik die willen kunnen updaten vanuit mijn Gambas app. Sinds een tijdje is in de IDE een voorziening ingebouwd om de git branch om te schakelen enz vanuit de IDE, dus daar zit mogelijk een aanknooppunt.

Algemeen: een commando kan je vanuit Gambas lanceren met shell of exec.

In de broncode van gambas 3.18.0 vind je een map VersionControl met een Class CVersionControl, met een subclass CVersionControlGit.

Daarin:
Private Sub RunShell(sCmd As String, Optional bSilent As Boolean) As String
'
Return VersionControl.Shell("cd " & Shell(Project.Dir) & " && " & sCmd, bSilent)
'
End

In de Module (naam zonder M) “VersionControl” vind je:

Public Sub Shell(sCmd As String, Optional bSilent As Boolean, Optional aEnv As String[]) As String
'
Dim sResult As String
'
If Not bSilent Then Insert(sCmd & "\n")
Shell sCmd With aEnv To sResult
If Process.LastValue Then
$sLastResult = sResult
Insert(sResult)
Endif
Return sResult
'
End