pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

LazMapViewer: Use threads in colored_tracks sample project.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8109 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-09-30 22:22:25 +00:00
parent 2388ef8a3d
commit 362b046840
2 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazmapviewer/examples/colored_tracks/main.lfm
View File

@ -19,6 +19,8 @@ object MainForm: TMainForm
DrawingEngine = MapView.BuiltInDE DrawingEngine = MapView.BuiltInDE
Font.Color = clBlack Font.Color = clBlack
MapProvider = 'OpenStreetMap Mapnik' MapProvider = 'OpenStreetMap Mapnik'
POIImagesWidth = 0
UseThreads = True
OnZoomChange = MapViewZoomChange OnZoomChange = MapViewZoomChange
end end
object Panel1: TPanel object Panel1: TPanel

2
components/lazmapviewer/examples/colored_tracks/main.pas
View File

@ -66,7 +66,7 @@ begin
Screen.Cursor := crHourglass; Screen.Cursor := crHourglass;
try try
// Threaded painting interferes with track painting over several tiles // Threaded painting interferes with track painting over several tiles
MapView.UseThreads := false; MapView.UseThreads := true; //false;
MapView.MapProvider := Combobox1.Text; MapView.MapProvider := Combobox1.Text;
MapView.Active := true; MapView.Active := true;