"Transparent", "TransparentMode" and "tmAuto"

Does anyone know how to make something like the code below work in Delphi
2.0 because it [Delphi 2.0] doesn't support the "Transparent",
"TransparentMode" and "tmAuto" bits.

procedure TForm1.NewButton.Click(Sender: TObject);
var
  Test: TBitmap
begin
  Test := TBitmap.Create;
  Test := Test.Glyph;
  Test.Transparent := True;
  Test.TransparentMode := tmAuto;
  ImageList1.AddMasked(Test, Test.TransparentColor);
  Test.Free;
end;