■ 2 Mars : PureBasic 5.60 est disponible
■ 28 Février : Beta 8Fred a écrit :We are very happy to announce the release of PureBasic 5.60 ! Thank you all for the feedback and tests, we hope you will enjoy the new features
-Correction bug ToolBar
■ 27 Février : Beta 7
-Correction bugs
-Added: SetImageFrameDelay()
-Renamed: ImageFrameDelay() to GetImageFrameDelay()
■ 22 Février : Beta 6
-Correction de bugs.
-Ajout de la fonction ImageFrameDelay()
■ 21 Février : Beta 5
-Correction de bugs.
■ 08 Février : Beta 4
-Correction de bugs.
■ 08 Février : Beta 3
-Correction de bugs et ajout de fonctionnalités 3D
Code : Tout sélectionner
- Added: ParticleAcceleration(), ParticleColorFader(), ParticleEmitterAngle()
- Added: #PB_Material_AlphaReject, #PB_Material_TAM and #PB_Material_EnvironmentMap support to SetMaterialAttribute()
- Added: new 'Layer' optional paramater to SetMaterialAttribute()
- Added: new orientation modes for SetNodeAnimationKeyFrameRotation() and AddStaticGeometryEntity()
- ToolBar, Menu and StatusBar are now back in inner window area for all OS (like before)
- MenuHeight(), StatusBarHeight() and ToolBarHeight() are back (like before)
---edit ar-s--------
Fred a oublié une constante dans les résidents, en attendant la prochaine beta vous pouvez la déclarer comme ça
---------------------#PB_EventType_Resize = 6
Petit exemple pour le GIF :Fred a écrit :Hello everyone !
The beta version of PureBasic 5.60 is available on your account, just in time to wishes you again an Happy New Year 2017 and best luck in your projects ! We took a deep look in the "feature and request" forum and tried to implemented some of the most wanted wishes . Here is the full change log:
Have fun,Code : Tout sélectionner
- Added: GIF decoder support - Added: SetImageFrame(), GetImageFrame(), ImageFrameCount(), AddImageFrame(), RemoveImageFrame() - Added: UserAgent support to ReceiveHTTPMemory(), ReceiveHTTPFile() and GetHTTPHeaders() - Added: #PB_Http_NoRedirect support for GetHTTPHeaders() - Added: "Joe Doe <joe.doe@domain.com>" email format support for SendMail() - Added: HTTPProxy() for Http related commands proxy support - Added: Compression level support for CreatePack() and CompressMemory() - Added: Large icons and text support to ToolBar library - Added: GetUserDirectory() to get user specific directories - Added: more flexibility to Base64Decoder to handle non padded input - Added: Base64Encoder() and Base64Decoder() which takes string as input/output for easier use - Added: color constants like #Black, #Blue etc. for all OS - Added: Event() to get the current event (mainly useful from callback) - Added: #PB_Canvas_Container support to have a container behaviour for canvas - Added: #PB_EventType_Resize support for PanelGadget(), ContainerGadget(), CanvasGadget() and ScrollAreaGadget() - Added: #PB_ListIcon_ColumnCount to GetGadgetAttribute() for ListIconGadget() to get the column count - Added: #PB_All support to RemoveGadgetColumn() to remove all the columns - Added: (IDE) templates are now saved when created to prevent lost if the IDE is not properly closed - Added: (IDE) jump to a procedure now automatically unfold it if it was folded - Added: (IDE) new specific popup menu for file tab to ease source file management - Added: (IDE) find previous (reverse find) - Changed: ToolBar, Menu and StatusBar are now excluded from inner window area for all OS - Changed: MenuHeight(), StatusBarHeight() and ToolBarHeight() are now deprecated (all returns 0) - Changed: renamed Base64Encoder() to Base64EncoderBuffer() - Changed: renamed Base64Decoder() to Base64DecoderBuffer() - Changed: removed 'define.b' syntax to change default type as it could create hard to find bugs.
The Fantaisie Software Team
Fred a écrit :Code : Tout sélectionner
UseGIFImageDecoder() Filename$ = OpenFileRequester("Select a GIF file", "", "GIF Files|*.gif", 0) If Filename$ And LoadImage(0, Filename$) OpenWindow(0, 100, 100, ImageWidth(0), ImageHeight(0), "") CanvasGadget(0, 0, 0, ImageWidth(0), ImageHeight(0)) AddWindowTimer(0, 1, 150) Repeat Event = WaitWindowEvent() If Event = #PB_Event_Timer SetImageFrame(0, Frame) Frame+1 If Frame >= ImageFrameCount(0) : Frame = 0 : EndIf If StartDrawing(CanvasOutput(0)) DrawImage(ImageID(0), 0, 0) StopDrawing() EndIf EndIf Until Event = #PB_Event_CloseWindow Else Debug "Impossible to load the file: " + Filename$ EndIf