万一 - 博客园

2007年11月29日

JavaScript for 循环

摘要： //代码：阅读全文

posted @ 2007-11-29 01:29 万一阅读(2191) 评论(0) 推荐(0) 编辑

2007年11月28日

摘要： location.reload(); 或者 document.location.reload(); 阅读全文

posted @ 2007-11-28 16:47 万一阅读(2448) 评论(0) 推荐(0) 编辑

把字符串复制到剪贴板

摘要： uses Clipbrd;Clipboard.AsText := str; //or Clipboard.SetTextBuf(PChar(str)); 阅读全文

posted @ 2007-11-28 13:25 万一阅读(7418) 评论(2) 推荐(0) 编辑

如果一个对象不存在

摘要：阅读全文

posted @ 2007-11-28 01:14 万一阅读(2377) 评论(0) 推荐(1) 编辑

2007年11月27日

标记汉语拼音

摘要：这是万一的博客Zhe Shi Wan Yi De Bo Ke//代码(只在IE下有效)：这是万一的博客Zhe Shi Wan Yi De Bo Ke 阅读全文

posted @ 2007-11-27 16:27 万一阅读(2373) 评论(0) 推荐(0) 编辑

常用的表格效果

摘要： 1 2 3 4 5 6 //代码如下： 1 2 3 4 5 6 //也可以用样式表控制： #table1{ background-color:#000000;//表格整体背景黑色，也就是缝隙间的颜色 width:500px; ... 阅读全文

posted @ 2007-11-27 16:21 万一阅读(3116) 评论(1) 推荐(0) 编辑

SHTML 文件显示当前时间

摘要：阅读全文

posted @ 2007-11-27 16:09 万一阅读(2716) 评论(1) 推荐(0) 编辑

时间的运算

摘要： procedure TForm1.Button1Click(Sender: TObject); var i: Real; begin i := StrToDate('2008-1-1') - StrToDate('2007-1-1'); ShowMessage(FloatToStr(i)); //返回的结果是365天 i := StrToDate('2009-1-1') - ... 阅读全文

posted @ 2007-11-27 15:35 万一阅读(4368) 评论(9) 推荐(0) 编辑

摘要： uses ShellAPI; procedure TForm1.Button1Click(Sender: TObject); begin //用IE打开 ShellExecute(Handle, 'open', 'IExplore.EXE', 'about:blank', nil, SW_SHOWNORMAL); //用火狐打开 ShellExecute(Handle, 'ope... 阅读全文

posted @ 2007-11-27 12:57 万一阅读(6583) 评论(19) 推荐(1) 编辑

清除 Windows 系统垃圾的 bat

摘要： @echo off echo 正在清除系统垃圾文件，请稍等...... del /f /s /q %systemdrive%\*.tmp del /f /s /q %systemdrive%\*._mp del /f /s /q %systemdrive%\*.log del /f /s /q %systemdrive%\*.gid del /f /s /q %systemdrive%\*.chk... 阅读全文

posted @ 2007-11-27 10:02 万一阅读(3933) 评论(1) 推荐(0) 编辑