alias image {
  set %file $sfile(%file, Image Find)
  set %width $pic($qt(%file)).width
  set %height $pic($qt(%file)).height
  dialog -m image image
}
dialog image {
  title $nopath(%file)
  size -1 -1 %width %height

  icon 1, -1 -1 %width %height, %file

}
on *:DIALOG:image:*:*:{
  if ($devent == sclick) {
    dialog -t $dname Hewo
  }
}
alias F4 { haxx }