4D Writeの中のスタイルシートの参照の検索
| 日付 | 2001/03/30 |
|---|---|
| ID | 01-553 |
| バージョン | v6.5.x and v6.7.x |
| プラットフォーム | Windows and Mac |
この記事は、最新ではないバージョンに関連した方法について解説しています。
最新のバージョンでは推奨されていないか、または他の方法で簡単に実現できる可能性があります。
4D Writeを使用する場合、ユーザがスタイルシートを修正することができる//削除することを望んでもよい。その結果はスタイルシートリファレンスナンバーが時間とともに変わるかもしれないということです。4D Writeのランゲージを使用すると、任意の与えられたスタイルシートの参照を検索することができます。知る必要のあるすべてはその名前です。次のコードはエリア「Field3」で、「MyStyleSheet」と命名されるスタイルシートのリファレンスナンバーを表示します。
ARRAY STRING(31;$StyleSheetName;WR Count (Field3;wr nb stylesheets ))
$StyShCount:=WR Count (Field3;wr nb stylesheets )
For ($i;1;$StyShCount)
WR GET STYLESHEET INFO (Field3;$i;$Name;$applyTo;$protected;$shortcut)
$StyleSheetName{$i}:=$Name
End for
$StyleSheetRef:=Find in array($StyleSheetName;"MyStyleSheet")
ALERT(String($StyleSheetRef))