,          
 (HTML).  MultiLineTooltip



       .  GrdCellTT

 1.0  24/07/2003 IK

-------------------------------------------------------------------------------
:

1 
2 
3  
4 
5   
6    , , 
7  
8  //
9   
10   
11  

-------------------------------------------------------------------------------
1 :

           
          .  
     ,       ,  
          .

-------------------------------------------------------------------------------
2 :

       :

Vlad Grynchyshyn <vgryn@yahoo.com>            
   HTML .

  <po2@online.ru>          
         .

Paul-Vlad Tatavu <vladt@poboxes.com>      FancyTooltip
-      .

-------------------------------------------------------------------------------
3  :

  MultiLineTooltip       
 Microsoft Visual FoxPro 7 (SP1 )    .

  Microsoft Windows98    Microsoft Windows 2000   .
    ,   .

ActiveX  DHTML Edit Control For IE5 (    Microsoft
Internet Explorer 5     )    ProgID  -  "DHTMLEdit.DHTMLEdit.1"
     dhtmled.ocx,       
 "C:\Program Files\Common Files\Microsoft Shared\Triedit\".

     6.1.0.8456  6.1.0.8851.

,                  
  (          
 Microsoft Visual FoxPro   "07.00.0000.9465"  OC     
Win2K SP2).

-------------------------------------------------------------------------------
4 :

-   ,         


-              ,     
                 
  

-           

-     ( ,  )

-     ( HTML )

-    ,         
  (       )

-            
,     

-    TopLevel-   AlwaysOnTop 

-    ActiveX ,   

-     (  )

-------------------------------------------------------------------------------
5   :

   MultiLineTooltip         
             .
  ,       ,    
  ,      ,        .
  :
)  _GetTooltipText(tnX, tnY)
)  _cTooltipText
)   TooltipText

    ,         
   (    ,   
  255- , ..        
),    HTML  (   )   
HTML-.       
          (  ,  
),       ActiveX  .    
   HTML-            ,    
  .          
     HTML (    , 
              ,    
      ).

   MultiLineTooltip    "
".    -     
,        ,   .  
    -            
    -        ,  
      .    
       ,        -        
 ,         
      ,          
 (    ,        ).
    :      -  
,    -        .    .
  .

    GrdCellTT -    ,        
    ( Dynamic* )    
            ,     
 ,           
  ,    ,    -   
  -     ,          
  .        ,
           ,
               .  
  Dynamic*  (    DynamicFontStrikeThru)
     MultiLineTooltip    
     ,   -      
      - ..    
 ,        (        
).

-------------------------------------------------------------------------------
6    , , :

 _TooltipEngine ( MultiLineTooltip.vcx):
  - Timer (       
  ).            -  
.  :

  Enabled = .F.  -          ,  
     lShowTips

  Interval =  500  -        ,      (  )
    ""   -    ,  
     .

  nDefaultWidth = 400 -         (  
         _nTooltipWidth).    
    ,     ,    -      
     .

  lShowTips = .T.  -        .    
           ,   
       

  lUseHTML =  .F.  -    HTML    .        
    ,       (  
       - ) -    ,    -
         HTML .   
          (  )  ,      
    , ..    HTML       
       

  lTakeFromParent =  .F.  -            
    ()  .    ,   -
                 
          ( ,   ),  
        /  
    

  nTooltipStatic = 3 -    :
    0 -       (          
         _nTooltipStatic),
    1 -    ( ),
    2 -    (       
          _nTooltipStatic = 1 -        
        ),
    3 -    (    -    
         _nTooltipStatic = 0 -         
       )

  __cVersion -   (  )

       (    )  -    
                    
   (      
   GetTooltipProperties,        
 ).          ,
     :

  cTooltipFontName = "Tahoma" -  
  nTooltipFontSize = 8 -  
  nTooltipFontWeight = 400 -   .          HTML
    , ..      
  lTooltipFontBold = .F. -  .     
  lTooltipFontItalic = .F. -  
  lTooltipFontUnderline = .F. -  
  lTooltipFontStrikethru = .F. -  .      
        ,    
      ,     -.
                        
       ,      , 
      .     HTML  
  nTooltipFontCharset  =  204  -          .  
             VFP8.  
    HTML            -    
       204 (    ),      HTML
        - Windows1251
  nTooltipBackColor = 16777215 -    
  nTooltipForeColor = 0 -   

,       ( 
 HIDDEN):

  lSavedShowTips !  ! -    
    ShowTips.          
    ,             (
     lShowTips  .F.)

  cLastObjPath !  ! -       
         (  ).    
           

  cLastTooltipText !    ! -     
    ,       ,          
      

  oToolTip !  ! -         ,
       

ASSIGN- (           
HIDDEN):

  lShowTips_Assign()
  lUseHTML_Assign()

   :

  Init()
  Timer()

 :

  GetTooltipProperties() -      
     (, )


 _TooltipWindow ( MultiLineTooltip.vcx):
  - Form (    ,  ..
     ).      
 .        -  .
    -    .         
.


 _HTMLTooltipWindow ( MultiLineTooltip.vcx):
  - Form (    ,  ..
      ).        HTML
 ( ).            -
OleControl    DHTML  Edit  Control  for  IE5.  
  -    .          .


 GrdCellTT ( GridForMLTooltip.vcx):
  - Grid (       
 ,          
      - ..    
  VFP)

:

  _nTooltipWidth = 400  -      .      
     ,      

  _nTooltipStatic = 0 -  .    
    ,      .  
          0 -  

  __cVersion -   (  )

,      :

  _nTopLineRecNo  =  0  -      ,    
      ,            
    .

   :

  Init()
  Scrolled()
  AfterRowColChange()
  Resize()

 :

  _GetTooltipText(tnX, tnY)  -            
    .        .      
    _GetGridPartTooltip()       ,
      ,       , 
      ,         

  _GetTopLine() -    .            
    Dynamic*   .     (..  
       )

  _GetGridPartTooltip(tnX,  tnY,  tnWhere,   tnRelativeRow,   tnRelativeColumn,
    tnPanel, toColumn) -      ,      
          .    
     ControlSource ,      ,  
             .    
    :

  tnX -               
     
  tnY -                 
     
  tnWhere -  ,         
    .        ,           
      GridHitTest()
  tnRelativeRow -           ,  
      
  tnRelativeColumn -       ,  
      
  tnPanel   -                
    GridHitTest()
  toColumn -    ,     

  ,          ,  
        .


      ,              
MultiLineTooltip,       
,          .
   , .. MultiLineTooltip,     
  ,    ,            
.

       (    ,  
  )   :

  _cToolTipText  -            .  
          VFP TooltipText,
               ,  MultiLineTooltip  
       .
  _nTooltipStatic -            
    :
    0 -  
    1 -  
         nTooltipStatic   0  1, 
         ,     
      2    3,          ,    
         
  _nTooltipWidth -   .    
      nDefaultWidth   .

    ,          
:

  _GetTooltipText(tnX, tnY) -     ,  
              .    
    :

  tnX -           
       
  tnY -           
      

       ,       
  .     MultiLineTooltip

-------------------------------------------------------------------------------
7  :

    MultiLineTooltip,          
   _TooltipEngine      .    
   lShowTips  .T.   lUseHTML    
            
(    HTML ).       HTML
  ,     (HTML      
-HTML )    HTML , ..     .
              ,   
   TooltipText (    
    ),      _cToolTipText
   _GetTooltipText.        
       ( ) 
 AddProperty(),         ,  
   .

                      
 _GetTooltipText, ..         
    ,        .

  GrdCellTT           
  ,        .            
   _GetGridPartTooltip, :
)        
)                      
ControlSource   ,      .      
        -         ControlSource
,             
,     _GetGridPartTooltip   
    -,     .
!              
  () -           
 ,     Init :

This.AddProperty("_cToolTipText", "    ")

          Init    .
            
DODEFAULT(),      ...

     _VFP.AutoYield  =  .F.  
             ,    
   .

   -      
  ,     .

-------------------------------------------------------------------------------
8  //:

-         255
 -          ,      
 /.             
,        ,      
 .  :
 Init   

This._cToolTipText = "   " + ;
                   "     "

                
  255  .              
,     

-   -HTML         255  .  
       

-   HTML        -    
 .        
 HTML ,                   
 . ..        , 
    ,       DHTML  
  ,    

-     HTML             
     (,  ).        
  HTML  DHTML ,     
   

-   HTML      (<H*>,  <CITE>
 ..)            .  
     HTML 

-    GrdCellTT     ,
    :
)      ,   
   (  HTML/-HTML, /
 ).
)      .
      ,              
    

-             (   
" "/""),          
.              
   ,           
   .          
,           WM_SETTINGCHANGE
(   Top-level     ,    
     ),      
:

*   
ThisForm._TooltipEngine1.GetTooltipProperties()
*   
ThisForm._TooltipEngine1.lShowTips = ThisForm._TooltipEngine1.lShowTips

    -     _TooltipEngine1

-           DynamicFontStrikeThru     
  (   Init    GrdCellTT),    
,      ,     
    _GetTopLine().     
   (           DEFINE
CLASS),       ,     
.

- -        DHTML  Edit  Control,       
  MultiLineTooltip    HTML-.    
          _HTMLTooltipWindow    
,       oleHTML ( 
 )   -.     
  ActiveX  ,   ,    
.      ...

    ,       ,    
   ,  ,        
 ,       .

-------------------------------------------------------------------------------
9   :

  (   ),            
            .  
            -   ,   ,
     ..        
       ,            ,   
    -        -  
   .

-------------------------------------------------------------------------------
10   :

     .       
  ,     ,    
  ,             
.           
     .         
  ,     .

-------------------------------------------------------------------------------
11  :

  
e-mail: <k1i2v3@km.ru>  <korolyov@modem.by>
ICQ: 323945195
 , .
 " " .
-------------------------------------------------------------------------------
