《菜鸟的自我修养》

procedure TEnter_F.FormCreate(Sender: TObject);var   DLYH_Q:TADOQuery;begin   Connect:=TADOConnection.Create(nil);   Connect.ConnectionString:=Provider=Microsoft.Jet.OLEDB.4.0;Data Source=./Data.mdb;

摘:http://search.csdn.net/Expert/topic/952/952794.xml?temp=.50733581，用Application.Teminate终止程序，不会触发OnClose、OnCloseQuery事件。Terminate() 会调用Windows的PostQuitMessage()函数向应用程序的消息队列中发一个消息。VCL据此释放应用程序创建的所有对象

procedure TInfoForm.Button2Click(Sender: TObject);var m:DOUBLE;begin  m:=12345678;  ShowMessage(Format(%*.*n,[0,0,m]));end;[       0          ,              0                 ,             m] 保留位数  

function Format(const Format: string; const Args: array of const): string; [SysUtils.pas]功能：返回按指定方式格式化一个数组常量的字符形式说明 ："%" [索引 ":"] ["-"] [宽度] ["." 摘要] 类型Format(x=%d, ); //x=12 //最普通Format(x=%3d,

在DELPHI中怎麼安裝控件   由於組件提供的方式不同，所以安裝的方法也是不一樣的，下面就目前常見的各種形式的組件的安裝方法介紹一下。 1  隻有一個DCU文件的組件。DCU文件是編譯好的單元文件，這樣的組件是作者不想把源碼公布。一般來說，作者必須說明此組件適合Delphi的哪種版本， 如果版本不對，在安裝時就會出現錯誤。也正是因為沒有源碼，給使用者帶來了不便，那就是一旦Delphi版本升級，此

TiniFile类中定义了许多成员函数，这里介绍几个使用频率较高的成员函数：             ⑴   Create（）             函数定义为：   constructor   Create(const   FileName:   string);         该函数建立TiniFile类的对象。参数FileName是要读写的初始化文件名。