mIRC Home    About    Download    Register    News    Help

Print Thread
#187467 05/10/07 10:06 PM
Joined: Dec 2002
Posts: 79
F
Fantas Offline OP
Babel fish
OP Offline
Babel fish
F
Joined: Dec 2002
Posts: 79
This works ok except if a message is too long you can't see it in box. I did put a double click in it echo but that kinda beats the purpose, any help?
on ^*:notice:*:*: {
if ($nick == memoserv) { haltdef | did -a Memoserv 2 $1- }
}
dialog Memoserv {
title ""
size -1 -1 227 187
option dbu
box "", 1, 1 1 187 137
list 2, 3 6 180 130, size vsbar disable
box "", 3, 185 1 41 137
button "list", 4, 187 6 37 12, disable
button "read", 5, 187 19 37 12, disable
button "Delete", 16, 187 31 37 12, disable
button "Purge", 6, 187 43 37 12, disable
button "Send", 8, 187 55 37 12, disable
button "Help", 7, 187 67 37 12, disable
button "Close", 17, 187 79 37 12, ok
button "Undelete", 9, 187 92 37 12, disable
button "Refresh", 10, 187 104 37 12, disable
icon 19, 1 117 186 88, "icon.bmp"
}
on *:dialog:Memoserv:init:*: {
{ dialog -t $dname $me Memoserv | did -e $dname 2,4,5,6,7,8,9,10,16 }
}
on *:dialog:Memoserv:sclick:2: {
if ($did($did).sel == $null) halt
did -c Memoserv $did($did).sel
}
on *:dialog:Memoserv:sclick:4: { memoserv list }
on *:dialog:Memoserv:sclick:5: { memoserv read $did(2).seltext }
on *:dialog:Memoserv:sclick:16: { memoserv del $did(2).seltext }
on *:dialog:Memoserv:sclick:6: { memoserv purge }
on *:dialog:Memoserv:sclick:7: { memoserv help }
on *:dialog:Memoserv:sclick:8: { memoserv send $$?="nickname:" $$?="message:" }
on *:dialog:Memoserv:sclick:9: { memoserv undelete $$?="message number:" }
on *:dialog:Memoserv:sclick:10: { did -r Memoserv 2 }
on *:dialog:memoserv:dclick:2:{
echo -a $did(2).seltext
}

Menu Channel,status {
Memoserv:dialog -ma Memoserv Memoserv
}

Last edited by Fantas; 05/10/07 10:07 PM.
Joined: Jan 2007
Posts: 1,156
D
Hoopy frood
Offline
Hoopy frood
D
Joined: Jan 2007
Posts: 1,156
Wordwrap in a list?

As far as I know a list is line by line. Closest you can get is having a horizontal scrollbar and tooltip.

In the future please try to be more specific. I had to hunt through your code to figure out what you needed as "text wrap in dialog" could mean many different things.

An edit or text box will wrap text.

Joined: Aug 2005
Posts: 1,052
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Aug 2005
Posts: 1,052
Code:
on ^*:notice:*:*: {
  if ($nick == memoserv) { 
    haltdef 
    if ($len($1-) > 75) { did -a Memoserv 2 $gettok($1-,1-11,32) | did -a memoserv 2 $gettok($1-,12-,32)  }
    else { did -a memoserv 2 $1- }
  }
}


Considering that on average theres about 11 incoming tokens, till it reaches the border I did a lenght check of 75 which would be about the appropiate lenght till border reach. And if the lenght was larger then 75 then I picked up the first 11 tokens added them to your list, then picked up the 12+ tokens and put it in the next box, now depending on HOW long your scripts are im sure you can figure out how to increase the wrap :P

Of course this is not a pure select wrap meaning that if you do in theory select a string in your listbox remember that you are select only one text line per text unless you would make a combo box, "WINK" "WINK" and use MultiSelect style. Then in theory you could multi select the 2 strings then perform function as usual :P

I hope this helps your quest I know it's a cheap shot at what you want but atleast its something till someone finds you a better alternative.


Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }
Joined: Dec 2002
Posts: 79
F
Fantas Offline OP
Babel fish
OP Offline
Babel fish
F
Joined: Dec 2002
Posts: 79
thanks that works better


Link Copied to Clipboard