>狛江 さん はじめまして。
>
>>マクロで、
>>その行がマークされているかどうかを取得するってできますか。
>
>実際に試したわけではありませんが、可能なようです。↓をご覧下さい。
>
>http://0ban.com/araken/qxhelp/m_docindex.htm#qLineAttr
ありがとうございます。
大変参考になりました。
マーク行数を数えるマクロを作ってみました。
proc countMark 'マークを数える
dim i,topLine,lineAttr
@@redraw = 0
topLine = @TopLine
lineAttr = @LineAttr(1,1)
if lineAttr = 8 or lineAttr = 40 or lineAttr = 136 or lineAttr = 168 then
i++
end if
@MoveFileTop
do
@MarkSearchDown
if @@SearchFound <> 0 then
i++
end if
loop while @@SearchFound <> 0
@TopLine = topLine
print str$(i) + "行マークされています"
end proc |