- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.Transparent:=true;
Image1.Picture.LoadFromFile('ab.bmp');
inbot:='1';
wkbot:='1';
Memo1.Text:='';
with Form1 do
SetWindowPos(Handle,
HWND_TOPMOST,
Left,
Top,
Width,
Height,
SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
statusbar1.Panels.Items[0].Text:='Клиент подключон';
si:='log.txt';
assignfile(fi,si);
reset(fi);
for i:=0 to 1590 do begin
Readln(fi, a);
b:=b+a;
end;
Memo1.Lines.Add(b);
CloseFile(fi);
statusbar1.Panels.Items[0].Text:='Ожидание подключения клиента';
Button2.Enabled:=false;
end;
Ещё один говнокод от ВебКилла. MOAR!!!!111: http://3.webkill.ru/socket_messager.html
Govnocoder#0xFF 13.04.2011 18:43 # 0
http://old.webkill.ru/m2.jpg
7ion 13.04.2011 18:44 # +1
http://webkill.org/img/webkill_na_vershine.JPG
Govnocoder#0xFF 13.04.2011 18:46 # 0
Альзо: Адидас детектед.
da4ever 13.04.2011 23:54 # +2
Fixed.
guest 04.05.2011 12:33 # +2
"Сегодня гуляя по городскому пляжу увидел орла – большая птица, с величественным размахом крыльев. Все голуби и сороки кружили, улетали от него, но одного голубя орел задел, и тот повалился в воду. Его сразу схватила собака, и стала играть, а потом сьела. Да, такие голодные, дикие собаки бегают по нашему пляжу. И перья с останками голубя остались по всему пляжу"
istem 04.05.2011 12:36 # 0
7ion 05.05.2011 13:01 # 0
(0 д 0);
Lure Of Chaos 13.04.2011 18:49 # +5
Govnocoder#0xFF 13.04.2011 18:54 # 0
Да ладно, шучу. Я просто собираю инфу для статьи на лурке.
Lure Of Chaos 13.04.2011 18:55 # 0
Govnocoder#0xFF 13.04.2011 18:57 # 0
RaZeR 14.04.2011 21:24 # −1
Lure Of Chaos 14.04.2011 21:28 # 0
7ion 13.04.2011 18:51 # 0
http://webkill.org/mustdie#more-1093
7ion 13.04.2011 18:51 # 0
Govnocoder#0xFF 13.04.2011 20:01 # 0
guest 13.04.2011 20:40 # +5
guest 13.04.2011 23:31 # −2
guest 14.04.2011 09:24 # −3
guest 13.04.2011 23:34 # +3
Lure Of Chaos 14.04.2011 09:37 # +3
Надо срочно проверить остальные признаки, что я не вебкилл ))))
guest 14.04.2011 02:21 # +3
Суровый таджик-хакер http://m-unit.ru
К сожалению он не дружит с opensource и его великие исходники простой смертный не увидит ((
striker 14.04.2011 02:28 # +3
bugmenot 14.04.2011 03:05 # +2
telnet 14.04.2011 07:47 # +1
guest 14.04.2011 21:37 # 0
guest 23.03.2012 12:33 # −5
школяра завидуй молча, и не обсуждай человека сзади.
Govnocoder#0xFF 27.03.2012 21:07 # −1
guest 14.04.2011 12:51 # 0
...возможности огранивались... клиент подключОн... газон засеян, меседжер-messager... массажер, мля:) Не говоря уже о потоке сознания, не ограниченном запятыми и прочими излишними знаками препинания:)
Лучше уж честный таджик, насяльника!:)