原创 delphi字符串替換
{ 功能:字符串替換 參數: s: 源字符串 source: 需要被替換的字符串 target: 需要替換成的字符串 返回值:
原创 asp.net控制打印區域
<style type="text/css" media="print"> .noprint{display : none } </style> class="noprint"的區域不會在打印時出現
原创 Delphi操作word的基本用法
剛把delphi撿起來,第一個要做的竟然操作word,總結一下。 一. 定義word應用程序,文檔對象,比如: wordApp: OleVariant; wordDoc: OleVariant;二. 打開word文檔 wordApp
原创 delphi獲取子字符串
1.{作用:截取字符串中的某一些字符 strSource:源字符串 strBegin: 開始位置字符串 strEnd: 結束位置字符串例:GetStr('abcd1234','bc','34')返回值:'d12'}function Ge
原创 微軟的網頁在firefox上面字體變化
微軟真不受人歡迎,微軟的幾個網站,包手幫助文件在firefox瀏覽器上面顯示有問題,字體會改變。而回到ie上面卻顯示正常.
原创 讀txt文件內容
using System; using System.Collections; using System.Configuration; using System.Data; using System.Linq; using System.
原创 delphi DatatoExcel
procedure DataToExcel(eQUery: TADOQuery ;eGrid : TDBGrideh; cfromname:string);var ExcelApp: Variant; //Excel對象 i
原创 asp包含其他頁面
1.<%server.Execute("service_hotel_comments.asp")%> 2.<script src="http://202.103.68.57/Hotel_Order_Report/service_hotel
原创 delphi outlook發送郵件
1.定義//mail信息結構type TMailInfo = record strUID, strPWD, strHost:string; //SMTP用戶ID , SMTP用戶密碼 , SMTP主機 iPort:Inte
原创 Delphi 系統服務
安裝服務程序 function TForm1.InstallService: Boolean;var schSCManager,schService:THANDLE; strDir:array[0..1023]of char; l
原创 Delphi webBrowser焦點
var oldcur:tcursor;begin oldcur := Screen.Cursor; screen.cursor :=crHourGlass; OpenEnglishItinerary();
原创 Html精確定位,ScrollHeight等介紹,以及一個例子實現在某個控件處打開一個DIV
HTML:scrollLeft,scrollWidth,clientWidth,offsetWidth到底指的哪到哪的距離之完全詳解scrollHeight: 獲取對象的滾動高度。 scrollLeft:設置或獲取位於對象左邊界和窗口中目
原创 asp中sql語句
1.執行存儲過程 (1)存儲過程中應該使用set nocount on (2) rs.close set rs=nothing set rs=CreateObject("ADODB.DataSet")
原创 WinAPI: ShellExecute - 打開外部程序或文件
WinAPI: ShellExecute - 打開外部程序或文件 ShellExecute( hWnd: HWND; {指定父窗口句柄} Operation: PChar; {指定動作, 譬如: open、prin
原创 DELPHI編譯的DLL喜歡內存泄漏
用Delphi的過程中難免會遇到很多奇怪的問題,而Delphi的文檔也出奇的少,因此只能自己慢慢的總結,所以有了下文(由於只是零散的細節,所以文筆上沒有花什麼功夫,可能會比較亂,但應該能夠理解;-))。如果:1. 你有下面問題的更好解決方