Search:

Type: Posts; User: wqweto

Page 1 of 13 1 2 3 4

Search: Search took 0.07 seconds.

  1. Replies
    44
    Views
    2,571

    Re: Can't Find SQL Server-REVIVED

    So you have the two sqlservr.exe and the sqlbrowser.exe in the firewall exceptions already?

    Btw, rebooting the machine does not renew its DHCP lease.

    cheers,
    </wqw>
  2. Replies
    11
    Views
    319

    Re: How much memory is taken up by an array?

    So "ABC" in the sources is ANSI but it gets compiled to a Unicode string and is length prefixed so in the binary there is literally a byte sequence that starts with 03 00 00 00 (length) and then 41...
  3. Re: is there other Copymemory faster than WinAPI ?

    I know that this snippet is not yours and I just mention that it's ancient and its age shows and that's why there are problems with it.

    Btw, there is a PSC mirror here:...
  4. Re: [VB6] - Class for subclassing windows and classes.

    What I'm saying is that HEAP_NO_SERIALIZE flag is a safe optimization when heap is *not* accessed/locked/performed any modifications of its internal structs by multiple threads simultaneously which...
  5. Re: is there other Copymemory faster than WinAPI ?

    The snippet would crash on XP when you turn on DEP for VBIDE or your application if you are testing it compiled.

    The snippet is so ancient it mentions "early P4" CPUs which was when, early 90's?
    ...
  6. Replies
    10
    Views
    160

    Re: Delete all records in a table

    TRUNCATE TABLE works for tables which can be DROP'ed TABLE too which is tough.

    Both *don't* work for any table that has a FK pointing to it, which is like 90% of the tables in a DB. For instance...
  7. Re: [VB6] - Class for subclassing windows and classes.

    This quote is so out of context it got me baffled at first. The idea is that only if HeapLock and HeapUnlock are called from multiple threads them using HEAP_NO_SERIALIZE flag will *not* guard the...
  8. Re: Cannot debug 'Subscription out of range error'

    No, that cannot be possible!

    When you have this variable "r"


    Dim r As Range
    Set r = Application.InputBox("mention the range", , , , , , , 8)

    . . . but then this named range "r"
  9. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    This is not new to VB6 language as an l-value "feature" -- consider Mid function vs Mid statement:


    chunk = Mid$(s, 5, 10)

    Mid$(s, 5, 10) = "abcdef"

    Yes, Mid statement is unique but then...
  10. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    The sample is contrived but it's used in C/C++ so it must be of some use to somebody. (To me for instance.)

    The False part is not evaluated in C/C++ as well and there are no non-short-circuit...
  11. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    The new ternary If operator is a missed opportunity for this to compile in TB


    Dim a As Variant, b As Variant

    If(True, a, b) = 10

    The point is that in C/C++ the ternary...
  12. Replies
    27
    Views
    783

    Re: Introducing MixLangz a Visual IDE

    No, problem. Hope you find commercial success with this project then.

    cheers,
    </wqw>
  13. Replies
    27
    Views
    783

    Re: Introducing MixLangz a Visual IDE

    So you can mix languages by translating Basic to Pascal before compiling the binary?

    cheers,
    </wqw>
  14. Replies
    22
    Views
    2,143

    Re: ThunderVB installed - problem at loading VB6

    No, don't do this. Just send a PR to the github repo with the fixes so everyone can review these and compile the DLL themselves.

    No one is willing to download and run random DLLs from the internet...
  15. Replies
    3
    Views
    216

    Re: User Control byte array problem

    Instead of forwarding the property let with


    cmSocket.bOutBuffer = bNewValue

    try calling a (new) method like this


    cmSocket.SetOutBuffer bNewValue
  16. Replies
    3
    Views
    216

    Re: User Control byte array problem

    This is a known compiler bug with byte-array properties. Try using temporary local variable like this:


    Public Property Let bOutBuffer(bNewValue() As Byte)
    Dim bNewCopy() As Byte
    ...
  17. Replies
    6
    Views
    296

    Re: Relative path vs Absolute path

    No, this is not what relative vs absolute path mean -- this is mapped drive vs UNC path.

    Try this API call


    Option Explicit

    Private Declare Function WNetGetConnection Lib "mpr" Alias...
  18. Replies
    44
    Views
    2,571

    Re: Can't Find SQL Server-REVIVED

    Several notes:
    1. Your laptops are probably using dynamic IPs assigned (leased) by the DHCP daemon on the WiFi router. These remain valid for 24h and usually get renewed to same IP. . . but...
  19. Re: Vb6 problem with odbc for postgresql and columns calculated in query

    Wow, dilletante will turn out is right everything outside MS walled-garden is black terminals and under-documented "POS code" :-))

    cheers,
    </wqw>
  20. Re: VB6: NEWS - TwinBasic VB6's Second Potential Replacement

    Currently it's an ActiveX DLL with several companion standard DLLs but TB will probably be able to bundle these together if all of linker options are exposed (probably in advanced mode) so the...
  21. Replies
    6
    Views
    296

    Re: Relative path vs Absolute path

    Relative paths are based off process current drive and current dierctory i.e. the one that are set by ChDrive and ChDir built-in functions.

    What is the current drive/path when IDE starts? If you...
  22. Replies
    11
    Views
    319

    Re: How much memory is taken up by an array?

    So the count in the 4-byte prefix is for instance 15 (odd number) but does this string terminate with one zero (it's ANSI string, isn't it), two zeroes (this is what BSTR specification says) or three...
  23. Re: VB6: NEWS - TwinBasic VB6's Second Potential Replacement

    TwinBasic has the right recipe -- make a decent compiler, re-use popular IDE, let contributors port RC6, port/reimplement VB6 Forms, port/reimplement WPF from .Net (using D3D for GUI) and so on.
    ...
  24. Replies
    27
    Views
    783

    Re: Introducing MixLangz a Visual IDE

    I though C++ Builder can mix C/C++ and Pascal. Even Visual C can mix C/C++ and inline assembly but this is just __asm part of the main language I suppose.

    What about .Net -- you can mix any of...
  25. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Why? Assignment is never an expression i.e. something like IIf(Total = 0, 0, 42) will never assign 0 to Total and Count = Total = 42 will never assign 42 to Count (nor Total) so BASIC is safe...
  26. Replies
    8
    Views
    218

    Re: Open file with specific application

    Try quering HKCR on command line like this


    C:\Users\wqw>reg query HKCR\Applications\notepad.exe\shell\open\command

    HKEY_CLASSES_ROOT\Applications\notepad.exe\shell\open\command
    (Default)...
  27. Replies
    8
    Views
    218

    Re: Open file with specific application

    Time to reinstall or wrong registry root? :-))

    cheers,
    </wqw>

    p.s. Too bad you quoted my previous "unoptimized" snippet for posterity. . .
  28. Replies
    8
    Views
    218

    Re: Open file with specific application

    Try this OpenWith function


    Option Explicit

    Private Sub Form_Load()
    If Not OpenWith("notepad.exe", "d:\temp\aaa.txt") Then
    MsgBox "App is not installed!", vbExclamation
    End...
  29. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    This

    Class Test


    Private Property Get Data(ByVal First As Long, Optional ByVal Index As Long) As Long

    End Property

    Private Property Let Data(ByVal First As Long,...
  30. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    This works in VB6/VBA


    Private Declare Function ArrPtr Lib "msvbvm60" Alias "VarPtr" (Ptr() As Any) As Long

    Public Sub Main()

    Dim arr() As Long
    Dim ptr As Long
    ...
  31. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Wow, now that's a mouthful! :-))

    Not sure if VB.Net has NameOf(MyClass), NameOf(MyMethod) and NameOf(MyParam) the way C# has but .Net languages are lacking compared to C/C++ as simple as __FILE__,...
  32. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Are Consts at module level still disabled like in


    Class cAsyncSocket

    Private Const MODULE_NAME As String = "cAsyncSocket"

    End Class

    This fails with "syntax error. no handler for...
  33. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Hey, no problem, I'm sure this will eventually work. I'll be putting everything in *the* single source file for now.

    Btw, just read the list with limitations and couldn't find anything about...
  34. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Cloning sample Std-EXE it seems I cannot add second source file for some reason, neither under Sources node, nor under a sub-folder I successfully made under it
    ...
  35. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    How do we create *new* workspaces for Std-EXE/Ax-DLL for twinBASIC within VS Code? Am I missing the menu option or do we have to copy these from the samples?

    cheers,
    </wqw>
  36. Re: how to Draw rounded rectangle by vb6 GDI++?Draw a triangle

    This is known as Abstraction inversion anti-pattern. You are using SVG files to draw basic shapes when you'll need algorithms for drawing basic shapes to be able to implement something like a...
  37. Re: [VB6/VBA] JSON parsing to built-in VBA.Collections

    Here is how to use JsonDump, JsonKeys and JsonItem functions to "explore" the contents of a JSON file. First here is the final code:


    Private Sub Form_Load()
    Dim oJson As Object

    ...
  38. Replies
    36
    Views
    812

    Re: .txt files

    Try using DESC like this


    oRS.Sort = "Field7 DESC,Field8 DESC"

    cheers,
    </wqw>
  39. Replies
    168
    Views
    17,416

    Re: https://www.radbasic.dev/

    FYI, https://github.com/Planet-Source-Code/eddie-bole-summstats-v-1-00e__1-70874

    cheers,
    </wqw>
  40. Thread: TwinBasic

    by wqweto
    Replies
    124
    Views
    9,051

    Re: TwinBasic

    Eleven downloads already! :-))

    Edit: VS Code IDE needs getting used to but overall the compiler seems to work and is quite fast. Kudos!

    cheers,
    </wqw>
Results 1 to 40 of 500
Page 1 of 13 1 2 3 4



Click Here to Expand Forum to Full Width