Kod: <table cellpadding="0" cellspacing="0" width="492" height="350"> <!-- MSTableType="layout" --> <tr> <td width="492" height="350"><font color="#00FF00"><!-- START OF SCRIPT --> <script LANGUAGE="JavaScript"> <!-- begin script //General Array Function function MakeArray(n) { this.length = n; for (var i = 1; i <=n; i++) { this[i] = 0; } } //Initialize Days of Week Array days = new MakeArray(7); days[0] = "Cumartesi" days[1] = "Pazar" days[2] = "Pazartesi" days[3] = "Sali" days[4] = "Carsamba" days[5] = "Persembe" days[6] = "Cuma" //Initialize Months Array months = new MakeArray(12); months[1] = "Ocak" months[2] = "Subat" months[3] = "Mart" months[4] = "Nisan" months[5] = "Mayis" months[6] =...
Delphi olarak etiketlenmiş yazılar
HTML Manşet Haber
07
May 2011
1.KOD MANŞET HABER Kod: <iframe style="font-family:Verdana* Arial* Helvetica* sans-serif; font-size:10px" src="http://www.ozelegitimuzmani.com/manset.asp" align="middle" scrolling="no" width="100%" height="360" frameborder="0" name="manset"></iframe> 2.KOD AŞAĞIDAN YUKARI AKAN Kod: <iframe style="font-family:Verdana* Arial* Helvetica* sans-serif; font-size:10px" src="http://www.ozelegitimuzmani.com/kayanhaberler.asp" align="middle" scrolling="no" width="100%" height="240" frameborder="0" name="haber"></iframe> Alıntıdır.
HTML Mouseye Eşlik Eden Yazı
07
May 2011
Kod: <SCRIPT language=JavaScript1.2> <!-- var message='ShadyStorm'; var messagecolor='red ' //Enter number of seconds for message to display (0=perpetual) var dismissafter=0 ///no need to edit below///////// var amount=5*ypos=0*xpos=0*Ay=0*Ax=0*By=0*Bx=0*Cy=0*Cx=0*Dy=0*Dx=0*Ey=0*Ex=0; if (document.layers){ for (i = 0; i < amount; i++) {document.write('<layer name=ns'+i+' top=0 left=0><font face="Courier New" size=3 color='+messagecolor+'>'+message+'</font></layer>')} window.captureEvents(Event.MOUSEMOVE); function nsmouse(evnt){xpos = evnt.pageX;ypos = evnt.pageY;makefollow()} } else if (document.all){ document.write("<div id='outer' style='position:absolute;top:0px;left:0px'>"); document.write("<div id='inner' style='position:relative'>"); for (i = 0; i < amount; i++) {document.write('<div id="text"'+i+' style="position:absolute;top:0px;left:0px;font-family:Courier New;font-size:16px;color:'+messagecolor+'">'+message+'</div>')} document.write("</div>"); document.write("</div>"); function iemouse(){ypos = document.body.scrollTop + event.y;xpos = document.body.scrollLeft + event.x;makefollow()} } function makefollow(){ if (document.layers){ document.layers["ns0"].top=ay;document.layers["ns0"].left=ax; document.layers["ns1"].top=by;document.layers["ns1"].left=bx; document.layers["ns2"].top=cy;document.layers["ns2"].left=cx; document.layers["ns3"].top=Dy;document.layers["ns3"].left=Dx; document.layers["ns4"].top=Ey;document.layers["ns4"].left=Ex; } else if (document.all){...
HTML Fare Değiştirme
07
May 2011
Kod: <style>body{CURSOR: url("http://www.misafir.net/images/mause.cur")</style> Alıntdır.
HTML Yüklenme Barı
07
May 2011
Kod: <SCRIPT language=VBScript> <!-- Dim Bar* Line* SP Bar = 0 Line = "|" sP = 100 Function Window_onLoad() Bar = 95 sP = 10 END Function Function Count() If Bar < 100 Then Bar = Bar + 1 Window.Status = "Yükleniyor: " & Bar & "%" & " " & String(Bar* Line) setTimeout "Count()"* SP Else Window.Status = "Yükleme Bitti" Document.Body.Style.Display = "" End If End Function Call Count() --> </SCRIPT> Alıntıdır.


