カテゴリー
これはボックスのタイトルです。
- 23/01/09 人名外字一覧表(検索ボックス付き)
- 22/11/10 エディタ関連
- 22/10/12 ポップアップ
- 22/04/10 CAMEO Candyのギターソロ
- 22/04/10 カレンダーをクリックして日付を入れて、その入った文字をドラッグして好きな場所に動かす
- 22/03/22 Windows11のモヤモヤ解消、、、、「右クリック」のメニュー
- 22/03/22 Selectboxで選んだ項目によって特定の要素の背景色を変える
- 22/02/09 ブラウザの位置情報をhtmlに表示する方法
- 22/01/26 クリッカブルマップ
- 22/01/22 CompornentOne

人名外字一覧表(検索ボックス付き)
各ヘッダをクリックするとその項目が並び替わります。Searchボックスでよみのひらがなの「かな検索」ができます。TablePress版はこちら ※JIS2004 の文字一覧 (Vista以降標準) […]
エディタ関連
画像サイズ変更の不具合を解消する
1 2 3 4 5 6 7 8 9 10 11 12 13 |
Imports C1.Win.C1Editor Public
Class
Form1 Private
Sub Form1_Load(sender As
Object,
e
As
EventArgs)
Handles MyBase.Load UseIEDefault(C1Editor1) End
Sub Private
Shared Sub UseIEDefault(ByVal editor As
C1Editor) Const
meta1 As
String
=
"<meta http-equiv=""X-UA-Compatible"" content=""IE=8"" />" Const
meta2 As
String
=
"<meta http-equiv=""X-UA-Compatible"" content="""" />" Dim xml As
String
=
editor.Xml.Replace(meta1,
meta2) editor.Xml
=
xml End
Sub End
Class |

CAMEO Candyのギターソロ
80年代によく聞いたCAMEOのCandyっていう歌。 この歌のサックスが吹けたらええなあ、、、と思って20代の時にアルトサックスを買ったんですが、結局挫折。 ギターのことはまったく考えてもいなかった。メロディは知ってい […]

CrystalReportsで数字の組み合わせで日付型を作って曜日を表示、、、の苦肉の策
年月日バラバラのデータがあって、その曜日が知りたいという要望があったので、そのデータベースはまったく触らずに DateSerial({xxxx}),{MM},{DD}) のようにDateSerialで日付型にして、その式 […]
CrystalReportsで日付(月日)を縦書きにするために、苦肉の策
年月でグループ化したデータを縦書きにするために、、、、出力されるデータがyyyy/mmなので強制的に日本語和暦漢字に置換する方が早い
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
Local StringVar target
:=
totext(GroupName
({フィールド},
"monthly")); target
:=
Replace(target,"2019","令和元年"); target
:=
Replace(target,"2020","令和二年"); target
:=
Replace(target,"2021","令和三年"); target
:=
Replace(target,"2022","令和四年"); target
:=
Replace(target,"2023","令和五年"); target
:=
Replace(target,"2024","令和六年"); target
:=
Replace(target,"2025","令和七年"); target
:=
Replace(target,"2026","令和八年"); target
:=
Replace(target,"2027","令和九年"); target
:=
Replace(target,"2028","令和十年"); target
:=
Replace(target,"/12"," 十二月"); target
:=
Replace(target,"/11"," 十一月"); target
:=
Replace(target,"/10"," 十月"); target
:=
Replace(target,"/09"," 九月"); target
:=
Replace(target,"/08"," 八月"); target
:=
Replace(target,"/07"," 七月"); target
:=
Replace(target,"/06"," 六月"); target
:=
Replace(target,"/05"," 五月"); target
:=
Replace(target,"/04"," 四月"); target
:=
Replace(target,"/03"," 三月"); target
:=
Replace(target,"/02"," 二月"); target
:=
Replace(target,"/01"," 一月"); |
月が数字だけの場合 […]
CrystalReportsの不可解なRecordNumber—cstr
私のパソコン(いわゆる日本語Windows10)では cstr(RecordNumber)=9.00 となる ところが、違うパソコンでは cstr(RecordNumber)=9.000 となる(0が1コ多い(泣) 「そ […]
CrystalReports9でのカナ→カナが、、、、
関数がない!トホホ、仕方がないので、、、、チカラワザ
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 |
Local StringVar target
:=
{Old2.BuddhistNameKana}; target
:=
Replace(target,
"ァ","ぁ"); target
:=
Replace(target,
"ィ","ぃ"); target
:=
Replace(target,
"ゥ","ぅ"); target
:=
Replace(target,
"ェ","ぇ"); target
:=
Replace(target,
"ォ","ぉ"); target
:=
Replace(target,
"ガ","が"); target
:=
Replace(target,
"ギ","ぎ"); target
:=
Replace(target,
"グ","ぐ"); target
:=
Replace(target,
"ゲ","げ"); target
:=
Replace(target,
"ゴ","ご"); target
:=
Replace(target,
"ザ","ざ"); target
:=
Replace(target,
"ジ","じ"); target
:=
Replace(target,
"ズ","ず"); target
:=
Replace(target,
"ゼ","ぜ"); target
:=
Replace(target,
"ゾ","ぞ"); target
:=
Replace(target,
"ダ","だ"); target
:=
Replace(target,
"ヂ","ぢ"); target
:=
Replace(target,
"ヅ","づ"); target
:=
Replace(target,
"デ","で"); target
:=
Replace(target,
"ド","ど"); target
:=
Replace(target,
"バ","ば"); target
:=
Replace(target,
"ビ","び"); target
:=
Replace(target,
"ブ","ぶ"); target
:=
Replace(target,
"ベ","べ"); target
:=
Replace(target,
"ボ","ぼ"); target
:=
Replace(target,
"パ","ぱ"); target
:=
Replace(target,
"ピ","ぴ"); target
:=
Replace(target,
"プ","ぷ"); target
:=
Replace(target,
"ペ","ぺ"); target
:=
Replace(target,
"ポ","ぽ"); target
:=
Replace(target,
"ア","あ"); target
:=
Replace(target,
"イ","い"); target
:=
Replace(target,
"ウ","う"); target
:=
Replace(target,
"エ","え"); target
:=
Replace(target,
"オ","お"); target
:=
Replace(target,
"カ","か"); target
:=
Replace(target,
"キ","き"); target
:=
Replace(target,
"ク","く"); target
:=
Replace(target,
"ケ","け"); target
:=
Replace(target,
"コ","こ"); target
:=
Replace(target,
"サ","さ"); target
:=
Replace(target,
"シ","し"); target
:=
Replace(target,
"ス","す"); target
:=
Replace(target,
"セ","せ"); target
:=
Replace(target,
"ソ","そ"); target
:=
Replace(target,
"タ","た"); target
:=
Replace(target,
"タ","ち"); target
:=
Replace(target,
"ッ","っ"); target
:=
Replace(target,
"ツ","つ"); target
:=
Replace(target,
"テ","て"); target
:=
Replace(target,
"ト","と"); target
:=
Replace(target,
"ナ","な"); target
:=
Replace(target,
"ニ","に"); target
:=
Replace(target,
"ヌ","ぬ"); target
:=
Replace(target,
"ネ","ね"); target
:=
Replace(target,
"ノ","の"); target
:=
Replace(target,
"ハ","は"); target
:=
Replace(target,
"ヒ","ひ"); target
:=
Replace(target,
"フ","ふ"); target
:=
Replace(target,
"ヘ","へ"); target
:=
Replace(target,
"ホ","ほ"); target
:=
Replace(target,
"マ","ま"); target
:=
Replace(target,
"ミ","み"); target
:=
Replace(target,
"ム","む"); target
:=
Replace(target,
"メ","め"); target
:=
Replace(target,
"モ","も"); target
:=
Replace(target,
"ャ","ゃ"); target
:=
Replace(target,
"ヤ","や"); target
:=
Replace(target,
"ュ","ゅ"); target
:=
Replace(target,
"ユ","ゆ"); target
:=
Replace(target,
"ョ","ょ"); target
:=
Replace(target,
"ヨ","よ"); target
:=
Replace(target,
"ラ","ら"); target
:=
Replace(target,
"リ","り"); target
:=
Replace(target,
"ル","る"); target
:=
Replace(target,
"レ","れ"); target
:=
Replace(target,
"ロ","ろ"); target
:=
Replace(target,
"ヮ","ゎ"); target
:=
Replace(target,
"ワ","わ"); target
:=
Replace(target,
"ヲ","を"); target
:=
Replace(target,
"ン","ん"); target
:=
Replace(target,
"ァ","ぁ"); target
:=
Replace(target,
"ィ","ぃ"); target
:=
Replace(target,
"ゥ","ぅ"); target
:=
Replace(target,
"ェ","ぇ"); target
:=
Replace(target,
"ォ","ぉ"); target
:=
Replace(target,
"ガ","が"); target
:=
Replace(target,
"ギ","ぎ"); target
:=
Replace(target,
"グ","ぐ"); target
:=
Replace(target,
"ゲ","げ"); target
:=
Replace(target,
"ゴ","ご"); target
:=
Replace(target,
"ザ","ざ"); target
:=
Replace(target,
"ジ","じ"); target
:=
Replace(target,
"ズ","ず"); target
:=
Replace(target,
"ゼ","ぜ"); target
:=
Replace(target,
"ゾ","ぞ"); target
:=
Replace(target,
"ダ","だ"); target
:=
Replace(target,
"ヂ","ぢ"); target
:=
Replace(target,
"ヅ","づ"); target
:=
Replace(target,
"デ","で"); target
:=
Replace(target,
"ド","ど"); target
:=
Replace(target,
"バ","ば"); target
:=
Replace(target,
"ビ","び"); target
:=
Replace(target,
"ブ","ぶ"); target
:=
Replace(target,
"ベ","べ"); target
:=
Replace(target,
"ボ","ぼ"); target
:=
Replace(target,
"パ","ぱ"); target
:=
Replace(target,
"ピ","ぴ"); target
:=
Replace(target,
"プ","ぷ"); target
:=
Replace(target,
"ペ","ぺ"); target
:=
Replace(target,
"ポ","ぽ"); target
:=
Replace(target,
"ア","あ"); target
:=
Replace(target,
"イ","い"); target
:=
Replace(target,
"ウ","う"); target
:=
Replace(target,
"エ","え"); target
:=
Replace(target,
"オ","お"); target
:=
Replace(target,
"カ","か"); target
:=
Replace(target,
"キ","き"); target
:=
Replace(target,
"ク","く"); target
:=
Replace(target,
"ケ","け"); target
:=
Replace(target,
"コ","こ"); target
:=
Replace(target,
"サ","さ"); target
:=
Replace(target,
"シ","し"); target
:=
Replace(target,
"ス","す"); target
:=
Replace(target,
"セ","せ"); target
:=
Replace(target,
"ソ","そ"); target
:=
Replace(target,
"タ","た"); target
:=
Replace(target,
"チ","ち"); target
:=
Replace(target,
"ッ","っ"); target
:=
Replace(target,
"ツ","つ"); target
:=
Replace(target,
"テ","て"); target
:=
Replace(target,
"ト","と"); target
:=
Replace(target,
"ナ","な"); target
:=
Replace(target,
"ニ","に"); target
:=
Replace(target,
"ヌ","ぬ"); target
:=
Replace(target,
"ネ","ね"); target
:=
Replace(target,
"ノ","の"); target
:=
Replace(target,
"ハ","は"); target
:=
Replace(target,
"ヒ","ひ"); target
:=
Replace(target,
"フ","ふ"); target
:=
Replace(target,
"ヘ","へ"); target
:=
Replace(target,
"ホ","ほ"); target
:=
Replace(target,
"マ","ま"); target
:=
Replace(target,
"ミ","み"); target
:=
Replace(target,
"ム","む"); target
:=
Replace(target,
"メ","め"); target
:=
Replace(target,
"モ","も"); target
:=
Replace(target,
"ャ","ゃ"); target
:=
Replace(target,
"ヤ","や"); target
:=
Replace(target,
"ュ","ゅ"); target
:=
Replace(target,
"ユ","ゆ"); target
:=
Replace(target,
"ョ","ょ"); target
:=
Replace(target,
"ヨ","よ"); target
:=
Replace(target,
"ラ","ら"); target
:=
Replace(target,
"リ","り"); target
:=
Replace(target,
"ル","る"); target
:=
Replace(target,
"レ","れ"); target
:=
Replace(target,
"ロ","ろ"); target
:=
Replace(target,
"ヮ","ゎ"); target
:=
Replace(target,
"ワ","わ"); target
:=
Replace(target,
"ヲ","を"); target
:=
Replace(target,
"ン","ん"); |
Crystalreports 指定行数で改ページ
ページヘッダに「式フィールド」を追加して次の式を記入 WhilePrintingRecords; numberVar line := 0; 次に詳細(行数を指定するセクション)に式フィールドを追加して次の式を記入 Whi […]