TrafficMeter. Written in Delphi. Посмотрите.

← →
Strate © (2007-06-12 16:03) [0]

Здравствуйте, посмотрите мою программу, (первый серьёзный проект в Delphi):

http://tkgroup.by.ru/strate/trafficmeter/TrafficMeter.rar [378K] - сама программа. Там всего лишь один экзешник.

Вот парочка скриншотов:

http://tkgroup.by.ru/strate/trafficmeter/shot1.jpg
http://tkgroup.by.ru/strate/trafficmeter/shot2.jpg

Ну и дабы вы не качали кота в мешке вот краткое описание:

--------------------
О программе:
--------------------

Программа предназначена для подсчёта траффика соединений с интернетом. (Ориентирована на ADSL-пользователей) Расчитана на работу в среде Windows XP ( на ней и тестировалась),но также должна работать в системе Windows 2k, Windows 2k3, Windows Vista.

--------------------
Возможности:
--------------------

ПРограмма считает траффик сразу со всех сетевых интерфейсов в системе. Но если на сетевом интерфейсе прописано несколько IP-адресов, то подсчёт будет вестить относительного первого.

Траффик можно считать "по фильтрам". Т.е. не считать например с определённых IP-адресов, или наоборот считать только с определённых адресов.

Подсчёт трафика может вестись в двух режимах RawSockets (в этом случа программе ничего не требуется), или же WinPCap, для этого надо скачать драйвер http://winpcap.org

Имеет много разных настроек, может вести логи, потом по этим логи может строить отчёты.

--------------------
Замеченные проблемы
--------------------

При работе программы в фаерволле Agnitium Outpost Firewall появляется "левая" сетевая активность: процесс "N/A", причина разрешения - "получать нелокальные пакеты". Почему это происходит не знаю :)

-------------------
Спасибы =)
-------------------

Спасибо всем вам за ответы на вопросы которые я задавал, а так же спасибо Rouse_ за его великолепный пример (который Sniffer)

Написано в Delphi 7, потом проект переехал на Delphi 2007.

← →
Vendict © (2007-06-12 17:57) [1]

а можен он делать так:
1. Подсчитывать трафик за день/неделю/месяц
2. Делать это только с одного сетевого интерфейса
3. Переводить это в рубли
?

← →
VirEx © (2007-06-12 20:33) [2]

нельзя скачать, на сайте ошибка: 403. Доступ закрыт.

← →
vch (2007-06-12 21:18) [3]

Outpost опозорился, имхо - он по умолчанию отключает возможность получать gzip сжатые страницы, сука!
я недавно обнаружил. нужно в реестре отключить эту его особенность.
*просто вспомнилось :))

← →
koha © (2007-06-12 22:37) [4]

- Ну, что неш-ш-штяк.

← →
Другой © (2007-06-12 22:52) [5]

Скриншоты не че так. А GPRS может считать?

← →
Vendict © (2007-06-12 23:37) [6]

vch (12.06.07 21:18) [3]
поточнее, гд это у него ? и с какой версии он начинает так чудить ?

← →
Strate © (2007-06-12 23:46) [7]

Vendict © (12.06.07 17:57) [1]
1. Подсчитывать трафик за день/неделю/месяц
2. Делать это только с одного сетевого интерфейса
3. Переводить это в рубли

1,2 можно. Достаточно настроить фильтры, в фильтре ставится с какого интерфейса считается траффик.

Считать за день/неделю/месяц можно. Достаточно поставить в фильтре галочку "Вести логи", а потом создавать отчёты по этим логам (вкладка "Отчёты").

В рубли к сожалению пока нельзя.

← →
Strate © (2007-06-12 23:51) [8]

Другой © (12.06.07 22:52) [5]
Скриншоты не че так. А GPRS может считать?

GPRS не пробовал (ввиду отсутствия такового), Вам самое время попробовать :) *проект всё ещё в стадии тестирования*

← →
Vendict © (2007-06-12 23:54) [9]

Strate © (12.06.07 23:46) [7]
В рубли к сожалению пока нельзя.
подожду, пока будет можно ... )

кстати, а если интерфейса выбранного в системе ещё нет, что программа будет считать, не будет Exception ?
например, пока не подключишься по GPRS к нету, WAN PPP/SLP не появляется.

← →
Strate © (2007-06-12 23:57) [10]

Vendict © (12.06.07 23:54) [9]
А вот это я пока не обошёл. Программа считывает интерфейсы при запуске и всё. Т.е. по идее после подключени VPN/GPRS или ещё чего надо перезапускать.

← →
antonn © (2007-06-13 00:35) [11]

> Strate © (12.06.07 23:57) [10]

интерфейсы беруться с помощью IPHLPAPI.DLL?

← →
Strate © (2007-06-13 00:47) [12]

antonn © (13.06.07 0:35) [11]
да

← →
Kostafey © (2007-06-13 01:18) [13]

Приятная программка.
Я на Wi-Fi сижу.
Нареканий пока нет.

← →
Kostafey © (2007-06-13 01:22) [14]

Пожелание: при наведении на значок прораммы в
трее хотельсь бы во всплывающей подсказек тафик видеть, т.е. просто
текущая статистика входящего/выходящего тафика.

← →
Strate © (2007-06-13 01:54) [15]

Kostafey © (13.06.07 1:22) [14]
Можно сделать. Достаточно настроить фильтр (хотя бы один). Т.е. сделать фильтр просто дубликатом интерфейса и всё. В политиках прописать "Считать всё кроме..." и оставить списко IP-списков пустым. В настройках есть кнопка "Настройка иконки в TrayBar", там надо выбрать этот фильтра и всё.

← →
Strate © (2007-06-13 01:57) [16]

Вообще по задумке было так: основной "считающий" элемент программы - фильтр. Интерфейсы были прикручены просто для наглядности. Для них ни статистика не сохраняется, ничего.

← →
VirEx © (2007-06-13 07:09) [17]

Другой ( 12.06.07 22:52) Скриншоты не че так. А GPRS может считать?
----
мдя, тяжелый случай

← →
vch (2007-06-13 08:22) [19]

← →
vch (2007-06-13 08:40) [20]

мне понравилась программа - внешний вид, все дела :)

1. в "отчеты" наслаиваются слова - "Начальная дахххмя"
2. Иконка в панели задач - вот бы она показывала маленький кусок графика как в статистике, а при наведении мыши в жёлтой подсказке полный отчёт всплывал. это если интерфейс подключён. Иначе эти ваши часы краснозелёные на полвторова :D

VirEx © (13.06.07 7:10) [18]
тогда на машинах селерон 600 проц буит тужиться

Но только при запуске. Считка проходит всего 1 раз.

Это... Strate, а я разве не тебе присылал расширенный вариант сниффера, который статистику не только по портам, но и по приложениям делает? А то смотрю у тебя статистики по сетевой активности приложений нет, а иногда такая вещь нужна...

Rouse_ © (13.06.07 11:21) [22]
Это... Strate, а я разве не тебе присылал расширенный вариант сниффера, который статистику не только по портам, но и по приложениям делает? А то смотрю у тебя статистики по сетевой активности приложений нет, а иногда такая вещь нужна...

Нет, не мне :)
Если можешь то пришли пожалуйста.

> Если можешь то пришли пожалуйста.

Ушло на мыло в профиле

TrafficMeter. Written in Delphi. Посмотрите. Найти похожие ветки