Image Segementation with K means für VCL und FMX Framework, Teil #2

**TiGü**

Hier meine Verbesserungen.
LoadData kann analog wie SaveData verbessert werden, dass überlasse ich dir aber als Übung.
Lesetipp:

https://blog.dummzeuch.de/2019/12/12...lls-in-delphi/

Die Bitmap am besten auch in C:\Temp werfen oder über den anderen Button eine neue Öffnen.

Anhang 56553

@bernhard_LA Hast du hier mal in die ZIP geguckt oder ging das jetzt unter?

**bernhard_LA**

( bin gerade am testen

)

Zwischenstand : 4032*3024 pixel pf32bit

markieren

Delphi-Quellcode:

			start kmean

 image segmentation ...

MyKMeans.LoadData elapsed time: 55577,86 ms

MyKMeans.Execute elapsed time: 52690,50 ms

MyKMeans.SaveData elapsed time: 2724,70 ms

kmean image segmentation done in 110993,06 ms

**Sinspin**

Mal meine Variante.
Lesen/schreiben ist schnell, bei KMeans hatte ich ein bisschen was probiert, nutzte aber nix um besseres Resultat zu bekommen.
Wie gesagt, dein Testbild wäre schön.

Image Segementation with K means für VCL und FMX Framework, Teil #2

AW: Image Segementation with K means für VCL und FMX Framework, Teil #2

AW: Image Segementation with K means für VCL und FMX Framework, Teil #2

AW: Image Segementation with K means für VCL und FMX Framework, Teil #2

Forumregeln