原创 代碼即時高亮源碼，Delphi 實現
1、配置文件 <?xml version="1.0" encoding="utf-8" > < Classify> < Language Name="Delphi"> < Item Name="註釋"> < Co
2020-06-27 11:21:43
1
原创 delphi顯示jpg、png、gif圖片
delphi顯示jpg、png、gif圖片 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Control
2020-06-27 11:21:33
19
原创 delphi 中判斷對象是否具備某一屬性
Uses TypInfo; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var
2020-06-27 11:21:33
2
原创 一些非常有用的SQL技巧
一、 只複製一個表結構，不復制數據 select top 0 * into [t1] from [t2] 二、 獲取數據庫中某個對象的創建腳本 1、 先用下面的腳本創建一個函數 if exists(select 1 from
2020-02-23 10:33:05
原创 ClientDataSet的用法
TClientDataSet控件繼承自TDataSet，其數據存儲文件格式擴展名爲 .cds，是基於文件型數據存儲和操作的控件。該控件封裝了對數據進行操作處理的接口和功能，而本身並不依賴上述幾種數據庫驅動程序，基本上能滿足單機"瘦
2020-02-23 10:33:05
3
原创 DELPHI 數據庫心得
TField對象的SetText和GetText事件處理函數 使用TField對象的SetText和GetText事件處理函數可方便的解決字段的代碼與代碼所對應值的顯示問題 TSimpleDataset/TClientDatase
2020-02-23 10:33:05
原创 Delphi程序與Chm幫助關聯的簡單實現
Chm格式的幫助是從windows98以後纔出現的新的格式，與.hlp格式相比，具有更簡單的編輯方式、更豐富的畫面。它是通過Chm製作工具對網頁文件進行編譯得到的，所以理論上你可以把幫助文件做的和網頁一樣漂亮。 最簡單的製作方法
2020-02-23 10:33:05
原创 DELPHI WM_CopyData 用法
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtr
2020-02-23 10:33:05
4
原创 delphi中ComboBox的DataValue值
procedure TForm1.Button1Click(Sender: TObject); var s : string; begin combobox1.Clear; s := '01'; combobox1.Ite
2020-02-23 10:33:05
原创 Delphi Spring Framework編程規範（草稿）V0.1
Delphi Spring Framework編程規範（草稿）V0.1 （更新日期：2009-10-28） 1. 前言 爲保證Delphi Spring Framework項目代碼的可讀性和質量，特建立本編程規範。本規範僅適用於De
2020-02-23 10:33:05
原创 Delphi 下 VCLZip控件的簡單使用
uses VCLUnZip, VCLZip; function ComPressFile(dstFile,srcFile:string):Boolean; var vclzip:TVCLZip; begin Result:=Fa
2020-02-23 10:33:05
原创 如何減小Lazarus編譯出的文件的大小
方法一： 在菜單【project】-->【project option】的彈出界面中 選擇【compiler option】-->【linking】 在debugging中， 去掉“Generate debugging info for
2020-02-23 10:33:05
原创 Lazarus安裝Indy-10.2.0.3
把Lazarus安裝在不含空格的路徑下，並啓動。 下載Indy-10.2.0.3.tar.gz或Indy-10.2.0.3.zip，並解壓縮至Indy-10.2.0.3文件夾。建議把Indy-10.2.0.3文件夾放置在Lazar
2020-02-23 10:33:05
原创 Lazarus中TrayIcon的圖標運用（Windows）
1、用文本工具建立RC文件放在工程目錄下，如tray_test.rc，內容如下： 101 ICON "Aire_095.ico" 102 ICON "Aire_063.ico" 用lazarus的lazar
2020-02-23 10:33:05
原创 Delphi字符串旋轉任意角度
萬一的例子 //聲明: CreateFontIndirect( const p1: TLogFont {字體結構} ): HFONT; {返回新字體指針} //TLogFont 是 tagLOGFONTA 結構
2020-02-23 10:33:05