Congratulations Vasile, RQWORK is a good job!!

Xusinboy Bekchanov wrote: ↑Sep 17, 2023 11:16

Tolo68 wrote: ↑Sep 17, 2023 10:34 Thank you Xusinboy, you will have to try it !!

What does not work?

If it works, I already downloaded it, I meant that I was going to see this new version !! At the moment I have only executed it, then I will try a little more, Best regards!!!

Thank you Xusinboy, you will have to try it !!

Well, first of all thank you all. Now I need the OnClick event, for a Button or another control, since I have tried it but I can't get it. The code I have is this... ''''' Button.bi Type ApiButton As Integer _hwnd Dim onClick As Sub() Declare Sub Create(parent As handle, WinName As string, Title As ...

Thank you so much adeyblue !! Your example was great! I already tried the OnPaint event in WM_PAINT and it went well too. Then create 2 Forms and everything is perfect !!!! Sub MiFormSub() Print "MiFormSub" End Sub Sub MiFormPaint() Print "MiFormPaint" End Sub Sub MiFormSub2() Pr...

Hello everyone, I have looked at several examples and have done several tests, but I can't get this done... Note, the code has 2 message processing systems....... Function ApiWindow.CtrlMsgFunc Function wndproc ....I test with one or the other. //////////////////////////////////////////// Form.bi #I...

Hello to the whole forum
I was already able to solve it based on other examples with Static...

Declare Static Function CtrlMsgFunc(...)

Hello everyone, I have the following code, but the function of processing messages in a TYPE does not go well #Include Once "windows.bi" #include "win\commctrl.bi" Dim As WNDCLASSEX wc Dim Shared As String NameClass NameClass="WinClass" Dim As HINSTANCE Hinst=GetModuleH...

... I guess it could, because the GFXLIB library uses this syntax. ... It uses the syntax for compatibility. Why would anybody want to use it willingly baffles me... Sorry Paul Doe, I unintentionally reported you. Yes, it is to be compatible with VB6 syntax, which was the same as Qbasic. Best regards

See Syntax for procedures that use (x,y) coordinates Thanks fxm, it went well for me!!!! Now to see if this is possible... Sub MySub ( x1, y1)-(x2, Y2), Var1 , Var2 What would it be to draw a QBasic-style line, the previous one was for Pset( X, Y), Color I guess it could, because the GFXLIB library...

Hello everyone
It is possible to create a sub with this style ???

Sub MySub ( x, y), z
Print x
Print y
Print z
End Sub

I've read that it can be done with macros, but I'm not sure

Thank you

Sarg you are right, I just looked at it.

In VB6, however, the Integer had a smaller footprint than the Long. Then I will change it.

Thanks for telling me!! Best regards

Thank you grindstone.

So for now, I will declare the Hdc as Long, and the Hwnd as Handle or Long.

In Visual Basic 6, they use the variable type Long, for both Hwnd and Hdc, so it more or less has to go well.

If I find a better solution I will change it.
Greetings and good day.

Thanks to all, I was able to solve it by declaring the variables in a module, which this same module calls the static library.

In fact, I saw that they did it this way in other modules.

Sorry, Hwnd goes well with Handle.

What gives me a warning ( Implicit conversion ) is with...

Dim Hdc as long
Hdc = GetDC(MyWindow)

since I can't use... Dim Hdc as HDC, because i want to use HDC as a name of a property.
Thank you!!!!