摘要: //代码: 阅读全文
posted @ 2007-11-29 01:29 万一 阅读(2107) 评论(0) 推荐(0) 编辑
摘要: location.reload(); 或者 document.location.reload(); 阅读全文
posted @ 2007-11-28 16:47 万一 阅读(2310) 评论(0) 推荐(0) 编辑
摘要: uses Clipbrd;Clipboard.AsText := str; //or Clipboard.SetTextBuf(PChar(str)); 阅读全文
posted @ 2007-11-28 13:25 万一 阅读(7257) 评论(2) 推荐(0) 编辑
摘要: 阅读全文
posted @ 2007-11-28 01:14 万一 阅读(2256) 评论(0) 推荐(1) 编辑
摘要: 这是万一的博客Zhe Shi Wan Yi De Bo Ke//代码(只在IE下有效):这是万一的博客Zhe Shi Wan Yi De Bo Ke 阅读全文
posted @ 2007-11-27 16:27 万一 阅读(2275) 评论(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 万一 阅读(2998) 评论(1) 推荐(0) 编辑
摘要: 阅读全文
posted @ 2007-11-27 16:09 万一 阅读(2619) 评论(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 万一 阅读(4243) 评论(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 万一 阅读(6092) 评论(19) 推荐(1) 编辑
摘要: @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 万一 阅读(3815) 评论(1) 推荐(0) 编辑