PureBasic Forums - English

Keya
Thank you!

PB 4.4-5.3 and higher, W7_x23/x64
1. this code:
BufferSize=255
RegOpenKeyEx_(#HKEY_LOCAL_MACHINE,"SOFTWARE\Microsoft\Windows NT\CurrentVersion",0,#KEY_QUERY_VALUE+256,@Key)
RegQueryValueEx_(Key, "InstallDate", 0, @Type, @Buffer, @BufferSize)
RegCloseKey_(Key)
MessageBox_(0,FormatDate("%dd.%mm ...

Bisonte
Thank you! Actually, everything is simple. But these changes occurred from version 5.20. In the certificate is not written. I did not realize it himself.

Sorry for my English.
Procedure WndProc(hWnd,msg,wParam,lparam)
If hWnd = WindowID(0)
Select msg
Case #WM_LBUTTONDOWN
ReleaseCapture_()
SendMessage_(hWnd,#WM_SYSCOMMAND,#SC_MOVE|#HTCAPTION,0)
Case #WM_COMMAND
If wParam= 1+#PB_EventType_LeftClick<<16
; PostMessage_(WindowID(0),#PB_Event ...

Yes, it works: PostEvent(#PB_Event_CloseWindow)
But only in v5.30! In v5.20 and earlier versions don't work.
Maybe I misused the function SendMessageCallback...
It is necessary to use PostMessage_(hWnd,#PB_Event_CloseWindow,0,0) - it works in all versions
The purpose of this reception is working ...

code:
Procedure WndProc(hWnd,msg,wParam,lparam)
If hWnd = WindowID(0)
Select msg
Case #WM_LBUTTONDOWN
ReleaseCapture_()
SendMessage_(hWnd,#WM_SYSCOMMAND,#SC_MOVE|#HTCAPTION,0)
Case #WM_COMMAND
If wParam= 1+#PB_EventType_LeftClick<<16
SendMessageCallback_(hWnd,#PB_Event_CloseWindow,0,0 ...

code1
Value.l = 10 ; Declare our own variable
MOV Value, 20 ; Directly use the ASM keywords with PureBasic variable !
INC Value
MessageRequester("ASM Example", "Should be 21: "+Str(Value), 0)

without "EnableASM", but with check "enable asm inline" do not work
code2
Value.l = 10 ; Declare our ...

Thank!
p/s/ The checkbox "enable inline asm syntax" do not work, and
straight assembler code (with "!") do not work..

Thanks! Danilo

I have a code on masm32, it's work - edit text and background change color:
.386
.model flat,stdcall
option casemap:none
include c:\masm32\include\windows.inc
include c:\masm32\include\kernel32.inc
include c:\masm32\include\user32.inc
include c:\masm32\include\gdi32.inc
includelib c:\masm32 ...

Thanks! ts-soft, USCode

Hi All!
sorry for my english..

Help to use "winapi DialogBoxParam" with .rc file

Procedure.l dlg(Wnd, Message, wParam, lParam)
www.l=1
If Message=#WM_INITDIALOG
ShowWindow_(Wnd, #SW_SHOWNORMAL)
ElseIf Message=#WM_CLOSE
EndDialog_(Wnd,0)
EndIf
ProcedureReturn www
EndProcedure

hinst ...