Search:

Type: Posts; User: xxdoc123

Page 1 of 13 1 2 3 4

Search: Search took 0.11 seconds.

  1. Replies
    2
    Views
    192

    Re: Pattern Brush Fill

    good idea
  2. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    thanks .work well

    i change the some code



    F = FreeFile
    Open App.Path & "\wsTest.html" For Binary As F
    sBodyArray = InputB(LOF(F), F)
    Close F
  3. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    After you change. SendLengthyChatMessage function unsuccessful~。。English strings can be successful。

    wi = Find_ws_Data_By_Index(Index)
    wsd.bData = vbNullString…?i think is not right
  4. Re: DRAW around cell a rectangle with mouse move event in msflexgrid

    https://www.vbforums.com/showthread.php?870119-How-can-I-draw-OVER-MSFlexGrid-display&p=5348247&mode=linear#post5348247
  5. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    Attribute VB_Name = "mUTF8"
    Option Explicit

    'UTF-8
    Private Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal...
  6. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    i used win 10 and chrome.exe. may is my used Chinese system



    Private Sub ctxServer_DataArrival(Index As Integer, ByVal bytesTotal As Long)
    Dim sRequest As String
    Dim vSplit ...
  7. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    i download the new project,have the same questions
  8. Replies
    24
    Views
    2,599

    Re: vb6 Websocket Server ssl

    182343
  9. Replies
    2
    Views
    458

    Re: "Alpha wipe" image transition

    The effect is great
  10. Replies
    27
    Views
    2,020

    Re: Simplified Picture Server

    Public Function StrToByte(strInput As String) As Byte()
    Dim lPntr As Long
    Dim bTmp() As Byte
    Dim bArray() As Byte
    If Len(strInput) = 0 Then Exit Function
    ReDim...
  11. Re: [VB6] Visual Basic 6 Client Websocket Control

    Well done, thank you. It would be better if you can add ws function

    I tested and found that ws://127.0.0.1:2007 could not find the service. But I can successfully connect with the web page test
  12. Thread: Image Viewer

    by xxdoc123
    Replies
    8
    Views
    1,433

    Re: Image Viewer

    Private Sub ResizePic(PicBox As PictureBox, oPic As Picture)
    Dim W As Single
    Dim H As Single
    Dim wAdj As Single
    Dim hAdj As Single
    Dim TBHide As Long
    TBHide = &H40...
  13. Re: VB6 IDE run as admin no longer remembers its maximized state in Windows 10 ver. 1

    Unfortunately, it did not load successfully
  14. Re: VB6 IDE run as admin no longer remembers its maximized state in Windows 10 ver. 1

    In my home version. It seems that the plug-in did not start successfully



    Private Sub AddinInstance_OnConnection(ByVal Application As Object, ByVal ConnectMode As...
  15. Re: icon with text and transparent background

    Isn’t it enough to convert the picture to an icon with a transparent background?
  16. Re: icon with text and transparent background

    https://www.vbforums.com/showthread.php?595990-VB6-System-tray-icon-systray&highlight=GetColMask
  17. Replies
    20
    Views
    988

    Re: Hourglass - again

    The only difference between cur and ico is the mark bit on the file. The third byte of ico is 1, and the third byte of cur is 2.

    Open "xxx.cur" For Binary As #1
    Put #1, 3, 1 '
    Close #1 '
    ...
  18. Re: icon with text and transparent background

    you can used ImageList1 maskcolor to do this ico background transparent

    https://www.vbforums.com/showthread.php?398734-RESOLVED-Set-a-picturebox-image-as-the-form-s-icon&highlight=hbmMask
  19. Re: Details on How to Use Named Pipe for Communicating with Chess Engine

    work ok thanks
  20. Re: Details on How to Use Named Pipe for Communicating with Chess Engine

    yes this can run ok

    but i want usde open cmd, next run scrcpy.exe or adb.exe command

    like my post code of the above.



    Option Explicit
  21. Re: Details on How to Use Named Pipe for Communicating with Chess Engine

    hi wqw
    now i want used your cExec.but i can not work

    if i usde adb to connect my phone

    i usde



    Option Explicit
  22. Re: VB6 - ShellPipe "Shell with I/O Redirection" control

    I have a question. . How to determine whether the command has been completed. Should I perform a DOS command did not return a value. If I set myself

    "adb.Exe exec - out screencap - p >...
  23. Re: Load a "MJPEG" picture into a vb6 PictureBox

    you can uesd vysor ! or adb to control you phone
  24. Re: VB6 - ShellPipe "Shell with I/O Redirection" control

    Private Declare Function WriteFile _
    Lib "kernel32" (ByVal hFile As Long, _
    ByVal lpBuf As Long, _
    ByVal cToWrite As...
  25. how can i drag resize winshape usercontrol when exe running

    i used shape control form Windowed Shape Control V5b_test

    https://www.vbforums.com/showthread.php?870259-VB6-Windowed-Shape-Control&p=5350945&viewfull=1#post5350945

    Now I can change the size...
  26. Re: VB6 - ShellPipe "Shell with I/O Redirection" control

    cannot support this format command

    With a Unicode string command

    "adb. Exe exec - out screencap - p > c:\ 桌面\ShellPipe7\Simple\screen\screen.PNG"



    Without a Unicode can perform in the...
  27. Replies
    29
    Views
    2,322

    Re: CreateIconFromResourceEx not working

    in my system win7 run the demo, 3 pictures are all the same size !may be Size =32 \ 48 \128 have no change
  28. Re: Communicate two executables through the console

    Strange. You can't control your console program(https://github.com/PeterSwinkels/Console-Shell) with your console shell (https://github.com/PeterSwinkels/Console-Shell).may be vb6 console program...
  29. Re: WS_EX_LAYERED on child controls(Transparent Activex Control)

    Why do you copy the code from dilettante? The code you posted is meaningless
  30. Replies
    15
    Views
    1,923

    Re: Neumorphism Design

    You can be a designer
  31. Replies
    141
    Views
    116,337

    Re: VB6 - JsonBag, Another JSON Parser/Generator

    Function toArray() As Variant()
    Dim i As Integer
    If Not Me.IsArray Then Err.Raise 2122, "JsonBag", "Item is not an array"

    Dim ret()
    For i = 1 To o.Count ------which is o?
    ...
  32. Replies
    31
    Views
    4,710

    Re: Paint PNGs via DrawIconEx()

    o my god

    i test


    Public Function GetIconFromRes(mResPngName As String) As StdPicture

    Dim Bytes() As Byte
    Dim shIcon As Long
  33. Replies
    31
    Views
    4,710

    Re: Paint PNGs via DrawIconEx()

    if png in the resources. can't set this icon handle to systray icon. but if load png in file "x:\xx.png". can set to systray icon. why. I test win10:o

    I used PngThing.zip res can work ok。but i...
  34. Replies
    24
    Views
    2,599

    Re: vb6 Secure Websocket

    ' Debug.Print "ctxServer_DataArrival, bytesTotal=" & bytesTotal, Timer
    ctxServer(Index).GetData sRequest

    Dim secKey As String, i As Long, b() As Byte, AcceptKey As String, Origin As...
  35. Replies
    24
    Views
    2,599

    Re: vb6 Secure Websocket

    thanks .

    I did not modify the code. My actions are as follows

    Click the button Subscribe to ChatMsg

    then return

    ws was opened on: wss://localhost:8088/SubscribeToChatMsg ...
  36. Replies
    24
    Views
    2,599

    Re: vb6 Secure Websocket

    in my system7 chinese

    if i click the button "Send Chat-Message",then wss closed . cannot Connect

    180347
  37. Replies
    8
    Views
    723

    Re: vb6 add table rows webbrowser

    Private Sub Command1_Click()
    Set Table = WebBrowser1.Document.getElementById("ss")


    Set row = Table.insertRow(0)


    Set cell1 = row.insertCell(0)
  38. Re: QR decode encode support utf-8 without using third parts software, external DLL,O

    https://github.com/yas78/QRCodeLibVBA
  39. Re: Getting the ball rolling. Which VB6 projects are you working on?

    I have never developed commercial software through vb. What I develop are small toys that assist me in my usual work, similar to patches of commercial programs, and automated operations

    My most...
  40. Replies
    10
    Views
    1,040

    Re: VB6 selenium how to submit this form

    i dont used selenium。i used chromedriver wrapped with vb6 !JsonWireProtocol

    i found this selenium

    https://www.cnblogs.com/ryueifu-VBA/p/13698908.html


    Private WD As...
Results 1 to 40 of 500
Page 1 of 13 1 2 3 4



Click Here to Expand Forum to Full Width