From b5d6fe4af8ef6404fdb7203610f8792f298a7665 Mon Sep 17 00:00:00 2001 From: George Hazan Date: Wed, 27 Nov 2024 16:02:18 +0300 Subject: more old shit to discard --- plugins/HistoryPlusPlus/HistoryGrid.pas | 18 ----------- plugins/HistoryPlusPlus/hpp_olesmileys.pas | 52 ------------------------------ 2 files changed, 70 deletions(-) diff --git a/plugins/HistoryPlusPlus/HistoryGrid.pas b/plugins/HistoryPlusPlus/HistoryGrid.pas index ab0ad610d7..a6bfdbb1ca 100644 --- a/plugins/HistoryPlusPlus/HistoryGrid.pas +++ b/plugins/HistoryPlusPlus/HistoryGrid.pas @@ -3364,9 +3364,6 @@ begin if iObject.QueryInterface(IID_ITooltipData, iTooltipCtrl) = S_OK then OleCheck(iTooltipCtrl.GetTooltip(ObjectHint)) - else if Supports(iObject, IID_IGifSmileyCtrl) then ObjectHint := TranslateW('Running version of AniSmiley is not supported') - else if Supports(iObject, IID_ISmileyAddSmiley) then ObjectHint := TranslateW('Running version of SmileyAdd is not supported') - else if Supports(iObject, IID_IEmoticonsImage) then ObjectHint := TranslateW('Running version of Emoticons is not supported') else break; if ObjectHint = '' then @@ -4044,21 +4041,6 @@ begin if not IsRectEmpty(smRect) then InvalidateRect(Handle, @smRect, False); end - else if (nmh.bEvent = FVCN_GETINFO) and (nmh.bAction = FVCA_NONE) then - begin - RichItem := FRichCache.GetItemByHandle(Message.nmhdr^.hwndFrom); - if not Assigned(RichItem) then - exit; - if (RichItem.GridItem = -1) or (RichItem.GridItem = FItemInline) then - exit; - if not RichItem.BitmapDrawn then - exit; - // if (State = gsIdle) or (State = gsInline) then - nmh.bAction := FVCA_INFO; - nmh.rcRect := GetRichEditRect(RichItem.GridItem, True); - nmh.clrBackground := RichItem.Bitmap.TransparentColor; - nmh.fTransparent := False; - end; end else {$ENDIF} diff --git a/plugins/HistoryPlusPlus/hpp_olesmileys.pas b/plugins/HistoryPlusPlus/hpp_olesmileys.pas index 2aa278204f..53dbd697e6 100644 --- a/plugins/HistoryPlusPlus/hpp_olesmileys.pas +++ b/plugins/HistoryPlusPlus/hpp_olesmileys.pas @@ -26,19 +26,9 @@ Created: 04.02.2007 Author: theMIROn - [ Description ] - - [ History ] - 1.5 (04.02.2007) First version - [ Modifications ] - none - - [ Known Issues ] - none - Contributors: theMIROn -----------------------------------------------------------------------------} @@ -50,9 +40,6 @@ uses Windows,CommCtrl,ActiveX; const IID_ITooltipData: TGUID = '{58B32D03-1BD2-4840-992E-9AE799FD4ADE}'; - IID_IGifSmileyCtrl: TGUID = '{CB64102B-8CE4-4A55-B050-131C435A3A3F}'; - IID_ISmileyAddSmiley: TGUID = '{105C56DF-6455-4705-A501-51F1CCFCF688}'; - IID_IEmoticonsImage: TGUID = '{2FD9449B-7EBB-476a-A9DD-AE61382CCE08}'; type ITooltipData = interface(IUnknown) @@ -61,45 +48,6 @@ type function GetTooltip(out bstrHint: WideString): HRESULT; stdcall; end; - IGifSmileyCtrl = interface(IUnknown) - ['{CB64102B-8CE4-4A55-B050-131C435A3A3F}'] - end; - - ISmileyAddSmiley = interface(IUnknown) - ['{105C56DF-6455-4705-A501-51F1CCFCF688}'] - end; - - IEmoticonsImage = interface(IUnknown) - ['{2FD9449B-7EBB-476a-A9DD-AE61382CCE08}'] - end; - -(* - NM_FIREVIEWCHANGE is WM_NOTIFY Message for notify parent of host window about smiley are going to be repaint - - The proposed action is next: Owner of RichEdit windows received NM_FIREVIEWCHANGE through WM_NOTIFY - twice first time before painting|invalidating (FVCN_PREFIRE) and second time - after (FVCN_POSTFIRE). - The Owner window may change any values of received FVCNDATA_NMHDR structure in order to raise needed action. - For example it may substitute FVCA_INVALIDATE to FVCA_CUSTOMDRAW event to force painting on self offscreen context. - - It can be: - FVCA_CUSTOMDRAW - in this case you need to provide valid HDC to draw on and valid RECT of smiley - FVCA_INVALIDATE - to invalidate specified rect of window - FVCA_NONE - skip any action. But be aware - animation will be stopped till next repainting of smiley. - FVCA_SENDVIEWCHANGE - to notify richedit ole about object changed. Be aware Richedit will fully reconstruct itself - - Another point is moment of received smiley rect - it is only valid if FVCA_DRAW is initially set, - and it is PROBABLY valid if FVCA_INVALIDATE is set. And it most probably invalid in case of FVCA_SENDVIEWCHANGE. - The smiley position is relative last full paint HDC. Usually it is relative to top-left corner of host - richedit (NOT it client area) in windows coordinates. - -*) - -const // additional for animated smileys (idk where introduced) - // Type of Event one of - FVCN_GETINFO = 255; - // Action of event are going to be done - FVCA_INFO = 255; - implementation end. -- cgit v1.2.3