<< 重要なお知らせ カテゴリに記事のリストを追加し... >>
 

小窓の設置方法


投稿欄に次のような長いプログラムなどを表示するための小窓の設置方法です。


投稿欄などに小窓を設置する方法

基本的には、”OVERFLOW: auto;”であふれた行があるときにスクロールバーが表示されます。
したがって、小窓の表示行数を"HEIGHT:"で指定し、”OVERFLOW: auto;”でスクロールバーを表示しています。
ちなみに、”OVERFLOW-X: hidden;”は、IEだけの機能で、X方向(横方向)のはみ出した分を消しています。この効果により、横方向のスクロールバーが消えます。

HEIGHT: 10em;
この部分が小窓の高さになります。10文字分の高さです。

OVERFLOW: auto;
HEIGHTで指定した行数よりも多くなるとスクロールバーが表示されます。

※みなさん独自の小窓が完成したら、スタイルシート(CSS編集)に入れて利用されると簡単に利用できますよ。



<P STYLE="MARGIN: 5px 20px 20px 20px; OVERFLOW: auto;HEIGHT: 10em; OVERFLOW-X: hidden;BORDER : solid 1px #ccc;">

<- こちらに文章などを入れてください ->

</P>




;------------------------------------------------------------------
; HTML 特殊文字変換プログラム '<' '>' 限定バージョン
; HSP Script ver. 2.61
; by みんと♪
;http://minto7mimi.exblog.jp/
;------------------------------------------------------------------
#define MAXBUFF 65000
#define MesboxWidth 600
#define Mesboxheight 100
#define MesboxPosX 20
#define MesboxPosY 10
#define QuitPosX 100
#define QuitPosY 400
#define ConvPosX 30
#define ConvPosY 400
#define CLRPosX 200
#define CLRPosY 400

cls 1
title "HTML 特殊文字変換プログラム'<' '>' 限定バージョン"
objmode 1
alloc buf , MAXBUFF ; 変換前のバッファを確保
alloc conv, MAXBUFF ; 変換後のバッファを確保
buf ="" ; バッファをクリア
conv="" ; バッファをクリア
flg=1 ; 0=編集不可/1=編集可能


pos MesboxPosX , MesboxPosY ;変換前の文字入力ボックス
mes "変換元"
mesbox buf ,MesboxWidth,Mesboxheight,flg+4

mes ""

mes "変換後" ;変換語の文字出力ボックス
mesbox conv,MesboxWidth,Mesboxheight,flg+4

pos ConvPosX , ConvPosY ;変換ボタン
button "変換",*Conversion

pos QuitPosX , QuitPosY ;終了ボタン
button "終了",*Quit

pos CLRPosX , CLRPosY ;入力データの消去
button "消去",*CLRMESBOX
stop


;-----------------------------------------------
; 変換作業
;-----------------------------------------------
*Conversion
i =0 : size = 0 : conv = "" : c = ""
strlen size,buf
for i,0,size,1
strmid c,buf,i,1
if (c = "<"){ c = "&lt;"}
if (c = ">"){ c = "&gt;"}
if (c = "&"){ c = "&amp;"}
if (c = "\""){ c = "&quot;"}
conv += c
next
objprm 1,conv
stop

*CLRMESBOX
conv=""
buf = ""
objprm 0,buf
objprm 1,conv
stop

;-----------------------------------------------
; 終了
;-----------------------------------------------
*Quit
end



ぽっと



CopyRight(C) 2004 All rights reserved by potto37
[PR]
記事の下の方に広告が表示される場合があります。この広告はエキサイトの広告枠です。
by potto37 | 2004-07-17 09:29 | │├投稿欄
<< 重要なお知らせ カテゴリに記事のリストを追加し... >>
掲載の記事や画像などすべての複写・転載・公衆送信等はご遠慮ください。