FreePascal.ru

Описание простое:
Интернет <-> Linux-шлюз <-> Локальная сеть.

На линухе две сетевые карты, eth0 на провайдера, eth1 на локальную сеть.
На линуксе в директории /etc/ организ папку /etc/acctraff, в этой папке создаем два файла /etc/acctraff/clients и /etc/acctraff/acctraff.ini

Вот пример /etc ...

Написал прогр. учета трафика интернет

Кто захочет может продолжить.


program acctraff;

//&#123;$APPTYPE CONSOLE&#125;

uses
SysUtils, Classes, BaseUnix, Unix;

var

fl_cl, fl_mngl&#58; TStringList;
arr_cl&#58; array of array&#91;0&#46;&#46;5&#93; of string;
arr_mngl&#58; array of array&#91 ...

Всем привет.

В своей программе на FP я использую динамический массив

var
arr_cl: array of array[0..5] of string;
n1: integer;

далее в програме делаю так

n1:=100;
SetLength(arr_cl, n1);

Так вот надоли перед окончанием освобождать память в системе и если надо, то как это делается?

Все разобрались, в конце освободили память и все встало на свои места.
Всем большое спасибо. :blink:

Все люди, разобрались в чем дело, надо было просто освобождать память в конце проги.
Теперь все работает.
Попробую написать ее теперь на С.

Люди я готов дать вам посмотреть мой код, только не смейтесь над моими потугами. Писана программа в первый раз в жизни.

Люди!!!!!!!!!!!!
-gl не помогает.

Еще раз повторяю программа все делает что от нее требуется

в проге объявляется массив типа

arr_cl: array of array[0..5] jo string;

далее в проге считывается количество строк в файле
и на основе кол-ва строк выполняется функция

setlength[arr_cl, n_strok];

может ...

А если не секрет где поставить этот ключ -gl, если я писал прогу в IDE FP

Дело в том что программа после компиляции выполняется и все что от нее требуется делает, но выдает в конце выполнения следущее:

[root@rubin develope_pascal]# ./acctraff
An unhandled exception occurred at &#036;0805BF96 :
EInvalidPointer : Invalid pointer operation
&#036;0805BF96
&#036;0805C01B ...

Всем добрый день.

Написал программу подсчета траффика при помощи iptables на linux на fpc 2.0.2

компилируется программа без ошибок, но при выполнении програмки выдает следущее

[root@rubin develope_pascal]# ./acctraff
An unhandled exception occurred at &#036;0805BF96 :
EInvalidPointer : Invalid ...