其他

Delphi中三種延時方法及其定時精度分析 來自：lili_0522 時間：2005-7-14 16:21:05  　在Delphi中，通常可以用以下三種方法來實現程式的延時，即TTtimer控制項，Sleep函數，GetTickCount函數。但是其精度是各不相同的。 一、三種方法的簡單介紹1）TTtimer控制項　　TTtimer控制項的實質是調用Windows API定時函數SetTimer和KillTimer來實現的，並簡化了對WM_TIMER

核心提示：【函數名】 GetTickCount【庫名】 kernel32【適用範圍】 95/98/ME/NT/2000/XP...【說明】用於擷取自windows啟動以來經曆的時間長度（毫秒）【傳回值】 Long，以毫秒為單位的windows已耗用時間通常用來計算某個操作所使用的時間： Start:=GetTickCount; ...//執行耗時的操作Stop:=GetTickCount;

var s: string;begin //FormatFloat 的參數1是 String 格式指令, 參數2是實數類型 Extended s := FormatFloat('###.###',12.3456); //返回: 12.346 s := FormatFloat('000.000',12.3456); //返回: 012.346 s := FormatFloat('#.###',12.3); //返回: 12.3 s := FormatFloat('0.000',1

//第一種方式procedure TForm1.btn1Click(Sender: TObject);beginWith TForm2.Create(Application) doTry ShowModal;finally free;end;end;//第二種方式procedure TForm1.btn2Click(Sender: TObject);begin if not assigned(Form2) then begin Form2:=TForm2.Create(nil)

運算式中的括弧將嚴重影響分割結果.uses RegularExpressions;const FSourceText = '1: AAA 2: BBB 3: CCC'; // 分隔字元將有三部分構成: 一個數字, 一個冒號, 一個空格var Arr: TArray; str: string;procedure TForm1.Button1Click(Sender: TObject);begin Arr := TRegEx.Split(FSourceText, '\d: ');

形式 function StrToIntDef(const S: string; Default: Integer): Integer;引用單元 SysUtils.pas功能 返回字串S轉換成整數說明 字串非整數表達時則返回預設值Default參考 procedure System.Val例子 SpinEdit1.Value := StrToIntDef(Edit1.Text, 0);返回int（Edit1.Text） 如果不成功，返回0例子代碼：procedure

一、利用系統預設的郵件收發器寄送電子郵件 Uses ..., ShellAPI; Var lpHwnd: HWND; lpOperation, lpFile, lpParameters, lpDirectory: String; Begin lpHwnd:= GetDesktopWindow(); lpOperation:= 'open'; lpFile:= 'mailto:' + 'Maple119@263

第一次在部落格園寫文章，想跟大家分享一下一些關於Chromium的.net封裝版本從學校畢業後到現在也有一年半了，主要做.net方面的，winform和asp.net,MVC。期間維護過一個項目，用Winform的WebBrowser展現web網站項目，給使用者更好的使用者體驗。後來聽說了html5，很想試試，但由於WebBrowser是採用IE核心，麼法子。找了一堆和瀏覽器相關的資料，當中也學到了不少。比如說Chrome Frame

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) pnl1: TPanel; btn1: TButton; btn2: TButton; procedure btn1Click(Sender: TObject)

我很少用 bcb ,重裝 bcb6 後原來的項目居然不能編譯成功了,看了一下是控制項的問題,但很多控制項實際上並不關聯的,而 bcb 堅持要你"擁有"當時的控制項環境,折騰很久實在是沒發現在項目的什麼選項進行配置,目前我的做法是將 bpr 檔案或 bpk 檔案中的 LIBRARIES 和 SPARELIBS 清空.有時候還要清空代碼中的 #pragma link 部分(似乎前者對應標準 C 中的 lib 後者對應標準 C 中的 obj)

1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls; 8 9 type10 TForm1 = class(TForm)11 Button1: TButton;12 Button2: TButton;13 procedure

問題：TEECHART使用Canvas.TextOut標註文字，然後我想把TEECHART和標註的文字一起儲存成圖片（CHART1.SaveToBitmapFile('D:\6789.BMP')）。但是發現儲存了，那個標註的文字沒有了。圖表曲線倒是在的，怎麼解決的？ 解決方案如下：1：在你的表單加入一個TImage命名為img1，大小設定的和你的chart一樣大，把visible設定成false2：cht1.Canvas.ShowImage(img1.Canvas, img1.Canvas,

200PLC不支援主站，300PLC支援主站，是什麼意思啊？ 請舉例說明，謝謝1、在MPI、PROFIBUS-DP協議通訊中，都是主、從結構。對於S7-200是不能作為通訊的主站：、S7-200CPU只能做MPI從站，即S7-200CPU之間不能通過MPI網路互相通訊，只能通過PPI方式互相通訊。

Function StrToHexStr(Const S: String): String; //字串轉換成16進位字串(方法一) Var I: Integer; Begin For I := 1 To Length(S) Do Begin If I = 1 Then Result := IntToHex(Ord(S[1]), 2) Else Result := Result + ' ' + IntToHex(Ord(S[I]), 2); End;

 ubuntu 命令列模式和圖形介面切換1、按ALT+CTRL+F1切換到字元介面（Linux實體機）     如果是VMware虛擬機器安裝的Linux系統，則切換到字元介面的時候需要以下操作     按下ALT+CTRL+SPACE(空格)，ALT+CTRL不鬆開，再按F1。這樣就可以切換到字元介面了。2、按ALT+CTRL+F7切換到圖形介面（Linux實體機）     如果是VMware虛擬機器安裝的Linux系統，則切換到圖形介面的時候需要以下操作    

在c語言中有：a[5]={1,2,3,4,5} ；那麼在 delphi中，這個數組的賦值該怎麼寫？？ 問題補充：下面有人說的對，我就是想在聲明數組的時候賦初值，至於初值的內容你們不需要知道，我想知道的只是申明的時候賦值的格式，而不是通過一個過程去實現var  a:=array[1..5] of integer=(1,2,3,4,5)只有全域變數才能賦初始值，而且5個值都要賦滿s:array[1..264]   of   integer；     s:=((1),(2),(2),(1),(1),(

在用INNO SETUP製作安裝指令碼時常常遇到DLL沒有註冊而安裝完成後運行程式出現錯誤的問題經過一系列的搜尋終於找到瞭解決方案 特此共用代碼如下： [Files]Source: "DLL檔案所在路徑"; DestDir: "{app}"; Flags:ignoreversion regserverSource: "DLL檔案所在路徑"; DestDir: "{app}";

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure FormCreate(Sender: TObject); procedure

URLconf+MTV：Django眼中的MVC MVC是眾所周知的模式，即：將應用程式分解成三個組成部分:model(模型),view(視圖),和 controller(控制 器)。其中：             M 管理應用程式的狀態（通常儲存到資料庫中），並約束改變狀態的行為（或者叫做“商務規則”）。             C 接受外部使用者的操作，根據操作訪問模型擷取資料，並調用“視圖”顯示這些資料。控制器是將“模型”和“視圖”隔離，並成為二者之間的聯絡紐帶。            

就是給DIV樣式命名，CSS控制Div在網頁上的顯示效果，css樣式的調用有兩種，一是<div class="c"></div>，另一種是<div id="c"></div>，可在在CSS檔案裡定義CSS樣式時有兩種方法，一種是（.c{width:20px;height:20px;} ）另一種是（#c{width:20px;height:20px;}），當你調用以“ . ”開頭的樣式時就用<div class="d1">，調用以“ #