常用的CnPack的代码模版
CnPack代码模版
{ %记录名% }
P%记录名% = ^T%记录名%;
T%记录名% = packed record
%Cursor%
end;
T%记录名%s = array[0..0] of T%记录名%;
P%记录名%s = ^T%记录名%s;
---------------------------------------
if MessageBox(GetActiveWindow, '% 信息%', '%标题%',
MB_OKCANCEL or MB_ICONQUESTION) = ID_OK then
begin
%Cursor%
end;
---------------------------------------