Search:
Type: Posts; User: jj2007
Search:
Search took 0.15 seconds.
-
That dog is lovely, zx81sp :wave:
And don't worry, we have all had our share of mysterious bugs ;-)
-
To the right, below "Results 1 to 8 of 8", you'll find a link "Click Here to Expand Forum to Full Width"
-
-
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...
-
Thanks, Niya. I knew they exist, mainly for precise financial accounting, but actually never stumbled over them.
-
What do you actually mean with "Decimal types"? DWORDs, QWORDs, integers, longs, ...?
-
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...
-
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...
-
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...
-
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.
-
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...
-
Here is the 2015 VB6 thread, and here is the original 2011 source
-
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...
-
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...
-
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.
-
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). ...
-
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...
-
> 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.
-
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...
-
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...
-
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...
-
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...
-
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...
-
> @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...
-
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 ;-)
-
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
-
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...
-
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...
-
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...
-
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...
-
An interesting idea, but why C++? It's a horrible language. Why not TwinBasic? Not fast enough??
-
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...
-
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...
-
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):
...
-
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...
-
I had the bright idea to tap the runtime directly.
Pseudocode:
Dll "msvbvm60"
Declare __vbaFileOpen, 4
Declare __vbaPrintFile, 3
Declare __vbaFileClose, 1
Declare void...
-
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
...
-
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.
-
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...
-
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
|
Click Here to Expand Forum to Full Width
|