1000copy@gmail.com

1. ÖÆ×÷btnedit£¬ÄÇôeditµÄÇøÓò²»ÄÜÔ½¹ýbtn£¬±ØÐë֪ͨwindows/editµÄ±à¼­ÇøûÓп´ÆðÀ´µÄÄÇô´ó¡£(rxlib.tooledit)

procedure TCustomComboEdit.SetEditRect;
var
Loc: TRect;
begin
SetRect(Loc, 0, 0, ClientWidth - FBtnControl.Width - 2, ClientHeight + 1);
SendMessage(Handle, EM_SETRECTNP, 0, LongInt(@Loc));
end;

2¡£ ¶ÔpopupÀàµÄwindows£¬Êó±êÔڿؼþÍâµ¥»÷ʱ£¬»òÕßkillfocusʱ£¬ÐèÒª¹Ø±Õpopup £¬´ËʱÐèÒª½ØÈ¡ÏûÏ¢

procedure CMCancelMode(var Message: TCMCancelMode); message CM_CANCELMODE;

procedure TCustomComboEdit.CMCancelMode(var Message: TCMCancelMode);
begin
if (Message.Sender <> Self) and (Message.Sender <> FPopup) and
(Message.Sender <> FButton) and ((FPopup <> nil) and
not FPopup.ContainsControl(Message.Sender)) then
PopupCloseUp(FPopup, False);
end;

3. Õâ¸öÎļþ϶ϵã×ÜÊÇûÓÐÓ㬰ÑÎļþÖеÄ

unit xxx

{$R-,D-}

µÄ{$R-,D-}ɾ³ý¼´¿É¡£

4. SWP_NOSIZE ±íʾºöÂÔparams 5,6(height ,width),¶øÈ¡µÃȱʡֵ

SetWindowPos(FCale.Handle, HWND_TOP, P.X, Y, 0, 0, SWP_NOSIZE or SWP_NOACTIVATE or SWP_SHOWWINDOW);
//SetWindowPos(FCale.Handle, HWND_TOP, P.X, Y, 0+800, 0+400, SWP_NOACTIVATE or SWP_SHOWWINDOW);

http://www.delphibbs.com/delphibbs/dispq.asp?lid=265888

ÒѾ­·ÀÖ¹oopswareµ½testpsÖУ¬ÕýÔÚÔĶÁ¡£¸Ð¾õoopsдµÄ²»´í£¬ÇåÎú£¬²»¹ýÈç¹û²»È¥×Ô¼º×ö btnclear/btnpopup µÄ»æÖÆ£¬²»»æÖÆDrawText £¬¶øÊÇÖ±½ÓʹÓÃedit/tbutton/tbutton/tpopup£¬²»ÊǸüºÃÂð£¿