Address book ;)
Contenu du snippet
dialog adke {
title "Addres Book Error"
size -1 -1 81 41
option dbu
box "Error:", 1, 1 1 78 27
text "You have not selected an address to delete!!", 2, 5 9 72 15
button "OK", 3, 2 29 77 11, ok
}
dialog adk {
title "Address Book"
size -1 -1 94 170
option dbu
icon $scriptdir\Icones\addres.ico
list 1, 0 0 93 130, size vsbar hsbar
edit "", 2, 25 130 60 10, autohs
text "Address:" 6, 1 130 20 7
button "Add", 3, 10 140 30 10
button "Remove", 4, 55 140 30 10
button "close", 5, 32 150 30 10, ok
}
on *:dialog:adk:init:0:{ /load.adk | did -z adk 1 }
on *:dialog:adk:dclick:1:{ /clipboard | /clipboard -a $did(1).seltext }
on *:dialog:adk:sclick:3:{
write -a address.txt $did(2).text
load.adk
}
on *:dialog:adk:sclick:4:{
if ($did(1).sel == $null) { dialog -m adke adke }
else { write -dl $did(1).sel address.txt | did -d $dname 1 $did(1).sel }
}
alias load.adk {
did -r adk 1
var %i 1
while (%i <= $lines(address.txt)) {
did -a adk 1 $read(address.txt,%i)
inc %i
}
}
menu channel,status,menubar {
Address Book:/dialog -md adk adk
}
title "Addres Book Error"
size -1 -1 81 41
option dbu
box "Error:", 1, 1 1 78 27
text "You have not selected an address to delete!!", 2, 5 9 72 15
button "OK", 3, 2 29 77 11, ok
}
dialog adk {
title "Address Book"
size -1 -1 94 170
option dbu
icon $scriptdir\Icones\addres.ico
list 1, 0 0 93 130, size vsbar hsbar
edit "", 2, 25 130 60 10, autohs
text "Address:" 6, 1 130 20 7
button "Add", 3, 10 140 30 10
button "Remove", 4, 55 140 30 10
button "close", 5, 32 150 30 10, ok
}
on *:dialog:adk:init:0:{ /load.adk | did -z adk 1 }
on *:dialog:adk:dclick:1:{ /clipboard | /clipboard -a $did(1).seltext }
on *:dialog:adk:sclick:3:{
write -a address.txt $did(2).text
load.adk
}
on *:dialog:adk:sclick:4:{
if ($did(1).sel == $null) { dialog -m adke adke }
else { write -dl $did(1).sel address.txt | did -d $dname 1 $did(1).sel }
}
alias load.adk {
did -r adk 1
var %i 1
while (%i <= $lines(address.txt)) {
did -a adk 1 $read(address.txt,%i)
inc %i
}
}
menu channel,status,menubar {
Address Book:/dialog -md adk adk
}
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.