Einzelnen Beitrag anzeigen

Hartfrid Krause

Registriert seit: 20. Feb 2007
90 Beiträge
 
Delphi XE6 Professional
 
#8

AW: Bundesländer Deutschland einzeln unterschiedlich färben

  Alt 11. Okt 2015, 15:43
mit einer brd-länderkarte als shp-file könnte ich so weiterarbeiten, aber woher nehmen???

uses Series, TeeMapSeries, TeeWorldSeries, TeeSHP;
var series1: TMapSeries;

procedure TForm1.FormCreate(Sender: TObject);
var SHPFile : string;
begin
Chart1.View3D := false;
Chart1.Legend.Visible := false;
series1 := TMapSeries.Create(self);
Chart1.AddSeries(series1);
end;

procedure TForm1.Button1Click(Sender: TObject);
var SHPFile : string;
begin
series1.Clear;
SHPFile := '???.shp';
try
LoadMap(Series1, SHPFile);
finally
end;
Series1.ColorEachPoint := true;
end;
  Mit Zitat antworten Zitat