Welcome to MapForums!

Register, sign in, or use Facebook Connect above to join in and participate in the forum.

When you are signed in, this message, the ads in this row, and the red-underlined link ads all go away.

Subscribe to receive our newsletter.
Subscribe Unsubscribe
Page 2 of 2 FirstFirst 12
Results 11 to 14 of 14

Problems with Pushpin dataset

This is a discussion on Problems with Pushpin dataset within the MapPoint Desktop Discussion forums, part of the Map Forums category; Sylvain, Ok, I ran the sample code and it does that same thing here. Really wierd. I've tried several things ...

  1. #11
    John Meyer's Avatar
    John Meyer is offline Senior Member Blue Belt
    Join Date
    Jul 2002
    Posts
    478
    Sylvain,

    Ok, I ran the sample code and it does that same thing here. Really wierd. I've tried several things but nothing is working yet. Will let you know if I come up with an idea.

  2. #12
    kdybvik is offline Junior Member White Belt
    Join Date
    Aug 2002
    Posts
    3

    Workaround - Flashing "Find" dialog issue

    The "Find" Dialog looks like it wants to be sort of modal. By detecting if a window with "Find" as a title is currently visible at the top of the timer event seems to prevent the problem.

    A bit of a hack, but with a bit of extra work it might be acceptable. Localization will be an issue.

    Another approach that would take some research would be to try to track down the window handle of the mappoint control and subclass for the desired messages.


    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
    Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
    Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long


    Private Function IsFindVisible() As Boolean
    Dim lHwnd As Long
    Dim lRet As Long

    IsFindVisible = False

    lHwnd = FindWindow(vbNullString, "Find")

    If (lHwnd <> 0) Then
    If (GetParent(lHwnd) = Me.hwnd) And (IsWindowVisible(lHwnd)) Then
    IsFindVisible = True
    End If
    End If

    End Function


    and as the first executable line in the Timer event

    If IsFindVisible() Then Exit Sub

  3. #13
    John Meyer's Avatar
    John Meyer is offline Senior Member Blue Belt
    Join Date
    Jul 2002
    Posts
    478
    Sylvain,

    Did the post by: kdybvik do the trick for you? Sounds like it might be a good solution. Let us know if it worked out for you.

  4. #14
    Sylvain is offline Junior Member Yellow Belt
    Join Date
    Aug 2002
    Posts
    12
    Yes John, I just finished trying it and it works fine.

    Thanks for all your help, it was appreciated.

    Sylvain

Page 2 of 2 FirstFirst 12

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. PushPin dataset is saved in .ptm?
    By PeppeM in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 05-06-2006, 12:53 PM
  2. Add a newly created Pushpin to Dataset
    By Yazzy in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 08-24-2005, 01:46 PM
  3. Having problems getting location from pushpin
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 0
    Last Post: 11-02-2004, 10:33 AM
  4. delphi iterate pushpin dataset
    By merlino in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 10-12-2004, 09:20 AM
  5. Find Nearby Pushpin in dataset
    By Dazzer in forum Products: Pushpin Tool, Single State Mapper
    Replies: 1
    Last Post: 10-16-2003, 03:05 PM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25