Try the VistaClock - Major performance update!

Inf0Byt3 · Post by **Inf0Byt3** » Tue May 02, 2006 2:11 pm

Any chances to release the source in the future?

netmaestro · Post by **netmaestro** » Tue May 02, 2006 3:13 pm

Yes, for sure. I haven't done it yet because I don't want a lot of half-written versions floating around. Once it's released it'll come as a full package w/source & graphics.

Inf0Byt3 · Post by **Inf0Byt3** » Tue May 02, 2006 3:17 pm

Wow that's extremely cool. The noobs here (including me :LOL:) could learn alot from this. Thanks

.

Trond · Post by **Trond** » Tue May 02, 2006 3:18 pm

netmaestro wrote:Ah, interesting. Thanks for the feedback, I suspect the issue there is that it uses a windowed screen and sprite3d graphics, which requires dx7 or better to be available. I'll put cleaner code in there so it ends gracefully if it can't run. (I'm guessing no dx7 is the issue, anyway) The reason for the cpu usage will be that it can't verify the background so it's always trying to update it. Good one, thanks again.

I have DirectX 9.0c installed. And unlike my other computer, this graphics card usually works pretty well.

netmaestro · Post by **netmaestro** » Tue May 02, 2006 3:22 pm

sheesh, I'm stumped then.

rsts · Post by **rsts** » Tue May 02, 2006 3:34 pm

netmaestro wrote:Yes, for sure. I haven't done it yet because I don't want a lot of half-written versions floating around. Once it's released it'll come as a full package w/source & graphics.

Wow - what a tutorial that will be. Anxiously awaiting.

Many thanks

cheers

Post by **Dare2** » Tue May 02, 2006 3:38 pm

rsts wrote:Wow - what a tutorial that will be. Anxiously awaiting.

Yes, ditto. Very nice.

Flype · Post by **Flype** » Tue May 02, 2006 3:52 pm

nice clock netmaestro.

hum, maybe you can find this interesting (desktop painting) :

Code: Select all

Procedure.l myCallback(hwnd.l,uMsg.l,wParam.l,lParam.l)
  Select uMsg
    Case #WM_ERASEBKGND
      ProcedureReturn #False
    Case #WM_PAINT
      For i=1 To 2
        x = GadgetX(i)
        y = GadgetY(i)
        SetRect_(rect.RECT,x,y,x+GadgetWidth(i),y+GadgetHeight(i))
        ValidateRect_(hwnd,rect)
        RedrawWindow_(GadgetID(i),0,0,$407)
      Next
      PaintDesktop_(BeginPaint_(hwnd,ps.PAINTSTRUCT))
      EndPaint_(hwnd,ps)
    Case #WM_SIZING,#WM_MOVING
      InvalidateRect_(hwnd,0,1)
  EndSelect
  ProcedureReturn #PB_ProcessPureBasicEvents
EndProcedure

If OpenWindow(0,100,100,320,240,"",#PB_Window_SystemMenu|#PB_Window_SizeGadget)
  ;SmartWindowRefresh(0,1)
  CreateGadgetList(WindowID(0))
  ButtonGadget(1,5,5,100,50,"Hello")
  EditorGadget(2,5,60,100,175)
  SetWindowCallback(@myCallback(),0)
  InvalidateRect_(WindowID(0),0,1)
  Repeat:Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf

Post by **Dare2** » Tue May 02, 2006 3:54 pm

hehe. xray vision! Clever.

Straker · Post by **Straker** » Tue May 02, 2006 4:23 pm

Ummm.... must be only viewable on XP. Here is what it looks like on my Windows 2000 Pro:

Post by **Dare2** » Tue May 02, 2006 4:25 pm

The clock?

There is only one clock

netmaestro · Post by **netmaestro** » Tue May 02, 2006 4:28 pm

Yes I think I have an API in there that isn't supported on Win2000 - I'll have to replace it with something else. That's a nice green box though straker, if you don't care what time it is you've got something nice to look at.

Straker · Post by **Straker** » Tue May 02, 2006 4:43 pm

Oh good, for a minute I thought you might have been inspired by Mandelbrot or Dali.

Post by **Dare2** » Tue May 02, 2006 4:54 pm

SoulReaper · Post by **SoulReaper** » Tue May 02, 2006 5:16 pm

works very nice here on windows 2000 pro sp4 gfx card radeon 9800 pro & direct x9.0c

always ontop would be a good feature I think - what do you think...

once again great work

Regards
Kevin