[ 目次 | 検索 | 発言 | 返信 | 次へ | 前へ | 上へ ]
From: 柏木 @東京都
日付: 01/01/10
時刻: 19:33:27
リモート名: 210.155.64.130
こんにちは、西村さん
> ありがとうございます。 LTINF$関数で、ページ番号を得るにはどうしたらよろしいでしょうか?
LTINF$ではうまくいきませんね。スミマセン。代わりにENDPを使ってみました。
ENDPはオートの中で最後にGやPしたページ数を格納しますので、最初にG;*;をしています。
G;*;で必ず「最後に閉じたページ」が呼び出されることが条件ですが、いかがでしょうか?
<SAMPLE>
G;*;
LET V11=DEV$;
LET V12=CABINET$;
LET V13=BIND$;
LET X11=ENDP(1);
$DISP: DISP OPEN;
DISP ,[20,10],"V11=",V11;
DISP ,[20,11],"V12=",V12;
DISP ,[20,12],"V13=",V13;
DISP ,[20,13],"X11=",X11;
SLEEP;
$END:
CLOSE;
STOP;
柏木 @東京都