Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

javascriptÖе÷ÓÃdelphiº¯Êý


ÒÔÏÂÊÇtest.htmÒ³µÄÄÚÈÝ
Ê×Ïȶ¨ÒåÒ»¸ö²å¼þ¶ÔÏó
 
<object id="Mapupload" name="Mapupload" width="0" height="0" classid="clsid:045FA9B9-B373-4D4C-AE76-128A19A4B6AE">
</object>
<script type="text/javascript">
//´Ëº¯Êý´ò¿ªactivexform´°Ì岢ΪactiveformµÄÊôÐÔ¸³Öµ
function loadUploader(){
 if(window.ActiveXObject){
  try{
  document.getElementById("Mapupload").picname='20060531';  //Ϊ¶ÔÏó¸³Öµ
  document.getElementById("Mapupload").open();   //µ÷ÓöÔÏóµÄopen·½·¨
  }
  catch(e){
  }
 }
 else{
 }
}
</script>
<TEXTAREA style="WIDTH: 400px; HEIGHT: 226px" name="" id='Content' rows=20 cols=40></TEXTAREA>
<button name="start" type="button" onclick="loadUploader();"></button>
<!-- scriptº¯Êý -->
<script Language=Javascript>
function InsertHTML()
{
 var UrlStr = document.getElementById("MapUpload").Content;
 alert(UrlStr);
}
</script> 
<!-- ¶¨ÒåDelphiÖзÃÎʵÄOnCallʼþ¶ÔÓ¦µÄScript·½·¨ -->
¶¨Òå¶ÔÏóµÄOnInsertHTMLʼþΪactiveformµÄOninsertHTMLʼþ£¬²¢´¥·¢Ò³ÃæµÄinserthtml·½·¨
<SCRIPT FOR="Mapupload" 
        EVENT="OnInsertHTML()" 
        LANGUAGE="JScript">
    <!-- insert script commands -->
   InsertHTML();
</SCRIPT>
 
delphiÖнöÐèÔÚ_TLBÖÐÉùÃ÷OninsertHTMLʼþ£¬Open·½·¨£¬contentÊôÐÔ¼´¿É
 
procedure TFeSendFrmX.open;
begin
  hnd := self.handle;
  FrmUpLoad := TFrmUpLoad.Create(self);
  with FrmUpload do
  begin
    ShowModal;
   


Ïà¹ØÎĵµ£º

javascript ¿ØÖÆcss js¿ØÖÆ clss


ÏñÉÏÃæµÄÒ»ÕÅͼƬÎÒÃǸÃÔõôÓÃjs ºÍcss + div ºÜºÃµÄÓ¦Óõ½ÎÒÃǵÄÏîÄ¿ÖÐÄØ£¿
<style>
.InpuRight{
height:20px;background:url(img/msg_bg.png) no-repeat;background-position:0px -250px;
}
.InputError{
width:20px;height:20px;background:url(img/msg_bg.png) no-repeat 0px 0px;
}
.inputLogin{
wid ......

JavaScript »ñȡʼþ¶ÔÏóµÄÒ»¸ö×¢Òâµã¡¾ÎÊÌâ¡¿


JavaScript »ñȡʼþ¶ÔÏóµÄÒ»¸ö×¢Òâµã
2009-7-24 ÉÏÎç
- JS/Ajax/AS/Flex
- event
- javascript
  
ƽʱÎÒÃÇ»ñȡʼþ¶ÔÏóÒ»°ãд·¨ÈçÏ£º
function
getEvent
(
event
)

{
   
return

event

||
window
.
event
 
// IE:window.event
}
Èç¹ûûÓвÎÊý£¬Ò²¿ ......

DelphiÎļþ²Ù×÷³£Óú¯Êý

====================================================
Delphi²Ù×÷ÎļþµÄÒ»°ã²½Ö裺
1£©¹ØÁªÎļþ£º
 AssignFile(var F; FileName :string)£»
2£©³õʼ»¯Îļþ£º
 Append(var F :Text);   
 //ֻд£¬ÓÚÎļþ×îºó×·¼ÓÊý¾Ý
 Reset(var F [; RecSize :Word]);     ......

DelphiÖ÷´Ó±íÀý×Ó

ÔÚsql server µÄnorthwide Öн¨Á¢Ö÷±í
create table sell_h( sell_id char(10),cust_name char(10) Primary key(sell_id) )
go
create table sell_h( sell_id char(10),inv char(10) ,amt float,qty float Primary key(sell_id,inv) )
Ê×ÏÈ,ҪעÒâÒÔÏÂÉèÖÃ
1.ҪעÒⱨ´Ó±íqrydetailÉèÖÃ,Åú±£´æ¿ªÊ½. ¼´.locktype= batc ......

javascriptÖÐsetTimeoutÓ¦ÓÃ

²»ÖªµÀÔõô»ØÊ£¬ÒÔÇ°ÓÃsetTimeoutû³ö¹ýÎÊÌ⣬Õâ´ÎÔõôÓö¼´í
´úÂ룺
window.onload=function(){
function x(){
alert("s");
}
setTimeout("x()",1000);
}
°Ñwindow.onload=function(){}È¥µô¾ÍÄÜÓÃÁË£¬µ«ÊÇÕâÑùд¹ßÁË£¬¶øÇÒÈ¥µôÖ®ºó£¬Ïñdocument.getElementByIdÕâÑùµÄ·½·¨»áÕÒ²»µ½¶ÔÏó£¬ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ