くだすれDelphi(超初心者用)その47
at TECH
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
400:デフォルトの名無しさん 08/08/19 20:27:01 始めたばかりで頑張っていた頃を思い出させるいいレス。 頑張れ！ 401:デフォルトの名無しさん 08/08/20 01:07:43 WideStringでのインデックスをAnsiStringでのインデックスに直すにはどうすればいいんでしょうか？ 例えば 関数('あああ',3) = 5 みたいな感じです 402:デフォルトの名無しさん 08/08/20 01:25:08 >>401 こんな感じかな function WideIndexToAnsiIndex(const ws: widestring; index: Integer): Integer; begin if (Index < 1) or (Index > Length(ws)) then Result := 0 else Result := Length(AnsiString(Copy(ws, 1, index - 1))) + 1 end; 403:デフォルトの名無しさん 08/08/20 01:36:25 >>402 うお、こんな簡単に出来ちゃうんですね ありがとうございました 404:デフォルトの名無しさん 08/08/20 03:34:47 >>401 なぜユニコードだったりそれをMCBSに変換しなければならないかにもよるけど、 ByteToCharIndexやCharToByteIndexでもっと幸せになれるかもしれない。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4254日前に更新/177 KB
担当:undef