目前分類:Delphi基本 (9)

瀏覽方式: 標題列表 簡短摘要

使用TStringList 達成依照數字大小排序

unit XBCurrList;

文章標籤

抓狂小白 發表在 痞客邦 留言(0) 人氣()

procedure TForm1.Edit1KeyPress (Sender: TObject; var Key: Char) ;
begin
  If Key = #13 Then Begin
    If HiWord(GetKeyState(VK_SHIFT)) <> 0 then
      SelectNext(Sender as TWinControl,False,True)
    else
      SelectNext(Sender as TWinControl,True,True) ;
    Key := #0
  end;
end;


抓狂小白 發表在 痞客邦 留言(0) 人氣()

Delphi 四捨五入

 

抓狂小白 發表在 痞客邦 留言(0) 人氣()

Delphi 設定IDE 在編譯執行時不要跳出錯誤訊息

 

抓狂小白 發表在 痞客邦 留言(0) 人氣()

  TStatusLevel = (slWait, slPause, slIgone, slUrgent, slFinished);

  TStatusLevelRec = record

文章標籤

抓狂小白 發表在 痞客邦 留言(0) 人氣()

在下Sql 語法時 太多引號 避免混淆 使用 QuotedStr 函數 包住要加引號的字串


抓狂小白 發表在 痞客邦 留言(0) 人氣()

Delphi 基本的Try語法

try

文章標籤

抓狂小白 發表在 痞客邦 留言(0) 人氣()

procedure Keydown(key:word);
begin

抓狂小白 發表在 痞客邦 留言(0) 人氣()

SetCursorPos(x,y); //滑鼠移動
 

抓狂小白 發表在 痞客邦 留言(0) 人氣()

Close

您尚未登入,將以訪客身份留言。亦可以上方服務帳號登入留言

請輸入暱稱 ( 最多顯示 6 個中文字元 )

請輸入標題 ( 最多顯示 9 個中文字元 )

請輸入內容 ( 最多 140 個中文字元 )

reload

請輸入左方認證碼:

看不懂,換張圖

請輸入驗證碼