如何将工程最小化后的图标加到system tray中。。
请赐教!。。
请赐教!。。
解决方案 »
- 如何向特定的打印机打印字符串,不用任何报表控件!
- 如何实现 映像劫持 ???
- 请教一下如何从ACCESS数据库OLE对象字段中读取JPG图片
- delphi 2005 update2
- 初学数据库,请问用AdoConnection,AdoDataSet,DataSource够用吗?实现增加删除更新查询即可。
- 为什么??关于ADOX.Catalog
- DWORD) * ((DWORD *) ((LPSTR)vs + vs->dwStringOffset) );
- 一个很实用的程序(建立SQL结构)和源代码送给大家,具体请进
- 关于StringGrid的显示问题
- 刷新窗口用什么语句?
- 哪位大虾帮我看看这段代码?
- logfont的问题(高分相送!)
如果是想用到控件 RX包内就有此功能的控件
用什么Api函数呢?Thank you。
email:[email protected]
thank you!
var
AC: LongInt;
CP: TPoint;
begin
AC := Message.LParam;
if AC = WM_RBUTTONDOWN then
begin
if dispatcha.Visible then
exit;
GetCursorPos(CP);
PopMenudis.Popup(CP.X, CP.Y);
end;
end;
procedure Tdispatcha.FormPaint(Sender: TObject);
begin
hide;
end;