ControlTipText on subform?

[deko]

Is it possible to get ControlTipText on subforms?

frm2 is the main form
frm2TxPending is a subform Datasheet

[Form_frm2]
Private Sub Form_Current()
Forms!frm2!frm2 TxPending.Form! Entity_ID.Contr olTipText = "test"
End Sub

I've tried different syntax, as well as putting the code on the subform
itself, but cannot get this to work. Am I missing something, or is this not
possible?

[Bruce M. Thompson]

> Is it possible to get ControlTipText on subforms?

frm2 is the main form
frm2TxPending is a subform Datasheet

[Form_frm2]
Private Sub Form_Current()
Forms!frm2!frm2 TxPending.Form! Entity_ID.Contr olTipText = "test"
End Sub

I've tried different syntax, as well as putting the code on the subform
itself, but cannot get this to work. Am I missing something, or is this not
possible?

IIRC, controltips don't work with forms in datasheet view.

--
Bruce M. Thompson, Microsoft Access MVP
bt******@mvps.o rg (See the Access FAQ at http://www.mvps.org/access)

NO Email Please. Keep all communications

within the newsgroups so that all might benefit.<<

[deko]

> IIRC, controltips don't work with forms in datasheet view.

I see. I've found an acceptable work around using MsgBox.

I have a couple of other questions (they are unrelated to the previous issue
so I may repost separately, but here they are):

* Can I use the MSI installer to install MDEs? I have a database I want to
distribute to clients, but I'd like an installer to check the config of the
PC's Office Installation (the database integrates with Office XP) as well as
create a few directories. What Installer should I use?

* I need to integrate a phone dialer with my mdb. Can you point me in the
right direction? What I need to do is pretty basic - just dial the number
in a datasheet on click.

Thanks!

[Stephen Lebans]

Hi Bruce,
there is a Form based Tooltip solution within the API Tooltip class on
my site that does work with Forms in Datasheet view.
http://www.lebans.com/tooltip.htm
ToolTip.zip is a database containing a custom ToolTip class for use in
A97 or higher.

A2KToolTip.zip is a database containing both an API and Form based
ToolTip solutions. The Form based solution can be used for forms in
DataSheet view.

Enhanced features include:

Selectable delay times for Toolltip to first appear
Selectable delay times for Tooltip to dissappear
Selectable Text Color
Selectable Background Color
Selectable Margins
Specify Tooltip size
Add a title to the Tooltip in Bold
Selectable Icon for the Tooltip
ToolTips for Lines, Boxes, any rectangular area on your Form

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Bruce M. Thompson" <bthmpson@big_N OSPAM_foot.com> wrote in message
news:10******** *****@corp.supe rnews.com...

Is it possible to get ControlTipText on subforms?

frm2 is the main form
frm2TxPending is a subform Datasheet

[Form_frm2]
Private Sub Form_Current()
Forms!frm2!frm2 TxPending.Form! Entity_ID.Contr olTipText = "test"
End Sub

I've tried different syntax, as well as putting the code on the subform

itself, but cannot get this to work. Am I missing something, or is this not possible?

IIRC, controltips don't work with forms in datasheet view.

--
Bruce M. Thompson, Microsoft Access MVP
bt******@mvps.o rg (See the Access FAQ at http://www.mvps.org/access) NO Email Please. Keep all communications

within the newsgroups so that all might benefit.<<

[Bruce M. Thompson]

> > IIRC, controltips don't work with forms in datasheet view.

I see. I've found an acceptable work around using MsgBox.
**See Stephen Lebans' reply to your post.
I have a couple of other questions (they are unrelated to the previous issue
so I may repost separately, but here they are):

* Can I use the MSI installer to install MDEs? I have a database I want to
distribute to clients, but I'd like an installer to check the config of the
PC's Office Installation (the database integrates with Office XP) as well as
create a few directories. What Installer should I use?
**I don't know that answer to that question. You might want to post that
question
to one of the developer toolkit groups, such as m.p.a.devtoolki ts or
m.p.a.developer s.toolkitode.
* I need to integrate a phone dialer with my mdb. Can you point me in the
right direction? What I need to do is pretty basic - just dial the number
in a datasheet on click.

**Take a look at:

http://www.mentalis.org/apilist/ABA8...D28D674AB.html

This might give you something to start with. And I'd recommend using a command
button or, at least, the double-click event for the textbox.

--
Bruce M. Thompson, Microsoft Access MVP
bt******@mvps.o rg (See the Access FAQ at http://www.mvps.org/access)

NO Email Please. Keep all communications

within the newsgroups so that all might benefit.<<

[Bruce M. Thompson]

Thanks, Stephen. Once again, I failed to check your site before responding, but,
once again, you came through. <g>

--
Bruce M. Thompson, Microsoft Access MVP
bt******@mvps.o rg (See the Access FAQ at http://www.mvps.org/access)

NO Email Please. Keep all communications

within the newsgroups so that all might benefit.<<

[deko]

> **Take a look at:

http://www.mentalis.org/apilist/ABA8...D28D674AB.html

This might give you something to start with. And I'd recommend using a command button or, at least, the double-click event for the textbox.

Great! Thanks for the tip! I'm trying to customize the code for my
needs... right now I'm working on getting the code to use Dialing
Properties - also, don't want any windows to pop up - just dial and then
drop connection in 6 seconds (so the user has 6 seconds to pick up the
phone).

developing...

[Form_frm0Teleph one]
Option Compare Database
Option Explicit
Private Declare Function tapiRequestMake Call Lib "TAPI32.DLL " _
(ByVal Dest As String, ByVal AppName As String, _
ByVal CalledParty As String, ByVal Comment As String) As Long

Private Sub Telephone_Numbe rs_DblClick(Can cel As Integer)
Dim strDial As String
strDial = Forms!frm0!frm0 Telephone.Form! TelNumber
Call PhoneCall(strDi al, Me!Entity_ID)
End Sub

Private Sub PhoneCall(sNumb er As String, sName As String)
Dim lRetVal As Long
lRetVal = tapiRequestMake Call(Trim$(sNum ber), "whatever", Trim$(sName),
"")
If lRetVal <> 0 Then Exit Sub
End If
End Sub