#Persistent
#SingleInstance force
CoordMode, ToolTip, Screen
Gui, Add, ListView, r10 w250 gMyListView, Name         ; Create the ListView with two columns, Name and Size:

Gui, Add, Button,default gMyListView, OK
Loop, %A_ScriptDir%\*.ttp                              ; Gather a list of file names from a folder and put them into the ListView:
	LV_Add("", A_LoopFileName, A_LoopFileSizeKB)
Gui, Show,,Select a Tool Tip File                      ; Display the window and return. The script will be notified whenever the user double clicks a row.
return

MyListView:
RowNumber = 0                                          ; This causes the first loop iteration to start the search at the top of the list.
Loop
{
	RowNumber := LV_GetNext(RowNumber)               ; Resume the search at the row after that found by the previous iteration.
	if not RowNumber                                 ; The above returned zero, so there are no more selected rows.
	    break
	LV_GetText(RowText, RowNumber)
}
if A_GuiEvent = DoubleClick                            ;Get file on Mouse double click
{
	LV_GetText(RowText, A_EventInfo)                 ; Get the row's first-column text.
}

if RowText = 
     {
     msgbox, You have not selected a TTP file.
     return
     }

gui, destroy                                           ;destrot the initial GUI

 Loop, Read, %A_ScriptDir%\%rowtext%
      Rowcount := A_Index 
   
Line =1
SW := (A_Screenwidth-300)                                                    
SH := (A_Screenheight-200)  
gui, add, button, w80         gPrev,&Prev
Gui, Add, Button, w80 x+2     gFlashMe,&Flash tooltip
gui, add, button, w80 x+2     gNext,&Next
gui, add, button, w80 xs     gRemoveToolTip,&Hide
gui, add, button, w80 x+2      gShowAll,&Show 
gui, add, button, w80 x+2     gGuiClose,&Close
gui add, text,    w200  xs vstatus, 
Gui, +AlwaysOnTop
Gui, Color, FEFF8F
gui, show, x%SW%  y%SH%,ToolTipPrompt
goto, DisplayToolTip

Prev:
Line -=1
goto, DisplayToolTip
Next:
Line +=1
goto, DisplayToolTip

DisplayToolTip:
if Line > %Rowcount%
{
Msgbox, Thanks for using ToolTipPrompt. `n`nThis is the last tooltip`n`nUse Prev or Close.
Line = %Rowcount%
}
if Line < 1
{
msgbox, Thanks for using ToolTipPrompt. `n`nThis is the First tooltip
Line = 1
}
FileReadLine,linecontents,%RowText%,%line%

		
Loop, Parse, linecontents,CSV
  {
  If A_Index = 1
    ToolTipX =%a_loopfield%
  If A_Index = 2
    ToolTipY =%a_loopfield%
  If A_index = 3
    ToolTipText =%a_loopfield%
  If A_Index > 3
    ToolTipText=%TooltipText%,%a_loopfield%
  }
  Tooltip,%tooltiptext%,%tooltipX%,%tooltipY%
  GuiControl,, Status , ToolTipPrompt %Line% of %Rowcount% 
return

Flashme:
     ToolTip
     Sleep,250
     Tooltip,%tooltiptext%,%tooltipX%,%tooltipY%
return

RemoveToolTip:
ToolTip
return

ShowAll:
Tooltip,%tooltiptext%,%tooltipX%,%tooltipY%
return

GuiClose:
ExitApp