熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> Delphi編程 >> 正文

Delphi 編程技巧常見實例問答

2013-11-23 17:45:05  來源: Delphi編程 

   delphi怎樣調用外部EXE文件?

  uses WinProcs;
  
  begin
  WinExec(……);
  
  end
  
  和調用Pascal庫函數沒什麼兩樣

   Delphi hint的字體和色彩如何改變
  
  Delphi中Tapplication的屬性有HintColor及HintPause可以通過設置HintColor改變應用程序中的Hint的顏色通過設置HintPause改變觸發Hint的時間但遺憾的是Delphi中Hint的字體不可以改變

   Delphi裡如何計算日期
  
  算時間在delphi中是最容易的如下

  var ss : TDateTime

  其實Tdatetime是一個雙精度的浮點數它的小數點前表示天數 ss := ss + 表示從ss開始向後如果 ss = 它就表示 當然是從公元年開始計算的!

   如何用Delphi編ScreenSaver? (null)
  
  屏幕保護程序無非是擴展名換成了SCR的可執行程序它接受兩種命令行參數
  s 運行命令參數
  c 配置命令參數
  Windows通過向程序發s命令行參數來啟動程序要注意的是程序的窗口是無邊框和標題窗口大小應與屏幕大小一樣還要注意窗口的事件的處理

   Delphi 中如何改目錄的名字
  
  調用RenameFile函數如:
  RenameFile(c:wang emp c:wang mp);

   DELPHI顯示JPEG圖像文件

  只要 uses中加入 JPEG就行JPEG單元裡是有一個TJPEGImage類可定義一變量如Jpeg用LoadFromFile調入某個JPEG文件 然後用Form的CanvasDraw(xyJpeg)即可顯示

   Delphi中對Jpeg格式文件的處理…

  ()在 Uses 中加入 JPEG 單元;

  ()定義一個全程變量例如 var AJPEG : TJPEGImage;

  ()在 Form 的 OnCreate 事件中加入 :

  CanvasPenColor:=clBlack;
  CanvasPenStyle:=psSolid;
  CanvasBrushcolor:=clBtnFace;
  CanvasBrushStyle:=bsSolid; //此上是設置 Canvas 的一些屬性便於以後
  //Clear Form and Load a new JPEG file;
  Ajpeg:=TJpegImageCreate;//動態生成Ajpeg;
  AjpegLoadFromFile(D:Tempjpg) //生成 Ajpeg 後調入 JPEG 文件

  ()在 Form 的 OnPain 事件中加入CanvasRectangle(); //畫一個黑框的矩形將圖片圍住;
  
  x:=; y:=;
  FormCanvasDraw(xyAjpeg); //以(xy)為左上角輸出 JPEG 文件;
  //實際上其作用是當圖形被破壞是使圖形恢復;

  ()LoadBrowse按鈕的 onClick 事件中加入:

  begin
  if OpenPictureDialogExecute then
  begin
  AjpegFree; //釋放舊Ajpeg;
  Ajpeg:=TJpegImageCreate; //產生一個新的Ajpeg;
  AjpegLoadFromFile(OpenPictureDialogFilename); //載入JPEG文件;
  end;
  CanvasRectangle(); //將Form Clear;
  x:=;
  y:=;
  FormCanvasDraw(xyAjpeg); //顯示新的Ajpeg;
  end;

   DELPHI啟動畫面

  in your *dbr files do it
  begin
  {Create a splash form}
  splash:=TsplashCreate(self);
  splashShow;
  splashupdate
  ApplicationInitialize;
  ApplicationCreateForm()
  
  
  
  splashclose;
  splashfree;
  ApplicationRun
  end;


From:http://tw.wingwit.com/Article/program/Delphi/201311/25017.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.