关于Map.Annotations.AddSymbol怎么改图标

我用Map.Annotations.AddSymbol(FindObj.CenterX,FindObj.CenterY);
给地图加上标签时，怎么改变它的图标。

用map.defaultSymbol.pickSymbol调用属性对话框时，
font: custom symbols
symbol:    ...
 
这在程序中怎么表示。

看一下这个（delphi）
var
  i: Integer;
  CurrentAnnotation: Annotation;
begin
  { Change the color of all the existing annotations
    (both symbol and text) to Maroon }
  For i := 1 to Map1.Annotations.Count do
      Begin
   { Loop through all of the annotations }
   CurrentAnnotation := Map1.Annotations.Item(i);
   If CurrentAnnotation.Type_ = miSymbolAnnotation Then
    CMapXText(CurrentAnnotation.Graphic).Style.SymbolFontColor := miColorMaroon
   Else
    CMapXText(CurrentAnnotation.Graphic).Style.TextFontColor := miColorMaroon;

  end;