Text-area

提供:GizmoLabs - だいたい CAD LISP なサイト
2011年7月6日 (水) 15:35時点におけるGizmon (トーク | 投稿記録)による版
構文
(gs:text-area sym-id sym-action int-width int-height)


機能
文字編集用のウィジェット


引数
  • symid :テキストエリア名
  • sym-action :イベントハンドラ名
  • int-width :テキストエリアの幅
  • int-height : テキストエリアの高さ


戻り値
なし


<pre class="brush:autolisp;"> (gs:text-area 'TheText 'textarea-event 10 8) (define (textarea-event id code dot mark) ...)

gs:text-area は、イベントに次のパラメータを伝える。

  • id : ウィジェット名
  • code : ASCIIのキーコード。 文字キーのみ
  • dot - キャレットの位置
  • mark - 選択キャレット位置