turk irc chat
www.turkirc.com Güncel Sitemize Girip mircimi’zi Ziyaret edebilirsiniz Sohbet chat Kelimelerde öncülük etmekdedir, www.turkirc.com mirc Scriptimi’zi indirip Sohbet’e başlayabilirsiniz.
» Devamını OkuYıl: 2014
DELPHI / Hicon To Ticon
var MyIcon:TIcon; icoHandle: HIcon; begin MyIcon:=TIcon.Create; try icoHandle := ExtractIcon(application.handle,’c:\windows\explorer.exe’, 0); MyIcon.Handle:=icoHandle; Image1.Picture.Icon:=MyIcon; finally MyIcon.free; end; end;
» Devamını OkuDELPHI / Open Source Ahmdialogs
(* This File is Part of the AHM Triton Tools for Borland Delphi and C++ Builder. Copyright (c) 1995 – 1998 AHM Alexander H. Mehlhorn For more Information contact AHM at E-Mail : [email protected] ICQ : 176724 or URL http://www.ahm.co.za AHM is copyright by Alexander H. Mehlhorn All Parts of this Collection were developed, designed and implemented by AHM Under […]
» Devamını OkuPASCAL / Asgari Geçim İndirimi
program asgari_gecim_indiri; uses crt; const s_oran = 50; var med,es : char; cocuk : 1..15; oran : real; begin {$R+} clrscr; write(‘Evlimisin bekarmsn? (e yada h ) > ‘); readln(med); writeln; if med in [‘H’,’h’] then begin write(‘Asgari ge‡im indirim orannz ‘, s_oran); end else begin write(‘EŸiniz ç‡alŸyor mu? (e yada h ) > ‘); readln(es); writeln; if es in […]
» Devamını OkuDELPHI / Cursor Sabitlemek
procedure TForm1.Edit1Exit(Sender: TObject); begin showmessage(‘Asla yazı kutusundan çıkamassın’); postmessage(handle,WM_NEXTDLGCTL,0,0); postmessage(handle,WM_NEXTDLGCTL,1,0); end;
» Devamını OkuSitenize Güncel Altın Fiyatları Kodu Ekle
mIRC Html Remotesi
|
1 2 3 4 5 6 7 |
Bu kodun amaci mirc script uzerinden web sitelerine baglanarak yaptiginiz sockopen islevlerinde gereki olan html kodlarini temizleyip duz metin halinde görmenizi saglar. Yazan kim bilmiyorum ama socks olarak baglandiginiz web sitelerinde kod halinda geliyor kodlardan arindirmak icin en güzel yontem budur. Kod; alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) return %x } |