Bonjour MLD,
Même en C++ et Qt, les gadgets ne sont pas souvent adapté à nos envie et besoins, le langage qui pour moi possède le plus grand nombre de gadgets intéressants pour le développement d'application de gestion reste Windev, mais il comporte d'autres inconvénienst. Je reste convaincu que PureBasic avec son canvasGadget et maintenant OpenGLgadget offre de nombreuses possibilittés, évidement cela demande beaucoup de travaille de développé des gadgets personnalisés, mais cela peut'être payant. Et j’avouerais que Purebasic et presque aussi simple que windev au point de vue syntaxe et pourtant 20 fois moins cher, il offre de nombreuses autres possibilités au vue de ces performances. N'oublions pas que si je ne me trompe, PureBasic est développé en assembleur et cela fait une méchante différence.
Table / Mémoire et Data
- microdevweb
- Messages : 1798
- Inscription : mer. 29/juin/2011 14:11
- Localisation : Belgique
Re: Table / Mémoire et Data
Windows 10 64 bits PB: 5.70 ; 5.72 LST
Work at Centre Spatial de Liège
Work at Centre Spatial de Liège
- microdevweb
- Messages : 1798
- Inscription : mer. 29/juin/2011 14:11
- Localisation : Belgique
Re: Table / Mémoire et Data
Nouvelle version 2.2 beta 5
Ajout de colonne calculée
Ajout de colonne calculée
Windows 10 64 bits PB: 5.70 ; 5.72 LST
Work at Centre Spatial de Liège
Work at Centre Spatial de Liège
- Kwai chang caine
- Messages : 6962
- Inscription : sam. 23/sept./2006 18:32
- Localisation : Isere
Re: Table / Mémoire et Data
Oui c'est vrai sûrement 20 fois moins cher...mais tu oublies le cadeau de 2 samsung s5 ou une télé 149 cm
Je me suis dit....put....ils doivent en gagner du blé pour pouvoir offrir de tels cadeaux ??
Le budget de notre fred permettrait à peine de payer l'emballage d'un des deux s5
Pour ce qui est de pb, je crois qu'il est fait en c et peut être même c++
L'IDE est fait en PB...trop fort le serpent qui se mort la queue
Peut être me trompe je...Ça voudrait dire que comme quand j'étais jeune, je dormais près du radiateur, quand le prof parlait
Je me suis dit....put....ils doivent en gagner du blé pour pouvoir offrir de tels cadeaux ??
Le budget de notre fred permettrait à peine de payer l'emballage d'un des deux s5
Pour ce qui est de pb, je crois qu'il est fait en c et peut être même c++
L'IDE est fait en PB...trop fort le serpent qui se mort la queue
Peut être me trompe je...Ça voudrait dire que comme quand j'étais jeune, je dormais près du radiateur, quand le prof parlait
Re: Table / Mémoire et Data
Bonjour microdevweb et merci pour le partage.
Tu peux faire plus simple quand tu n'utilises qu'un module :
par contre, j'ai mis tous les Xinclude dans le module table, comme ça, l'utilisateur peut les omettre !
Tu peux faire plus simple quand tu n'utilises qu'un module :
Code : Tout sélectionner
;-* Test
XIncludeFile "Table.pbi"
UseModule Table
Global Designation,PrixHTVA,TauxTva,Total
Procedure TesteSelectLine(NLine)
Debug "Vous avez sélectionné la ligne ID "+Str(NLine)
EndProcedure
Procedure TesteEditLine(IdLine,IdColumn,Value$)
Debug "Vous avez modifié la ligne "+Str(IdLine)+" Colonne "+Str(IdColumn)+" Valeur : "+Value$
EndProcedure
Procedure$ CalculColumn(Array DataLine.s(1))
Protected PHT.f,TVA.f,Tot$
PHT=ValF(DataLine(PrixHTVA))
TVA=ValF(DataLine(TauxTva))
Tot$=StrF(PHT*TVA,2)
ProcedureReturn Tot$
EndProcedure
Procedure OpenMainForm()
Protected W=900,H=600,Flag,N,Txt$,R,NT
Protected Tva$="1.06/1.17/1.21"
Flag=#PB_Window_SystemMenu|#PB_Window_ScreenCentered
OpenWindow(0,0,0,W,H,"Test Table",Flag)
Create(0,50,50,800,400,"Table")
Designation=AddColumn(0,200,"Désignation")
PrixHTVA=AddColumn(0,200,"Prix Htva")
TauxTva=AddColumn(0,200,"Taux TVA")
Total=AddColumn(0,300,"Total")
SetProcedureCallBackSelectLine(0,@TesteSelectLine())
SetProcedureCallBackEditLine(0,@TesteEditLine())
AddCalculColumn(0,Total,@CalculColumn())
For N=1 To 1000 ;Ajoute 100 lignes pour le test
;La première ligne commence à 0
Txt$=""
For R=1 To Random(10,5)
Txt$+Chr(Random(122,97))
Next
AddItem(0,Designation,-1,Txt$) ;-1 pour ajouter un ligne et la colonne 1
Txt$=""
Txt$=Str(Random(10000,10))
AddItem(0,PrixHTVA,N-1,Txt$);autre pour ajouter sur la colonne 2 de la même ligne
Txt$=""
NT=Random(3,1)
Txt$=StringField(Tva$,NT,"/")
AddItem(0,TauxTva,N-1,Txt$);autre pour ajouter sur la colonne 3 de la même ligne
AddItem(0,Total,N-1,"");autre pour ajouter sur la colonne 3 de la même ligne
Next
Draw(0)
EndProcedure
Global gEvent
OpenMainForm()
Repeat
Delay(5)
gEvent=WindowEvent()
Event(0,gEvent)
Until gEvent=#PB_Event_CloseWindow
;} FIN Test
Microsoft Windows 10 Famille 64 bits : Carte mère : ASRock 970 Extreme3 R2.0 : Carte Graphique NVIDIA GeForce RTX 3080 : Processeur AMD FX 6300 6 cœurs 12 threads 3,50 GHz PB 5.73 PB 6.00 LTS (x64)
Un homme doit être poli, mais il doit aussi être libre !
Un homme doit être poli, mais il doit aussi être libre !
- microdevweb
- Messages : 1798
- Inscription : mer. 29/juin/2011 14:11
- Localisation : Belgique
Re: Table / Mémoire et Data
Bonjour Micoute,
Merci du conseil.
Imbécile que je suis, j'avais essayé les Xinclude dans table, mais dans le module même ce qui avait fortement faché Pb, bon sang mais c'est bien sur, il suffit de la placer avant DeclareModule
a+
Merci du conseil.
Imbécile que je suis, j'avais essayé les Xinclude dans table, mais dans le module même ce qui avait fortement faché Pb, bon sang mais c'est bien sur, il suffit de la placer avant DeclareModule
a+
Windows 10 64 bits PB: 5.70 ; 5.72 LST
Work at Centre Spatial de Liège
Work at Centre Spatial de Liège
Re: Table / Mémoire et Data
bonjour,vous avez raison !
merci beaucoup !
--------------
coque samsung galaxy alpha
étui samsung galaxy alpha
merci beaucoup !
--------------
coque samsung galaxy alpha
étui samsung galaxy alpha