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£¬ÓÉÓÚ×ÜÊÇÔÚ¿´£¬Ð§¹û²»ÊǺܴó£¬Ò²ºÃ¾ÃûÓз¢±íÎÄÕÂÁË£¬ËùÒÔΪÁ˸üºÃµÄѧϰ£¬°Ñѧµ½µÄ¶«Î÷¼Ç¼ÏÂÀ´¡£ÎÒѧϰJavaScriptµÄÊéÊÇ¡¶¾«Í¨JavaScript+jQuery¡·£¬Èç¹û´ó¼ÒÓиüºÃµÄÊéÇëÍƼö¡£
Ò». ʼþµÄ¸ÅÄî
C#ÖÐʼþµÄ¶¨Ò壺ʼþÀàËÆÓÚÒì³££¬Ë ......
È¡Öµ·½·¨£º
¶ÔÓ¦µÄ²¼¶ûÖµ: !!value
ÊÇ·ñ==1ºÍtrue: value == true
ÊÇ·ñ==0ºÍfalse: value == false
Êý¾ÝÀàÐͶÔÓ¦µÄ²¼¶ûÖµÊÇ·ñ==1ºÍtrueÊÇ·ñ==0ºÍfalse
×Ö·û´® 'abc'
true
false
false
×Ö·û´® '0'
true
false
true
¿Õ×Ö·û´®
false
false
true
´øÒ»¸ö¿Õ¸ñµÄ×Ö·û´®
true
false
true
Êý×Ö1
true
true
......
¡¡¡¡¼¸ºõËùÓеĸ» Web Ó¦Óö¼»ùÓÚÒ»¸ö»ò¶à¸ö Web UI ¿â»ò¿ò¼Ü£¬ÕâЩ UI ¿âÓë¿ò¼Ü¼«´óµØ¼ò»¯ÁË¿ª·¢½ø³Ì£¬²¢´øÀ´Ò»Ö£¬¿É¿¿£¬ÒÔ¼°¸ß¶È½»»¥ÐÔµÄÓû§½çÃæ¡£±¾ÎĽéÉÜÁË15 ¸ö·Ç³£Ç¿´óµÄ JavaScript Web UI ¿â£¬·Ç³£Êʺϸ÷ÖÖ¸÷ÖÖ¹æÄ£µÄ¸» Web Ó¦ÓõĿª·¢¡£
¡¡¡¡LivePipe
¡¡¡¡LivePipe UI »ùÓÚ Prototype Javascript ¿ò¼Ü£¬°üº¬ÁË ......
====================================================
Delphi²Ù×÷ÎļþµÄÒ»°ã²½Ö裺
1£©¹ØÁªÎļþ£º
AssignFile(var F; FileName :string)£»
2£©³õʼ»¯Îļþ£º
Append(var F :Text);
//ֻд£¬ÓÚÎļþ×îºó×·¼ÓÊý¾Ý
Reset(var F [; RecSize :Word]);   ......
²»ÖªµÀÔõô»ØÊ£¬ÒÔÇ°ÓÃsetTimeoutû³ö¹ýÎÊÌ⣬Õâ´ÎÔõôÓö¼´í
´úÂ룺
window.onload=function(){
function x(){
alert("s");
}
setTimeout("x()",1000);
}
°Ñwindow.onload=function(){}È¥µô¾ÍÄÜÓÃÁË£¬µ«ÊÇÕâÑùд¹ßÁË£¬¶øÇÒÈ¥µôÖ®ºó£¬Ïñdocument.getElementByIdÕâÑùµÄ·½·¨»áÕÒ²»µ½¶ÔÏó£¬ ......