API tools faq
paste
Advertisement
kiwijunglist

Untitled

kiwijunglist
Aug 4th, 2013
88
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Autohotkey 1.01 KB | None | 0 0
raw download clone embed print report
  1. #SingleInstance,force
  2.  
  3.  
  4. Array := Object()
  5.  
  6. Array[1,"url"] := "http://www.one.com"
  7. Array[1,"name"] := "Video One"
  8. Array[2,"url"] := "http://www.two.com"
  9. Array[2,"name"] := "Video Two"
  10. Array[3,"url"] := "http://www.three.com"
  11. Array[3,"name"] := "Video Three"
  12. Array[4,"url"] := "http://www.four.com"
  13. Array[4,"name"] := "Video Four"
  14.  
  15. Gui, Add, ListView,w500 vListVars, Name|URL
  16. for index, in Array
  17.     LV_Add("", Array[index,"name"], Array[index,"url"])
  18. LV_ModifyCol()
  19. Gui, Add, Button, gDelete, Delete
  20. Gui, Add, Button, gView, View
  21. Gui, Add, Button, gEdit, Edit
  22. Gui, Show
  23. Return
  24.  
  25. Delete:
  26. Return
  27.  
  28. View:
  29. RowNumber := 0
  30. Loop
  31.     {
  32.     RowNumber := LV_GetNext(RowNumber)
  33.     if not RowNumber
  34.         Break
  35.     LV_GetText(Text, RowNumber,2)
  36.     msgbox % text
  37.     }
  38. Return
  39.  
  40. Edit:
  41. RowNumber := 0
  42. Loop
  43.     {
  44.     RowNumber := LV_GetNext(RowNumber)
  45.     if not RowNumber
  46.         Break
  47.     LV_GetText(Text, RowNumber,1)
  48.     InputBox, text, Edit Video Name,,,,,, , , , %text%
  49.     ; *** EDIT ROWNUMBER 1 + COL 1 and replace text with %text%
  50.    
  51.     }
  52. Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!