| |
swf さん今日は、Iranoan です。
> searchdown "\([0-9]+\)/\([0-9]+\)/\([0-9]+\)", regular, inselect;
> としましたが、正規表現でマッチした部分を変数にセットする方法が分
> かりませんでした。
お使いのヴァージョンが解りませんが、最近のものなら HmJre.dll の DLL
関数を使えばよいと思います。
具体的には、次の要領です。
//--------------------------------------------------------------------
searchdown "\([0-9]+\)/\([0-9]+\)/\([0-9]+\)", regular;
$s = gettext( foundtopx, foundendy, foundendx, foundendy );
loaddll "HmJre.dll";
#tmp = dllfunc( "FindRegular", "\([0-9]+\)/\([0-9]+\)/\([0-9]+\)", $s );
call GetValue $s, 1;
#y = ##return;
call GetValue $s, 2;
#m = ##return;
call GetValue $s, 3;
#d = ##return;
endmacro;
GetValue:
return val( midstr( $$1, dllfunc( "GetLastMatchTagPosition", ##2 ),
dllfunc( "GetLastMatchTagLength", ##2 ) ) );
|
|