Delphi/ユーザー定義のリソースを利用する のバックアップ(No.1)
- バックアップ一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Delphi/ユーザー定義のリソースを利用する へ行く。
- 1 (2005-10-10 17:28:10 (月))
ユーザー定義のリソースを使用する †
リソースにユーザー定義のデータを追加する?で追加したリソースをプログラムから使用するには次のようにする。
リソースからRTF文章を読み取り、RichEditコンポーネントに表示してみる。
- {$R ファイル名} をソースに追加し、リソースを実行ファイルにリンクする。
- TResourceStreamのインスタンスを作成する。 第2引数にはリソース名を、第3引数にはリソースタイプ名を指定する。
- RichEdit1.Lines.LoadFromStream で RTF文章が表示される
サンプルコード
{$R sample.res} procedure DispRichText(ResourceName: String); var Stream: TResourceStream; begin Stream := TResourceStream.Create(hInstance, ResourceName, 'RTF'); try RichEdit1.Lines.LoadFromStream(Stream); finally Stream.Free; end; end;