Connection-Speed im DFÜ ?

Wie kann ich den Wert abfragen, der gerade in Bytes übertragen wird? Wie das das DFÜ-Symbol im Systray, wenn man draufklickt, anzeigt.

??? kann mir da jemand helfen ?
z.B.:
label1.caption := inttostr(label1.caption+dfu_bytes)