MicroGrid ~ Rev 0.97 now available.

Share your advanced PureBasic knowledge/code with the community.
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Thorsten1867 »

Sounds interesting. I use often SQLite in my programs.
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
Mohawk70
Enthusiast
Enthusiast
Posts: 404
Joined: Thu May 11, 2006 1:04 am
Location: Florida, USA

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Mohawk70 »

Yes
HP Z800 Workstation
CPU : Dual Xeon 5690 3.46GHz
RAM : 96GB RAM ( 8GB x 12 )
PSU : 1100W
GPU : NVIDIA RTX 3050 8GB
STORAGE : 9TB
(4) 2TB Seagate IronWolf Pro HDD
(1) 1TB Samsung 870 EVO SSD
GoodNPlenty
Enthusiast
Enthusiast
Posts: 112
Joined: Wed May 13, 2009 8:38 am
Location: Arizona, USA

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by GoodNPlenty »

I'm very interested. Thank You for sharing your excellent project.
User avatar
flaith
Enthusiast
Enthusiast
Posts: 704
Joined: Mon Apr 25, 2005 9:28 pm
Location: $300:20 58 FC 60 - Rennes
Contact:

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by flaith »

Definitively interested :D
“Fear is a reaction. Courage is a decision.” - WC
User avatar
Tenaja
Addict
Addict
Posts: 1959
Joined: Tue Nov 09, 2010 10:15 pm

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Tenaja »

+1.
Thanks for sharing.
RichardL
Enthusiast
Enthusiast
Posts: 532
Joined: Sat Sep 11, 2004 11:54 am
Location: UK

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by RichardL »

Hi Folks,

OK... it is your lucky day!

I have put all the files needed to play with the latest version of uGrid in a dropbox.
Hopefully this will work; I'm a DropBox newbie, but it seems straightforward enough.

Famous last words... this is a new link to a zipped directory...
https://www.dropbox.com/s/sztq0ch2oohm7 ... uation.zip

Please read the ReadMeFirst... and you will need a few 'picture.jpg' files and edit their path\names into my test code.
The user notes are reasonably up to date.

Please let me know how you get on!

RichardL
Last edited by RichardL on Fri Mar 14, 2014 6:56 pm, edited 3 times in total.
User avatar
Thunder93
Addict
Addict
Posts: 1788
Joined: Tue Mar 21, 2006 12:31 am
Location: Canada

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Thunder93 »

Your firewall might be blocking access.
ʽʽSuccess is almost totally dependent upon drive and persistence. The extra energy required to make another effort or try another approach is the secret of winning.ʾʾ --Dennis Waitley
RichardL
Enthusiast
Enthusiast
Posts: 532
Joined: Sat Sep 11, 2004 11:54 am
Location: UK

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by RichardL »

Hi,
Reposted the stuff to DropBox and downloaded OK... see link in my earlier post today.
RichardL
User avatar
Kwai chang caine
Always Here
Always Here
Posts: 5494
Joined: Sun Nov 05, 2006 11:42 pm
Location: Lyon - France

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Kwai chang caine »

The download works
Thanks a lot RICHARDL for sharing and also to have thinking to the request of little Kcc 8)
I'm on my phone now, i test your code, when i found a PC somewhere :wink:
ImageThe happiness is a road...
Not a destination
GoodNPlenty
Enthusiast
Enthusiast
Posts: 112
Joined: Wed May 13, 2009 8:38 am
Location: Arizona, USA

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by GoodNPlenty »

Download works. Thank You RichardL for sharing such a great project. :D
Mohawk70
Enthusiast
Enthusiast
Posts: 404
Joined: Thu May 11, 2006 1:04 am
Location: Florida, USA

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Mohawk70 »

Thank you ! Downloading now ...
HP Z800 Workstation
CPU : Dual Xeon 5690 3.46GHz
RAM : 96GB RAM ( 8GB x 12 )
PSU : 1100W
GPU : NVIDIA RTX 3050 8GB
STORAGE : 9TB
(4) 2TB Seagate IronWolf Pro HDD
(1) 1TB Samsung 870 EVO SSD
User avatar
flaith
Enthusiast
Enthusiast
Posts: 704
Joined: Mon Apr 25, 2005 9:28 pm
Location: $300:20 58 FC 60 - Rennes
Contact:

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by flaith »

Thanks a lot :)
“Fear is a reaction. Courage is a decision.” - WC
RichardL
Enthusiast
Enthusiast
Posts: 532
Joined: Sat Sep 11, 2004 11:54 am
Location: UK

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by RichardL »

Good morning all,
I forgot to mention in my earlier posting:

In the demo program the code to create a database full of random data is commented off... please undo this :oops:
It creates 10,000 entries and takes several minutes. For quicker testing it would be better to reduce the number of records to 100.
(There are two instances of '10000')

Cheers,
RichardL
User avatar
Kwai chang caine
Always Here
Always Here
Posts: 5494
Joined: Sun Nov 05, 2006 11:42 pm
Location: Lyon - France

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by Kwai chang caine »

Hi RichardL

Like promise, i have test your great code 8)
I have try to have only two columns without success...
And i have try to have the picture at right and text left and i not had success too :oops:
What i have missing ?

Code: Select all

XIncludeFile "MicroGrid96.PBI"

Enumeration 4242
  #Win_Test
  #Gad_Grid3
EndEnumeration
 
Procedure uGridCallback(uGridNum,uGridEvent,IParam.i,*uGridCell)
   
EndProcedure
 
Global GadHelp,DB_RowCount

OpenWindow(#Win_Test,0,0,1020,755,"MicroGrid Test 0.94",#PB_Window_ScreenCentered|#PB_Window_SystemMenu)
  
;{- Demo two state Image cells
With uGridDefaults
  \GridFont       = "Arial"
  \GridFontH      = 8
  \TitleFont      = "CourierNew"
  \TitleFontH     = 12
  \ImageCellH     = 100 ; Cell height when #uGrid_UseAuxH specified **
EndWith
 
k$ = "Pics[300]|Text[70]|[100]|"
uGridGadget(#Gad_Grid3,0,0,0,0,k$,3,#uGrid_AutoSizeX|#uGrid_AutoSizeY|#uGrid_UseAuxH) ; Make grid with tall cells **
uGridSetCellType(#Gad_Grid3,1,0,2,-1,#uGrid_CellImageFlip) ; Columns 2 and 3 to be images.
  
;  ========== Modify Filename$ to suit your system =========== USER WORK HERE !!!!
UseJPEGImageDecoder() ; Define libraries

FileName$ = "Picture.jpg"
T = uGridGetCellPtr(#Gad_Grid3,2,0)
uGridDrawFileImage(T,0,FileName$)

FileName$ = "Picture.jpg"
T = uGridGetCellPtr(#Gad_Grid3,2,1)
uGridDrawFileImage(T,0,FileName$,0)

FileName$ = "Picture.jpg"
T = uGridGetCellPtr(#Gad_Grid3,2,2)
uGridDrawFileImage(T,0,FileName$)

uGridRefreshGrid(#Gad_Grid3)  ; show initial states.
 
Repeat

 Select WaitWindowEvent(10)
 
  Case #PB_Event_CloseWindow
  
    Break
    
  Case #PB_Event_Gadget
  
   uGridService(EventGadget())
        
  EndSelect
 
 ForEver
ImageThe happiness is a road...
Not a destination
RichardL
Enthusiast
Enthusiast
Posts: 532
Joined: Sat Sep 11, 2004 11:54 am
Location: UK

Re: MicroGrid ~ Does anyone want Rev0.96?

Post by RichardL »

Hi KCC,
You probably need to specify the full path and picture name...
Richard
Post Reply