lzp_lrp的专栏

// 获得计算机名 AnsiString GetComputerName() { char name[MAX_COMPUTERNAME_LENGTH + 1]; DWORD size = MAX_COMPUTERNAME_LENGTH + 1; if(GetComputerName(name,&size)) return AnsiString(name); return

{取应用程式的版本号程式，如有版本号，返回值为版本号的值，否则返回值为空  返回值的格式为如1.0.0.0 }    function GetFileVersion(FileName: string): string;     type       PVerInfo = ^TVS_FIXEDFILEINFO;       TVS_FIXEDFILEINFO = record

一、思考与启发   1.对于Windows的Standard Controls，基本上大家应该是都会的：   GetWindowText，WM_GETTEXT可以获取EDIT的文本内容；   LB_GETTEXT可以获取LISTBOX列表项的文本内容；   CB_GETLBTEXT可以获取COMBOBOX下拉列表项的文本内容；   这里我就不多说了。   对于Windows的Com