Post-it

Contenu du snippet

Ben voila c'est un Post-it tout simple. Alt+R et mettre dans les remotes

Source / Exemple :


dialog post {
  title "« Post-It »"
  size -3 -3 248 217
  edit "", 10, 10 0 230 180, return, multi, vsbar
  button "Enregistrer", 18, 10 187 80 25, ok default
  button "Effacer", 19, 160 187 80 25
}

on 1:dialog:post:edit:10:{
  unset %post
  set %i 0
  :debut
  inc %i
  set %post %post $+ $did(10,%i).text $+ $crlf

  if (%i >= $did(10).lines) { goto fin }
  goto debut
  :fin
}
alias post {
  set %dreturn $dialog(post,post,-1)
}
on 1:dialog:post:init:0: {
  did -a post 10 %post
}
on 1:dialog:post:sclick:19: { 
  did -r post 10
  unset %post
}

Conclusion :


Voila et bon Scripting à vous

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.