//coloque as imagens em um arquivo Res e compile a biblioteca com a diretiva
{$R icones.res}
//para chamar as imagens
var
Hicone: Thandle;
begin
Hicone:= LoadLibrary(‘icones.dll’);
Componente.Glyph.Handle := LoadBitmap(Hicone,’B_CANCELAR’);
Compartilhe :Coloca uma máscara numérica em uma String com números function MaskString(Valor: String) : String; begin Result := FormatMaskText(‘!aaaaaaaaaaa;0; ‘,(FormatFloat(‘#,##0.00’,StrToFloat(valor))));…