PureBasic Forums - English

Hi
Maybe GetFileTime_() will do the job
https://www.purebasic.fr/english/viewto ... etfiletime

Hi Fang
Very very very glad to here from you
Keep in touch from time to time it makes me happy to read from you

Hi MV Procedure AUTOSIZE_USEHEADER(gad,font) Header = SendMessage_(GadgetID(gad), #LVM_GETHEADER, 0, 0) nColumns = SendMessage_(Header, #HDM_GETITEMCOUNT, 0, 0) For col = 0 To ncolumns - 1 text$ = GetGadgetItemText(gad, -1,col) StartDrawing(WindowOutput(0)) DrawingFont(FontID(font)) width = TextWidt...

Hi Kurzer
Should one of the next do the job
1- Drive Snapshot
2- R-Drive Image

It's light weight software
Hope you luck

You may try MiniTool Partition Wizard
I used it to migrate my system to other devices successfully

I am not sure
But as a common issue with PB v 6.10 change long to integer
As next it may work
Or
Stay with PB v 6.04

Maybe a workaround :mrgreen: flags = #PB_Window_BorderLess OpenWindow(0,10,10,400,300,"Test",Flags) wdc = GetDC_(0) GetWindowRect_(WindowID(0),c.RECT) co = GetPixel_(wdc,c\left+2,c\top+2) co2 = GetPixel_(wdc,c\left+8,c\top+2) ReleaseDC_(0,wdc) If co = co2 Debug "Not Rounded" Else...

Hi StarGate But that mean the compiler should check for 1- Bad format 2- Bad image header magic number 3- No image but image extension(Bad guy idea) And maybe more I prefer using OnError lib for such situation :wink: Personally I am doing this because I needed to load other formats not supported by ...

MS Photo viewer and Paint can't load this image
IrfanView and Gimp and some others can
So it's the coder part to avoid the crash when using PB

# 1: Global Selbrush,Defbrush Global icoHnd Selbrush = CreateSolidBrush_($6163FE);($FF9933) Defbrush = CreateSolidBrush_($D4D4D4) Procedure CreateIcon( DLL_Path.s, index) Protected hIcon, img_index = -1 iinf.ICONINFO hIcon = ExtractIcon_(#Null, DLL_Path, index) StartVectorDrawing(ImageVectorOutput(0...

A little bit more Procedure Options(gh) OpenWindow(1,0,0,200,200,"Modal Window",#PB_Window_WindowCentered,WindowID(0)) UseGadgetList(WindowID(1)) TextGadget(1,10,10,120,gh,"Pick your Mode :") SpinGadget(2,135,10,45,gh,1,10,#PB_Spin_Numeric) SetGadgetState(2,4) TextGadget(3,10,40,...

Quick sample Using Modal Window OpenWindow(0,0,0,300,300,"Main Window",#PB_Window_ScreenCentered|#PB_Window_SystemMenu) ButtonGadget(0,10,10,65,20,"Options") Repeat Select WaitWindowEvent() Case #PB_Event_CloseWindow Quit = 1 Case #PB_Event_Gadget Select EventGadget() Case 0 Open...

Search the forum for Property Box

OR If OpenWindow(0, 0, 0, 222, 200, "ButtonGadgets", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) If CreateImage(0, 1400-20, 2200, 32, RGB(239, 239, 239)) And StartDrawing(ImageOutput(0)) Box(1,i,1400-20, 40, RGB(216, 244, 254)) StopDrawing() ImageGadget(0, 0, 0, 200, 200, ImageID(0)...

You remembered me with a funny Anthony Quinn when he was a stupid mafia boss and asked his friend why he turned 360 degrees against him