Var Figura : TBitmap;
begin
Figura := TBitmap.Create;
Figura.LoadFromFile('C:FIGURA.BMP');
SetMenuItemBitmaps(ItemMenu.Parent.Handle, Legal1.Command, MF_BYCOMMAND,
Figura.Handle, 0);
end;
quarta-feira, 4 de novembro de 2009
Assinar:
Postar comentários (Atom)
Nenhum comentário:
Postar um comentário