hiltcampus.blogg.se

Purebasic import jpg
Purebasic import jpg










purebasic import jpg
  1. #Purebasic import jpg skin#
  2. #Purebasic import jpg zip#

Added new GetExplorerBarGroupState command. Added new isCollapsed parameter to AddExplorerBarGroup and AddExplorerBarImageGroup. Fixed rendering bug with SetButtonExSkin not applying button's current state i.e.

#Purebasic import jpg skin#

Fixed ExplorerBar IMA on x86 when standard skin used under classic theme in UserLib version due to a bug with TailBite. Fixed bug with sub-menu width when menu scrollable. Fixed memory leak with FreePanelEx and FreePanelExPage due to some internal buffers not being freed correctly. Changed SetPanelExPageBorder command, added new BorderAutoStretch parameter. Improved skin format by embedding none web-safe/standard fonts into skin.

#Purebasic import jpg zip#

Changed / Improved the skin subsystem quite a bit internally and now uses ZIP to compress the skin packages. Added new TextControlExCalcSize command. Added new GetPanelExUsercallback command.

purebasic import jpg

Added new SetPanelExUsercallback command. Added new SetSkinPropertyParam command. Fixed bug with certain common controls on PanelEx page rendering black pixels at corners. Fixed bug with FreePanelEx and FreePanelExPage regarding child windows. Fixed bug with RefreshPanelEx, now updates scrollbars and page scrolling if autoscroll enabled. Fixed bug with SetTextControlExFont where width and height wasn't updating. Updated all binaries and re-compiled with latest PureBasic (V5.72 LTS). If extension=".gif" Or extension=".jpe" Or extension=".jpg" Or extension=".bmp"įile = OpenFileRequester("Open image file","","Windows BMP Image (*.bmp)|*.bmp|GIF Image (*.gif)|*.gif|Jpeg Image (*.jpg)|*.jpe *.jpg", 0)įile = SaveFileRequester("Save image file","","Windows BMP Image (*.bmp)|*.- Fixed bug with 圆4 dll not closing correctly. ResizeWindow(ImgWidth*2, (ImgHeight*2)+MenuHeight) ResizeWindow(ImgWidth/2, (ImgHeight/2)+MenuHeight) SetWindowText_(ParentHandle, "Picture View - "+File+" 100%") ImageGadget = ImageGadget(0, 0, MenuHeight, WindowWidth(), WindowHeight()+MenuHeight, UseImage(0))ĪddKeyboardShortcut(0, #PB_Shortcut_O|#PB_Shortcut_Control, #Open)ĪddKeyboardShortcut(0, #PB_Shortcut_S|#PB_Shortcut_Control, #Save)ĪddKeyboardShortcut(0, #PB_Shortcut_Q|#PB_Shortcut_Control, #Quit)ĪddKeyboardShortcut(0, #PB_Shortcut_Pad0|#PB_Shortcut_Alt|#PB_Shortcut_Control, #Actual)ĪddKeyboardShortcut(0, #PB_Shortcut_Add, #Zoom_In)ĪddKeyboardShortcut(0, #PB_Shortcut_Subtract, #Zoom_Out)ĪddKeyboardShortcut(0, #PB_Shortcut_C|#PB_Shortcut_Control, #Copy)ĪddKeyboardShortcut(0, #PB_Shortcut_V|#PB_Shortcut_Control, #Paste)ĭragQueryFile_(hDrop, 0, MemoryID(), 256) SetClassLong_(ParentHandle, #GCL_HBRBACKGROUND, CreateBrushIndirect_(Brush))ĬreateImage(0, WindowWidth(), WindowHeight()) MenuHeight = GetSystemMetrics_(#SM_CYCAPTION)+GetSystemMetrics_(#SM_CYMENU)+8 If OpenWindow(0, 100, 100, 480, 320, #PB_Window_SystemMenu|#PB_Window_MinimizeGadget|#PB_Window_SizeGadget, "Little Image Tool") SetWindowText_(ParentHandle, "Picture View - "+File+" "+StrF(((ImgWidth/IData\width)*100), 2)+"%") If WindowWidth=ptMinTrackSizex And ImgWidth> 16 Global nwidth, nheight, hmheight, hmwidth, rc.RECT Global IData.ImageData, BmpSize, BmpImage, FileSize, loaded.b, WindowWidth, WindowHeight, ImgWidth, ImgHeight, MenuHeight, xImg, yImg, ParentHandle, ptMinTrackSizex, aspect.f, hDC Thanks: Rings for helping me to deal with bitmaps in memory












Purebasic import jpg