Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.01;
Скачать: CL | DM;

Вниз

procedure TForum.Destoy;   Найти похожие ветки 

 
BBear   (2003-03-01 20:49) [0]

var
i, j : Integer;
begin
for i := 1 to Self.PagesCount do
for j := 1 to Self.Page[i].TopicsCount do
while Self.Page[i].Topic[j].MessagesCount > 0 do Self.DeleteTopMessage;

FreeMem(Self.MessagesData);
FreeMem(Self.UsersData);

Log.Write("all messages deleted");

inherited Destroy;
end;


 
Anatoly Podgoretsky ©   (2003-03-01 20:55) [1]

Что нам делать с данной процедурой?


 
Mihey   (2003-03-01 21:14) [2]

2 Anatoly Podgoretsky:
Очевидно, читать и завидовать.


 
Snap ©   (2003-03-01 21:18) [3]

Это он видать форум сломать пытался- да вот незадача- форум то на перле (по моему) написан...


 
Mihey   (2003-03-01 22:48) [4]

По-моему, вопрос очевиден, по крайней мере автор так думает.


 
BBear   (2003-03-02 13:47) [5]

а как на перле форум удалить?


 
Programist   (2003-03-02 13:50) [6]

procedure bber.idiot(Sender: TObject)
begin
bber.idiot:=true;
end;



Страницы: 1 вся ветка

Текущий архив: 2003.09.01;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.031 c
1-1407
Lina
2003-08-19 16:17
2003.09.01
ListView


1-1493
n-m-a
2003-08-18 09:37
2003.09.01
Я извеняюсь за свой может глупый вопрос, но можно ли узнать


6-1543
MegaVolt
2003-06-26 15:44
2003.09.01
Как получить доступ к компутеру с паролем?


3-1350
Weare
2003-08-04 17:12
2003.09.01
Доступ к веделенным записям


1-1431
vitnt
2003-08-19 10:09
2003.09.01
Как программно прокрутить memo на последнюю строку?