Я просмотрел пару форумов, но не нашёл информации на счёт такого вопроса: Я работаю в Borland Delphi 7. Допустим, есть кнопка с изображением (за него отвечает параметр Glyph). Как можно его изменить в ходе работы самой программы? Дело в том, что Glyph имеет тип TBitmap, то есть класс, и непонятно, что ему присваивать.

type
  TFrm = class(TForm)
    B: TBitBtn;
    OD: TOpenDialog;
    procedure BClick(Sender: TObject);
..............

procedure TFrm.BClick(Sender: TObject);
 var BM: TBitmap;
begin
 if OD.Execute then begin
   try
    BM:= TBitmap.Create;
    BM.LoadFromFile(OD.FileName);
    B.Glyph := BM;
   finally
    BM.Free;
   end;
 end;
end;

Тоже самое, только без окна загрузки изображения, что мне и надо было:

type
 TFrm = class(TForm)
   B: TBitBtn;
   procedure BClick(Sender: TObject);
..............

procedure TFrm.BClick(Sender: TObject);
var BM: TBitmap;
begin
  try
   BM:= TBitmap.Create;
   BM.LoadFromFile(FileName);
   B.Glyph := BM;
  finally
   BM.Free;
  end;
end;

Спасибо gR4mm.

Нет, мой вариант не работает, так как надо загрузить в екзешник предварительно нужную картинку. Хотелось бы, чтобы программа меняла иконку кнопки без открытия диалога. Ладно, сам придумал. Создал кнопку с нужным изображением, сделал кнопку невидимой, и её параметр Glyph присвоил нужной кнопке в нужный момент. -) Туплю.

Используй TImageList

Я в Borland C++ Builder работаю, но в Delphi компоненты те же. В TImageList можно загружать множество изображений как при проектировании приложения (или отдельной формы), так и во время выполнения. Экпорт изображений из TImageList также довольно прост. Экспорт и импорт осуществляются посредством класса TBitmap. Одним словом, то, о чем ты спрашивал. Примеры использования есть в справочных системах как C++ Builderа, так и Delphi.

видели бы вы его программу...монстр)
вот может помочь
http://www.addzone.r...va5/Index5.html
http://read.excode.ru/arttopic162.html

О, спасибо OpenMind. Спасибо Arhar.