在 delphi 中设置样式

百花草

在 delphi 中设置样式
--------------------------------------------------------------------------------
var
   SetStyle:variant;
begin
   SetStyle:= MapStyleSetup.defaultstyle ;
   SetStyle.SymbolType:= miSymbolTypeTrueTypeFont;
   SetStyle.SymbolFont.Name:=CharacterName;
   SetStyle.SymbolCharacter:=index;
   SetStyle.SymbolFont.size:=36;
   SetStyle.SymbolFontOpaque := False;
end;