テキストエディタＱＸ　5

《 過去スレ 》
テキストエディタＱＸ　4
http://hibari.2ch.net/software/kako/1128/11280/1128011742.html
テキストエディタＱＸ　3
http://pc7.2ch.net/test/read.cgi/software/1080860598/
テキストエディタＱＸ　2
http://pc5.2ch.net/test/read.cgi/software/1042148570/
テキストエディタＱＸ
http://pc3.2ch.net/software/kako/1003/10038/1003879529.html

《 公式サイト 》
http://www2k.biglobe.ne.jp/~araken/
http://0ban.com/araken/

関連
>>2-3

NewQXの最大のメリットは、一行の文字数が多くても途中で切れないで表示されること
まあデメリットは月に一度はlogファイルの掃除が必要なこと
試作版なのでトレース情報をlogしてるのは理解できるけどね

vzバインドのマクロから離れられなくて旧使ってるわ
新がサポートするなら使ってみるか

10のこないだのアプデからかな?ちょっと調子が悪い
漢字変換で動きが変になったり他の操作ができなくなったり

なんか行移動(ctrl+G)ができない（OKが押せなくなった）

>>191
同じく
とりあえずマクロでしのいでる

>>192
なるほどマクロか
ちょっと作ってみたけど、実行中のマクロ名取得が分からん
あと、ダイアログ実行も
Application.ExecIDString(MoveLineX)
だとやっぱりOKが押せない
sub main
dim line
if ActivePane is nothing then exit sub
line = InputBox("行番号:","行移動マクロ")
if line = "" then exit sub
if IsNumeric(line) then
line = int(line)
if line <= 0 then line = 1
' if ActiveDocument.maxLineLF >= line then
ActivePane.Selection.CurrentLine = line-1
' else
' ActiveFrameWindow.Status = "マクロ: 行番号が範囲外です。"
' end if
else
ActiveFrameWindow.Status = "マクロ: 行番号が間違っています。"
end if
end sub

マクロファイル名取得は分かった
Application.は省略して
Command(qxCOMMAND_MacroFile) '=-2

こういうチェックも入れた方がいいか
if ActivePane.Selection.Type > 0 then
ActiveFrameWindow.Status = "マクロ: 選択状態では移動しません。"
exit sub
end if

やっぱ入れないほうが便利かな

旧マクロだけど、こんなのでやってる

proc main
dim maxCrLn,n
if @hwnd=0 then exit proc
maxCrLn=@ScrLineToCrLine(@LastLine)
n=inputbox("行番号 (1〜"+str$(maxCrLn)+")","移動",@ScrLineToCrLine(@Line))
if n=INPUTBOX_CANCEL or n>maxCrLn then exit proc
@Line=@CrLineToScrLine(n)
end proc

折り返し行モードを忘れてた
この変換は新マクロでどうやるんだろう？
分からんので、みっともないけど、この部分は旧マクロを呼び出すことにした
（旧QXからQXWMAC32.DLLをコピーしてくること）

'*** moveline_sub.mac ***
proc main
dim line
line = val(@@Global$("Line"))
if @LastLine < line then line = @LastLine
@@Global$("Line") = str$(@ScrLineToCrLine(line))
end proc

貼れなかったので
https://www.axfc.net/u/4034798.zip

若干修正
https://www.axfc.net/u/4034801.zip

ｵｰｲ

NewQX α0.91 21/5/1

既出のバグも直ってるね