Flype - UserLibraries pour PureBasic 4.0

[comtois]

wow , c'est beau

[Anonyme2]

O0ui, c'est beaucoup plus beau que les graphes d'Excel !!!!!!!!!!!

Au boulot Flype

[Frenchy Pilou]

Ba ba babibel mais en multi couleurs

[Jacobus]

Tu veux dire qu'avec ta Lib on va pouvoir en faire autant ?

, mais c'est génial ça!!! j'entrevois des perspectives plus que prometteuses

[Flype]

Avec ma lib ? Bah déjà ce n'est pas la mienne, je n'ai fais que le wrapper.
Mais bon c'est vrai que l'include 'RmChart.PBI' traduit du fichier 'RmChartC.H' ( en C donc ) compte tout de même environ 1000 lignes.

Et oui, avec cette lib, on peut faire ce genre de graphs ( charts ).
Va falloir retrousser ses manches pour y arriver mais y'a plus qu'à

[Flype]

NOUVEAU

DesktopEx V1.0b for PB4

Et encore une nouvelle lib. Voir le 1er post, tout en haut.

Elle est en beta, j'ai encore 2 ou 3 problème à règler avec Tailbite (Debug et Unicode notamment).
A part çà devrait fonctionner sans problème.

Je vous laisse découvrir la liste des fonctions :

Code : Tout sélectionner

DesktopExName(index.l)            ; Returns the device name of the specified desktop, if any.
DesktopExString(index.l)          ; Returns the device string of the specified desktop, if any.
DesktopExRegID(index.l)           ; Returns the device id of the specified desktop, if any.
DesktopExRegKey(index.l)          ; Returns the device key of the specified desktop, if any.

DesktopExMouseY(index.l)          ; Returns the absolute/relative x mouse position. 
DesktopExMouseX(index.l)          ; Returns the absolute/relative x mouse position. 
DesktopExMouse(x.l, y.l, index.l) ; Set the absolute/relative mouse position.

DesktopExLeftArea(index.l)        ; Returns the left position (in pixels) in the work area of the specified desktop.
DesktopExTopArea(index.l)         ; Returns the top position (in pixels) in the work area of the specified desktop.
DesktopExWidthArea(index.l)       ; Returns the right position (in pixels) in the work area of the specified desktop.
DesktopExHeightArea(index.l)      ; Returns the bottom position (in pixels) in the work area of the specified desktop.

DesktopExTop(index.l)             ; Returns the top position (in pixels) of the specified desktop.
DesktopExLeft(index.l)            ; Returns the left position (in pixels) of the specified desktop.
DesktopExWidth(index.l)           ; Returns the width (in pixels) of the specified desktop.
DesktopExHeight(index.l)          ; Returns the height (in pixels) of the specified desktop.
DesktopExDepth(index.l)           ; Returns the depth (bits per pixels) of the specified desktop.
DesktopExFrequency(index.l)       ; Returns the frequency (in Hz) of the specified desktop.

DesktopExID(index.l)              ; Returns the handle (HMONITOR) of the specified desktop.
DesktopExFlags(index.l)           ; Returns the device flags of the specified desktop.

DesktopExIsActive(index.l)        ; Returns #TRUE if the specified desktop is active, else #False.
DesktopExIsPrimary(index.l)       ; Returns #TRUE if the specified desktop is the primary one, else #False.
DesktopExIsRemote(index.l)        ; Returns #TRUE if the specified desktop is remote one (Terminal Server), else #False.
DesktopExIsRemovable(index.l)     ; Returns #TRUE if the specified desktop is removable, else #False.
DesktopExIsVGACompatible(index.l) ; Returns #TRUE if the specified desktop is VGA Compatible, else #False.

DesktopExFromWindow(*hwnd)        ; Returns the #Desktop of the specified WindowID.
DesktopExFromRect(*lpRect)        ; Returns the #Desktop of the specified RECT structure.
DesktopExFromPoint(x.l, y.l)      ; Returns the #Desktop of the specified coords.

[Anonyme2]

Flype,

j'ai un problème de téléchargement avec 4 fichiers que ça soit avec FireFox ou IE, en plus UserLib_PB40_libgdiplus.zip est celui que je veux tester de suite

Il font 0 octets

ce sont

UserLib_PB40_librmchart310_full.zip
UserLib_PB40_librmchart310_light.zip
UserLib_PB40_libgdiplus.zip
libmysql5.zip

Apparement pas de problème avec les autres fichiers

[Flype]

je vais voir tout de suite - je n'avais pas vu que le forum avait ré-ouvert.
à toute...

[Flype]

bizarre en fait - moi je n'ai pas de problemes avec opera.

[Flype]

*** NOUVEAU ***

SubSystem MySQL5.1 !!! BETA !!!

voir 1er post et surtout dans la section PBSOC ici :
http://purebasic.forum-gratuit.com/view ... 4409#54409

[lionel_om]

Elle sert à quoi ta Lib Desktop ? C'ets pour avoir plusieurs bureaux ?

[bernard13]

quel bosseur ce Flype , tu me donne des cours svp ???

[Flype]

Elle sert à quoi ta Lib Desktop ? C'ets pour avoir plusieurs bureaux ?

elle sert à la même chose que la lib desktop de purebasic 4.0
sauf qu'elle est beaucoup plus complete.

elle me sert particulièrement en terminal server au travail mais pas seulement (bureau à distance).

[Flype]

*** NOUVEAU ***

SubSystem PostgreSQL 8.1.4 !!! BETA !!!

voir 1er post et surtout dans la section PBSOC ici :
http://purebasic.forum-gratuit.com/view ... 4409#54409

[Good07]

Tout d'abord, Merci à Flype pour toutes ces Lib
La Lib Rmchart m'intéresse au plus haut point, car j'ai besoin de faire des graphiques pour un programme de cryptographie et un projet de station météo. D'habitude je crée mes graphiques tout seul, mais là, il faut dire que ça en jette pas mal. Plus pro on peut pas faire...
Jusqu'a maintenant il semble que personne ne se soit retrousser les manches pour montrer un exemple d'utilisation.
Bon et bien j'ai décidé de me lancer dans l'aventure, mais je suis bloqué au début de mon élan par un petit problème que je n'arrive pas à résoudre. Bon voici le début de mon programme, c'est plus parlant qu'un long discours...

Code : Tout sélectionner

XIncludeFile "rmchart.pbi"

RMChart_INIT()

tChart.tRMC_CHART

tChart\nLeft        = 10  
tChart\nTop         = 10  
tChart\nWidth       = 800
tChart\nHeight      = 600
tChart\nBackColor   = #ColorDodgerBlue
tChart\nCtrlStyle   = #RMC_CTRLSTYLEFLATSHADOW
tChart\sBgImage     = ""; <-- Message d'erreur ! Trying to write a string into a numerical variable
tChart\sFontName    = "Tahoma"; <-- Message d'erreur ! Trying to write a string into a numerical variable

nRetVal = RMC_CreateChart(nParentHndl.l, nCtrlId.l, tChart\nLeft.l,tChart\nTop.l,tChart\nWidth.l,tChart\nHeight.l,tChart\nBackColor.l,tChart\nCtrlStyle.l, nExportOnly.l, tChart\sBgImage, tChart\sFontName)


If OpenWindow(0, 0, 0, 800, 600,"Test", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_MinimizeGadget) = 0 Or CreateGadgetList(WindowID(0)) = 0
  End
EndIf


StartDrawing(WindowOutput(0))
DrawingMode(1)
StopDrawing()


Repeat
  Event = WaitWindowEvent()  
Until Event = #PB_Event_CloseWindow


End

Comme vous pouvez le voir, j'obtiens un message d'erreur

Trying to write a string into a numerical variable !

Alors que la variable sBgImage est bien déclarée en sBgImage.c dans la sructure tRMC_CHART de RmChart.pbi.
J'ai fait un petit essai en suprimant l'include...

Code : Tout sélectionner

Enumeration 0    ; CtrlStyle
  #RMC_CTRLSTYLEFLAT 
  #RMC_CTRLSTYLEFLATSHADOW 
  #RMC_CTRLSTYLE3D 
  #RMC_CTRLSTYLE3DLIGHT 
  #RMC_CTRLSTYLEIMAGE 
  #RMC_CTRLSTYLEIMAGETILED 
EndEnumeration

#ColorDodgerBlue           = $FF1E90FF

Structure tRMC_CHART
  nTop.l
  nLeft.l
  nWidth.l
  nHeight.l
  nBackColor.l
  nCtrlStyle.l
  nExportOnly.l
  sBgImage.s[100]
  sFontName.s[50]
EndStructure

tChart.tRMC_CHART

tChart\nLeft        = 10  
tChart\nTop         = 10  
tChart\nWidth       = 800
tChart\nHeight      = 600
tChart\nBackColor   = #ColorDodgerBlue
tChart\nCtrlStyle   = #RMC_CTRLSTYLEFLATSHADOW
tChart\sBgImage     = ""
tChart\sFontName    = "Tahoma"

et là, ça marche mais si je remplace
sBgImage.c[100]
sFontName.c[50]
par
sBgImage.s[100]
sFontName.s[50]
dans la structure car sinon le message d'erreur est le même que précédemment...
Bien sur, j'ai fait la même chose dans l'include, mais là rien à faire...
J'ai peut-être commis une erreur quelque part.

Mais franchement je ne vois pas où ?

Merci par avance de votre aide