動的に貼り付けたスピードボタンのイメージを指定するには。 (ID：33109)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

環境はWindows  XP  Delphi６personalです。
何度もすみません。今回は
ボタンを並べるパネルを動的に置いて、その上に
動的にスピードボタンを置き
このスピードボタンのイメージをプログラムに埋め込みたいのですが
うまくいきません。
静的（事前に）に置いたSpeedSpeedButtonにイメージを
SpeedButton10.Glyphで埋め込むようにできません。
解決方法を教えて頂けませんか。

SpeedButton10.Glyph.LoadFromFile()で表示すると
コンパイルしてもイメージファイルを添付しなければならない
ので困っています。
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
        SpeedButtonPanel:=TPanel.Create(PageControl1);//ボタンパネル
        SpeedButtonPanel.Parent:=PageControl1;
        SpeedButtonPanel.Align:=albottom;
        SpeedButtonPanel.Height:=24;

SpeedButton10:=TSpeedSpeedButton.Create(SpeedButtonPanel);
        SpeedButton10.Parent:= SpeedButtonPanel;
	//イメージ指定
        SpeedButton10.Glyph.LoadFromFile('SpeedButton1Image.bmp');
	SpeedButton10.Top:=0;
	SpeedButton10.Width:= 23;
	SpeedButton10.Height:=22;
	SpeedButton10.Left:=SpeedButtonPanel.Left;

SpeedButton20:=TSpeedSpeedButton.Create(SpeedButtonPanel);
        SpeedButton20.Parent:= SpeedButtonPanel;
	//イメージ指定
        SpeedButton20.Glyph.LoadFromFile('SpeedButton2Image.BMP');
	SpeedButton20.Top:=0;
	SpeedButton20.Width:= 23;
	SpeedButton20.Height:=22;
        SpeedButton20.Left:=SpeedButton10.Left+23+1;
end;

←解決時は質問者本人がここをチェックしてください。

戻る