Search:

Type: Posts; User: jj2007

Page 1 of 6 1 2 3 4

Search: Search took 0.04 seconds.

  1. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    That dog is lovely, zx81sp :wave:

    And don't worry, we have all had our share of mysterious bugs ;-)
  2. Replies
    10
    Views
    656

    Re: Post Viewing Problem

    To the right, below "Results 1 to 8 of 8", you'll find a link "Click Here to Expand Forum to Full Width"
  3. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    Slowly but surely ;-)
  4. Re: [RESOLVED] Is this a VB Bug? Decimal Point < 0

    The float/Real4 and double/Real8 data types use the same principle, only that the mantissa is a binary value, to be shifted by the value in the exponent.

    The main difference will be speed: the...
  5. Re: [RESOLVED] Is this a VB Bug? Decimal Point < 0

    Thanks, Niya. I knew they exist, mainly for precise financial accounting, but actually never stumbled over them.
  6. Re: [RESOLVED] Is this a VB Bug? Decimal Point < 0

    What do you actually mean with "Decimal types"? DWORDs, QWORDs, integers, longs, ...?
  7. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    I'm afraid that's not how it works. This is what happens in a Windows application that has a window:
    When you close that window (Alt F4, click into the X),
    - its WndProc receives a WM_CLOSE...
  8. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    Did you try that?

    > When I launch the exe I can see it running with the tasklist command, after 10-15 seconds the exe ends and dissapears from the the tasklist, the logs shows how the app has been...
  9. Thread: Directory Date

    by jj2007
    Replies
    21
    Views
    1,650

    Re: Directory Date

    Valid point, SmUX2k. However, extracting names from ZIP files has little to do with FindFirstFileEx performance.


    335 ms for getting 19388 filenames from 117 zipfiles

    (I don't have enough ZIP...
  10. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    Insert something like a MessageBox between LeeMSG and End. You could also append the time to a file in order to monitor what happens, again: between LeeMSG and End.
  11. Replies
    20
    Views
    823

    Re: Compiled exe launched with task manager

    Check how the app ends, e.g. by putting (for testing only) a MessageBox in the line before ExitProcess. Without seeing the code, I can only guess what's happening, but probably it just hangs in a...
  12. Thread: Directory Date

    by jj2007
    Replies
    21
    Views
    1,650

    Re: Directory Date

    Here is the 2015 VB6 thread, and here is the original 2011 source
  13. Thread: Directory Date

    by jj2007
    Replies
    21
    Views
    1,650

    Re: Directory Date

    FindFirstFileEx is a thin wrapper for NtQueryDirectoryFile. There is a little extra overhead, of course, but most of it would also be needed for a direct call to NtQueryDirectoryFile, such as...
  14. Thread: Directory Date

    by jj2007
    Replies
    21
    Views
    1,650

    Re: Directory Date

    I like it shorter:

    If_ Exist("\VB6\VB6.EXE") Then PrintLine "Last modified ", GfDate$(-1), ", ", GfTime$(-1)

    Output: Last modified 25.06.1998, 01:00:00

    That takes 50 microseconds and uses...
  15. Replies
    16
    Views
    785

    Re: This forum works flawless on IOS :)

    Another little problem: provided “AS IS” without warranty (from Elroy's signature). Seems to be the character encoding, probably Utf-8 not recognised as such.
  16. Re: [RESOLVED] Is this a VB Bug? Decimal Point < 0

    Actually, I wouldn't call it a bug. It's a limitation of the single/float format:

    The value 1.4012984643248170710e-45 gets stored as 1 (yes, one - a DWORD or REAL4 with only the lowest bit set). ...
  17. Re: [RESOLVED] Is this a VB Bug? Decimal Point < 0

    Now I'm curious: you put "resolved". So what happened?

    Sub Main()

    Dim k As Single
    k = 2.441481E-46

    If k <= 0# Then Debug.Print "k is lower than Zero!"
    If k > 0# Then Debug.Print "k is...
  18. Re: Speed difference between exe and IDE ? (At least on Win10)

    > The real resolution of the Timer control is 16.6 ms.

    Yes, that is the native resolution of GetTickCount. If you want more precise results, use the QueryPerformance* family.
  19. Re: Multiline tooltips with TTS_BALLOON style show rectangles under Windows 10

    Thanks a lot. Knowing now that it's EnableLegacyBalloonNotifications, I found more info, including the need to reboot. But even the reboot didn't change the result: Windows 10 likes "edgy" tooltips...
  20. Re: Multiline tooltips with TTS_BALLOON style show rectangles under Windows 10

    Thanks a lot, J.A.

    I tested that, and it makes no difference. Actually, it would have surprised me, because, as shown above, the rounded rectangles do work for one- and two-liners...

    How did...
  21. Replies
    3
    Views
    426

    Forum features freeze MS Edge

    Maybe I'm the only one who has this problem: a simple click on the Insert Image icon (and some others) freezes my browser, which happens to be MsEdge on Windows 10.

    Is this a known problem, do...
  22. Multiline tooltips with TTS_BALLOON style show rectangles under Windows 10

    Weird problem: in Windows 10, "balloon" tooltips look edgy if
    a) a certain width is exceeded (apparently more than 5 characters)
    b) and they are more than two lines long.

    So a GlobalAlloc...
  23. Re: FAST read number of lines in txt file

    I like benchmarks, and testing the limits. My interest was triggered by the OP trying to replace all CrLfs, which must have abysmal performance.



    That is indeed impressive! I can't get below...
  24. Re: FAST read number of lines in txt file

    > @jj2007: Which code is ~90 ms on this 400MB file?


    .Repeat
    lea esi, [esi+Instr_(esi, Chr$(10))+1]
    inc ecx
    .Until !edx

    Sorry, this is obviously not VB6 - Instr_() uses fast SIMD...
  25. Re: How can I control a Excel file opened from VB6?

    Even if it's a 64-bit process (which I am not sure of), connecting via DDE should work. But I admit that my old Excel 2003 and the "modern" Excel viewer are both 32-bit processes ;-)
  26. Re: FAST read number of lines in txt file

    AMD Athlon Gold 3150U with Radeon Graphics
    89 ms for 7363852 lines
    89 ms for 7363852 lines
    89 ms for 7363852 lines
    91 ms for 7363852 lines
    98 ms for 7363852 lines
  27. Re: FAST read number of lines in txt file

    For those who want to test their code, I put a 400MB file here - don't distribute, as I'm not sure about the copyright situation.

    P.S.: 75 ms for 3038201 lines; I just discovered that the text has...
  28. Re: FAST read number of lines in txt file

    countLF = Len(st) - Len(Replace(st, vbLf, "")) + 1

    Replacing will be slow. Just searching for, not replacing CrLfs, I need about 0.2 seconds for a 1GB text file with 6076601 lines with an AMD...
  29. Replies
    97
    Views
    4,760

    Re: Why did Microsoft abandon ,killed VB6?

    In 40 years of programming, I've never seen the need to define a lower limit different from zero. In year 1, I may have needed some time to adapt to the idea that programming languages, in contrast...
  30. Replies
    23
    Views
    1,744

    Re: Save as comma delimited or csv instead of text

    Now I see: *.DRF is *.csv. You want the results to go to Excel? Change the extension, open it in Excel and do the calculations there. There are more complicate solutions but why bother? DRF is a...
  31. Thread: Is it worth?

    by jj2007
    Replies
    11
    Views
    944

    Re: Is it worth?

    An interesting idea, but why C++? It's a horrible language. Why not TwinBasic? Not fast enough??
  32. Replies
    23
    Views
    1,744

    Re: Save as comma delimited or csv instead of text

    sax0101.txt is very messy. Lines containing F1L start with a tab, all others use spaces as delimiter - in theory...

    Line 56:

    92 95 84 (-1 )(+1 )92 95 72 94

    There is not even a delimiter...
  33. Replies
    23
    Views
    1,744

    Re: Save as comma delimited or csv instead of text

    Below an excerpt from your sax0101.txt, which is a space-separated text file. In contrast, your GPX0101.drf is a csv file. I agree with OlimilO that tab-separated is a much better format, but first...
  34. Replies
    300
    Views
    143,390

    Re: The 1001 questions about vbRichClient5 (2020-07-21)

    Olaf, I just spent some weeks (!) fighting with MS ADO. It's a horrible mess, with e.g. different arg counts for OpenSchema for C++, VB, C#, ...but in the end I got this working (pseudocode):

    ...
  35. Thread: msvbvm60.dll

    by jj2007
    Replies
    2
    Views
    448

    Re: msvbvm60.dll

    Thanks, Joe - that looks interesting!


    The whole purpose of this ultra-complex line is to call the ThunRTMain function of MSVBVM60. A pointer to VB Header is passed as a parameter of that...
  36. Thread: msvbvm60.dll

    by jj2007
    Replies
    2
    Views
    448

    msvbvm60.dll

    I had the bright idea to tap the runtime directly.

    Pseudocode:

    Dll "msvbvm60"
    Declare __vbaFileOpen, 4
    Declare __vbaPrintFile, 3
    Declare __vbaFileClose, 1
    Declare void...
  37. Replies
    6
    Views
    518

    Re: string converter

    Pseudocode:
    invoke UrlEscapeA, Chr$("Valle d'Aosta / Vallée d'Aoste"), addr buffer, addr bufbytes, URL_BROWSER_MODE

    buffer should be as long as the expected output
    int bufbytes=sizeof buffer
    ...
  38. Replies
    9
    Views
    961

    Re: Sanity Check - Using Excel for Database

    Excel is fine, but you are not really interested in a one minute resolution. Condense it by a factor 60, and store only the hourly averages.
  39. Thread: zip and unzip

    by jj2007
    Replies
    48
    Views
    13,160

    Re: zip and unzip

    Users have all kinds of archivers installed. WinZip is not free, therefore it's less likely to find it. Or maybe you find an installation, but the trial period is over...

    Check the...
  40. Thread: zip and unzip

    by jj2007
    Replies
    48
    Views
    13,160

    Re: zip and unzip

    Thanks, Episcopal. However, this works only if WinZip is installed. Perhaps you could add other checks, such as for this key:

    HKEY_CLASSES_ROOT\Applications\7zFM.exe\shell\open\command
Results 1 to 40 of 206
Page 1 of 6 1 2 3 4



Click Here to Expand Forum to Full Width