From 1195f20ffb98f9f7653ada41200ae91c1a0e8f22 Mon Sep 17 00:00:00 2001 From: kake26 Date: Tue, 17 Sep 2024 22:11:44 -0500 Subject: [PATCH] save point --- kratom.db | Bin 0 -> 16384 bytes kratom.pb | 25 ++++++++++++++++++++++++- kratomfrm1.pbf | 12 ++++++++---- 3 files changed, 32 insertions(+), 5 deletions(-) create mode 100644 kratom.db diff --git a/kratom.db b/kratom.db new file mode 100644 index 0000000000000000000000000000000000000000..7688628454cbc6f63ce34b691d3d48d0b10d58c7 GIT binary patch literal 16384 zcmeI(OG^S#6u|L&eIz5O?Zj1=St&}0t=cuk5R#hNMA;^$nn?0Fj)a>YpU98Yr*PjL z4I&|2wJ`pNIWu$aJkM`;Vdng-)(JfIFz|bBp!USJkWw5dC4`9UjOmQ%lsXe%wcacu z99tK0u`91r87U&^naI4QXL>^*fB*srAbdS2qN69@ z4FG^tE9`Y7t?U;D<`ai>F~R1wyJfj)mA5VJ0D)A ztPAI~+R(SI+YP6X4BICVKmY**5I_I{1Q0*~0R#|0;GYYmbbm7QA@o8ZfB*srAb?bH?(Af=|v*S%Lrn literal 0 HcmV?d00001 diff --git a/kratom.pb b/kratom.pb index 6e4cf01..446e5d3 100644 --- a/kratom.pb +++ b/kratom.pb @@ -1,9 +1,32 @@ ; Main Code File +; init stuff + +UseSQLiteDatabase() XIncludeFile "kratomfrm1.pbf" +; init code + +dbfile$ = "kratom.db" ; created and setup with dbbrowser for now + +If OpenDatabase(0, dbfile$, "", "") + ;Debug "Connected to PureBasic.sqlite" +Else + MessageRequester("ERROR","I can't open the database kratom.db!",#PB_MessageRequester_Error) +EndIf + Openkrt1() +; window init + + + +AddGadgetItem (ListView_0, -1, "Item " + Str(a) + " of the Listview") + +HideWindow(krt1,#False) + +;AddGadgetItem (0, -1, "Item " + Str(a) + " of the Listview") + Repeat Event = WaitWindowEvent() @@ -19,6 +42,6 @@ Repeat Until Event = #PB_Event_CloseWindow ; Quit on any window close ; IDE Options = PureBasic 6.12 LTS (Linux - x64) -; CursorPosition = 11 +; CursorPosition = 21 ; EnableXP ; DPIAware \ No newline at end of file diff --git a/kratomfrm1.pbf b/kratomfrm1.pbf index 16b4b31..384a484 100644 --- a/kratomfrm1.pbf +++ b/kratomfrm1.pbf @@ -1,7 +1,4 @@ -; Form Designer for PureBasic - 6.12 -; Warning: this file uses a strict syntax, if you edit it, make sure to respect the Form Designer limitation or it won't be opened again. - -; +; ; This code is automatically generated by the Form Designer. ; Manual modification is possible to adjust existing commands, but anything else will be dropped when the code is compiled. ; Event procedures need to be put in another source file. @@ -14,6 +11,7 @@ Global Container_0, ListView_0, Text_0, Text_1, String_0, Button_0, Button_1, Bu Procedure Openkrt1(x = 0, y = 0, width = 830, height = 570) krt1 = OpenWindow(#PB_Any, x, y, width, height, "Kratom Picker GUI", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget) + HideWindow(krt1, 1) Container_0 = ContainerGadget(#PB_Any, 10, 10, 810, 550) ListView_0 = ListViewGadget(#PB_Any, 0, 60, 300, 470) Text_0 = TextGadget(#PB_Any, 70, 20, 130, 30, "Kratom Stock") @@ -41,3 +39,9 @@ Procedure krt1_Events(event) ProcedureReturn #True EndProcedure + +; IDE Options = PureBasic 6.12 LTS (Linux - x64) +; CursorPosition = 41 +; FirstLine = 7 +; Folding = - +; EnableXP \ No newline at end of file