|
アカウント直下のフォルダ作成にやっと対応したのですが、次はメールの宛先
部分でのオートコンプリートをサポートしようと思います。
それに先だって、まずはマクロによるオートコンプリートもどきのサポートを
行いました。
以下、アドレス帳から検索してオートコンプリートするサンプルマクロです。
LDAPサーバーから検索する場合は、
#n = dllfunc("DoBookGrep", $s, #toponly);
の所を
#n = dllfunc("DoLdapGrep", $s, #toponly
, "ldap-server", "名前+メールアドレス", 5 );
のように修正すればいいです。詳しくはヘルプのDoLdapGrep関数を参照くださ
い。
-------アドレス帳から検索する例----------------
loaddll "tkinfo.dll";
#x = x; #y = y;
while(1) {
left;
if( !result ) {
break;
}
if( column == 0 ) {
right;
break;
}
if( code <= ' ' || code == ',' ) {
right;
break;
}
}
#xtop = x; #ytop = y;
$s = gettext( x, y, #x, #y );
moveto #x, #y;
if( strlen( $s ) <= 4 ) {
#toponly = 1;
}
message $s;
#n = dllfunc("DoBookGrep", $s, #toponly);
if( #n == 0 ) {
endmacro;
}
#i = 0;
while(1) {
$menu[#i] = dllfuncstr("GetGrepResult", #i);
if( $menu[#i] == "" ) {
break;
}
$menu[#i] = dllfuncstr("GetBookItemPart", $menu[#i], -1);
#i = #i + 1;
}
menuarray $menu, #i;
#result = result;
if( #result == 0 ) {
endmacro;
}
beginsel;
moveto #xtop, #ytop;
delete;
insert $menu[#result - 1];
|
|