Prozentrechnung

[utd123]

Hallo
Ich habe ein problem mit der Prozentrechnung in delphi 7.
Ich will den Prozentualen Anteil der Pixel in bestimmten Farben berechnen.
Die Anzahl der Pixel in den Farben habe ich schon berechnet.

//Memo3.Lines.add(floattostr((grau)/(Image1.Picture.Bitmap.Width +1 * Image1.Picture.Bitmap.Height +1)*100) + '%'); grau ist die anzahl der grauen pixel.

was habe ich falsch gemacht?

[MGC]

Hallo,

ich würde mal sagen, dass der Gesamtansatz zur Prozentberechnung falsch ist.
Gehe es doch mal anhand eines einfachen Dreisatzes durch:

Du hast eine Fläche von Width = 100 und Height = 100 Pixeln (also 100 * 100 Pixel = 10000 Pixel)
und davon sind 5000 Pixel grau und 2500 gelb:

graue Pixel:
10000 Pexel entspricht 100%
5000 Pixel entspricht X%

X = 5000 * 100 / 10000
X= 50%

gelbe Pixel:
10000 Pixel entspricht 100%
2500 Pixel entspricht X%

X = 2500 * 100 / 10000
X = 25%

Dein Code lautet z.B. für die grauen Pixels demnach wie folgt:

PxProCent := FloatToStr(CountedGreyPixels * 100 / (Image1.Picture.Bitmap.Width * Image1.Picture.Bitmap.Height));

Wenn Du das ganze jetzt noch in eine Funktion packst und farbunabhängig gestaltest, kannst Du zu jeder Farbe gleich Deine Prozent-Angaben mit derselben Funktion ausrechnen lassen.

[gammatester]

Du hast mindestens zwei Klammern vergessen:

Delphi-Quellcode:

(Image1.Picture.Bitmap.Width +1) * (Image1.Picture.Bitmap.Height +1)
//statt
(Image1.Picture.Bitmap.Width +1 * Image1.Picture.Bitmap.Height +1)

[DeddyH]

Wieso eigentlich das +1 jeweils? Die Größe sollte doch Höhe * Breite entsprechen, oder gibt es da Toleranzen, die mir bislang unbekannt sind?

[utd123]

Danke für die schnelle antwort,
jetzt funktionierts

[bernau]

Zitat von DeddyH:

Wieso eigentlich das +1 jeweils? Die Größe sollte doch Höhe * Breite entsprechen, oder gibt es da Toleranzen, die mir bislang unbekannt sind?

Vieleicht um eine Exception DivByZero zu umgehen?

[DeddyH]

Das sollte man IMO ja bereits im Vorfeld ausgeschlossen haben. Nur so wie jetzt wird ja das Ergebnis (wenn auch nur geringfügig) verfälscht.

[Luckie]

Zitat von bernau:

Zitat von DeddyH:

Wieso eigentlich das +1 jeweils? Die Größe sollte doch Höhe * Breite entsprechen, oder gibt es da Toleranzen, die mir bislang unbekannt sind?

Vieleicht um eine Exception DivByZero zu umgehen?

Also wenn das der wirkliche Grund ist und ich sein Lehrer wäre, hätte er von mir dafür einen Punkt zusätzlich bekommen wegen Kreativität.

[MGC]

Und wie hast Du das Problem jetzt gelöst?
Zeig doch mal Deine neue Code-Zeile.

[mquadrat]

Ich tippe ja eher drauf, dass es eine leichte "in der Informatik wird ab 0 gezählt" Verwirrung war