掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
英語での文字化け対策 (ID:42634)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ちょっとコードが変でしたね。 if (Components[i] is TCustomButton) then begin with (Components[i] as TCustomButton) do begin Font.Name := DEFFONT_NAME; Font.CharSet := DEFFONT_CHARSET; end; Continue; end; if (Components[i] is TCustomEdit) then begin with (Components[i] as TCustomEdit) do begin Font.Name := DEFFONT_NAME; Font.CharSet := DEFFONT_CHARSET; end; Continue; end; ... こんな感じです。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.