Posted November 4, 200717 yr Hello,i would like to know, how i can get actual upload/download speed, like DU Meter.I searched in MSDN, but i didn't found anything, usefull. Can you provide some info, or atleast function names. The best variant would be with small example.thanx.
November 4, 200717 yr look into the indy components - free and they have a class for throttling speeds, you should be able to get some ideas from the source
November 4, 200717 yr Try googling for socket commands.. socket.SendBuf, socket.SendLength, socket.ReceiveLength etc..use timer to query these properties and you got what you need.. i hope.. in fact i have never triedto code anything alike, so i might be wrong on this one.. hope it helps!edit: i found two usefull units on my drive, they are attached (i dont know if its awaiable by default).Look at function names and properties in ScktComp file, im sure you will figure it out quickly.BR, ChupaChu!socket_units.zip Edited November 4, 200717 yr by ChupaChu
November 4, 200717 yr Author i have one variant, where i should use global-hook for some functions, but i want to avoid that.And i have seen this done(vithout hooking), in pure basic. I think that pure basic was used with auto it or something like that.
November 4, 200717 yr well somehow it must be aviable from performance counters. due you can see network device usage in process manager.but even today dumeter uses ring0 drivers.
November 5, 200717 yr i would like to know, how i can get actual upload/download speed, like DU Meter.I dunno about Delphi, but here's a source in ASM without drivers or stuff:http://asmsource.8k.com/NetLoad.html And there are other good sources on that site !
November 5, 200717 yr Ok i have looked up in a book and found some examples in Chapter 21 - Internet Programming: Sockets and Indy Components.I think this will be useffull to you.21_chapter_Examples_dealingwith_internetandsocketsstuff.ZIP
November 5, 200717 yr Author Thanx Ufo-Pu55y. GetIfTable thats what i needed. Now onlt i need to make it running
November 18, 200717 yr Thanx Ufo-Pu55y. GetIfTable thats what i needed. Now onlt i need to make it running This is the sample source in Delphi 6.0 that i used for a app i made for myself. I hope this will help you. If still needed. netmon.rar
Create an account or sign in to comment