Screenz

Commenter

Contenu du snippet

Un petit add-on qui sert à créé des ScreenShots à partir de mIRC.
Il ne gère que les JPG pour le moment, la dll plante un peu avec les PNG.
Pour le zip >> http://perso.wanadoo.fr/nazario/dl/Screenz.zip << !
Voir l'aperçu

Source / Exemple : 


menu channel,menubar,status {
  Screenz
  .Menu principal:ss
  .-
  .Capture: screenz $?="Nom && extension ?"
  .-
  .Contacts:run mailto:NazarioBoSs@hotmail.com?subject=Screenz - $me
}
alias screenz { dll Screenz\Dlls\nScreenShot.dll  Screenshot Screenz/Captures/ $+ $1 | ss }
alias ss { dialog -m screenz screenz }
dialog screenz {
  icon Screenz/ss.ico
  title Captures
  size -1 -1 115 150
  list 1, 5 10 105 120
  button &Capturer,2, 5 120 50 20
  button &Fermer,3, 60 120 50 20,ok
  text "",4, 125 10 50 20
  button &Supprimer,5, 125 40 55 20
  button &Voir,6, 125 70 55 20
  icon 7, 135 110 85 50, Screenz/ss.ico
}
on 1:dialog:screenz:*:*:{
  if $devent = init {
    dll Screenz/Dlls/mdx.dll SetMircVersion $version | dll Screenz/Dlls/mdx.dll MarkDialog $dname | dll Screenz/Dlls/mdx.dll SetBorderStyle 1 border | dll Screenz/Dlls/mdx.dll SetFont 4 13 700 verdana
    dll Screenz/Dlls/mdx.dll SetControlMDX $dname 1 listview nosortheader rowselect grid showsel single flatsb headerdrag labeltip report > Screenz/Dlls/VIEWS.MDX
    did -i $dname 1 1 headerdims 104
    did -i $dname 1 1 headertext $tab(Noms,Date)
    var %truc $findfile(Screenz/Captures/,*.jpg,0, naz-init $remove($nopath($1-),.jpg) )
  }
  if $devent = sclick {
    if $did = 5 { .remove Screenz\Captures\ $+ %truc $+ .jpg  | dialog -x $dname | ss }
    if $did = 6 { run Screenz\Captures\ $+ %truc $+ .jpg }
    if $did = 2 { dialog -x $dname | screenz $?="Nom ? Avec l'extension $crlf $+ Exemple : $active $+ .jpg" }
    if $did = 1  { 
      dialog -s $dname -1 -1 190 150
      set %truc $did(1).seltext | set %truc $+ $remove(%truc,0 +fs 1 0 0) | did -a $dname 4 %truc 
    }
  }
}
alias tab {
  if (!$1) return $chr(9) | var %t,%w = 1
  while ($($+($,%w),2)) { %t = $instok(%t,$($+($,%w),2),0,9) | inc %w }
  return %t
}
alias naz-init {
  did -i $dname 1 1  iconsize normal small
  did -i $dname 1 1 seticon normal 0, $+ Screenz/naz-ico.ico
  did -a $dname 1 0 1 $tab($1-)
}
On 1:load:{
  echo -a Add-ons bien chargé !
  echo -a Bon usage :)
  echo -a 
}

Conclusion :


J'ai pas pu upload le fichier zip ici, ça marchais mal.
Vous l'avez ici :
http://perso.wanadoo.fr/nazario/dl/Screenz.zip
S'inscrire maintenant

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.

Du même auteur (cs_Naza)