| 4D v13WR UPDATE STYLESHEET | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D Write v13
 WR UPDATE STYLESHEET 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| WR UPDATE STYLESHEET ( area ; stylesheetNumber ) | ||||||||
| 引数 | 型 | 説明 | ||||||
| area | 倍長整数 |   | 4D Writeエリア | |||||
| stylesheetNumber | 倍長整数 |   | スタイルシート番号 | |||||
WR UPDATE STYLESHEETは、areaで参照される4D Writeエリア内のstylesheetNumberで参照されたスタイルシートを使用して、すべてのテキストの表示フォーマットを更新します。このコマンドを実行すると、参照されたスタイルシート上で書式設定されているすべてのテキストはこのスタイルシートで現在設定されている内容に従って新しくフォーマットされます。
"LayoutPar"スタイルシート内のタブストップを置き換え、スタイルシートが適用されているテキストエリアを更新したいものとします:
  `スタイルシート番号を探す
 $StyleSheetNb:=WR Count(Area;wr nb stylesheets)
 For($i;1;$StyleSheetNb)
    WR GET STYLESHEET INFO(Area;$i;$Name;$ApplyTo;$Prot;$Shortcut)
    If($Name="LayoutPar")
       SheetNumber:=$i
    End if
 End for
  `スタイルシート中のタブストップ数を取得
 $NbTab:=WR Get stylesheet text prop(Area;SheetNumber;wr tab;Apply)
  `すべてのタブストップを削除
 For($i;1;$NbTab)
    WR DELETE STYLESHEET TAB(Area;SheetNumber;1)
 End for
  `新しいタブを挿入
 WR ADD STYLESHEET TAB(Area;SheetNumber;10;wr left tab;Char(126))
 ...
  `スタイルシートが適用されている段落を更新
 WR UPDATE STYLESHEET(Area;SheetNumber)
	プロダクト: 4D
	テーマ: WRスタイルシート
	番号: 
        89454
        
        
        
	
	初出: 4D Write 6.5