Problème pour coller du texte dans un WebGadget

[nico]

Ce code ne fonctionne pas chez moi, et j'aurais besoin de cette possibilité, comment puis je faire?

Impossible de coller du texte dans un Input

Code : Tout sélectionner

Enumeration 1
  #OLECMDID_OPEN
  #OLECMDID_NEW
  #OLECMDID_SAVE
  #OLECMDID_SAVEAS
  #OLECMDID_SAVECOPYAS
  #OLECMDID_PRINT
  #OLECMDID_PRINTPREVIEW
  #OLECMDID_PAGESETUP
  #OLECMDID_SPELL
  #OLECMDID_PROPERTIES
  #OLECMDID_CUT
  #OLECMDID_COPY
  #OLECMDID_PASTE
  #OLECMDID_PASTESPECIAL
  #OLECMDID_UNDO
  #OLECMDID_REDO
  #OLECMDID_SELECTALL
  #OLECMDID_CLEARSELECTION
  #OLECMDID_ZOOM
  #OLECMDID_GETZOOMRANGE
  #OLECMDID_UPDATECOMMANDS
  #OLECMDID_REFRESH
  #OLECMDID_STOP
  #OLECMDID_HIDETOOLBARS
  #OLECMDID_SETPROGRESSMAX
  #OLECMDID_SETPROGRESSPOS
  #OLECMDID_SETPROGRESSTEXT
  #OLECMDID_SETTITLE
  #OLECMDID_SETDOWNLOADSTATE
  #OLECMDID_STOPDOWNLOAD
EndEnumeration

Enumeration 0
     #OLECMDEXECOPT_DODEFAULT
     #OLECMDEXECOPT_PROMPTUSER
     #OLECMDEXECOPT_DONTPROMPTUSER
     #OLECMDEXECOPT_SHOWHELP
EndEnumeration

#Paste=1002

If OpenWindow(0, 0, 0, 600, 600, "WebGadget", #PB_Window_ScreenCentered|#PB_Window_SystemMenu)

    AddKeyboardShortcut(0,#PB_Shortcut_Control | #PB_Shortcut_V, #Paste)
 
  If CreateGadgetList(WindowID(0))
    WebGadget(0, 20, 20, 560, 560, "http://purebasic.fr/french/login.php")
    WebObject.IWebBrowser2 = GetWindowLong_(GadgetID(0), #GWL_USERDATA)
     
   
  Repeat
    Event =WaitWindowEvent()
    Select Event
      Case #PB_Event_Menu
        Select EventMenu()
            Case #Paste
            SetClipboardText("PureBasic")
            WebObject\ExecWB(#OLECMDID_PASTE, #OLECMDEXECOPT_DONTPROMPTUSER, 0, 0)
        EndSelect
    EndSelect

    Until Event = #PB_Event_CloseWindow
  EndIf
EndIf

[Anonyme]

tu veut "édité" une page web ? autrement dit , il te faut récuperé les gadgets intérieur de la page web.
Comme je ne suis pas un crack des api , j'analyserai la source de la page html source , et ferais en fonction , mais n'étant pas non plus un crack en html , je ne peut t'aider plus

[nico]

Non je ne veux rien éditer, je veux juste faire du copier coller dans un champ HTML comme on peut le faire dans n'importe quel navigateur en faisant un simple CTRL V.

[Anonyme]

Code : Tout sélectionner

SetClipboardText("PUREBASIC")

[nico]

Il faut aller dans les options internet pour permettre les opérations du Clipboard si cela ne fonctionne pas déjà:

Onglet Sécurité-->Personnaliser le niveau-->Autoriser l'accès programmatique du presse-papiers-->cocher autoriser

[Jacobus]

Juste pour info ton code fonctionne très bien chez moi.
Je sais ça fout les boules... mais c'est peut-être qu'un réglage à faire chez toi. (Xp home sp2, mode admin)

[nico]

Oui merci mais j'ai trouvé, je l'explique dans mon post précédent.

[Jacobus]

Ah, Ok, juste un temps de retard

[Anonyme]

ha oui , j'avais rien compris au problème