Scanline erklären

[steppo]

Habs gefunden.

Oh Man. Das nennt mann Performance.
Ok jetzt sehe ich den Unterschied mehr als deutlich.

Danke für deine Hilfe.

[steppo]

Doch noch eine Frage.

Was passiert hier:

Delphi-Quellcode:

          P^.rgbRed   := 0;
          P^.rgbGreen := 0;
          P^.rgbBlue  := $ff;  <-- haben wir ja schon, siehe IF Bedingung

Habe die Einfärbung unter dem oben genannten Code vorgenommen.

Delphi-Quellcode:

          Canvas.Pixels[x, y] := clBlue;

[Muetze1]

Moin!

Zitat:

Zitat von steppo

Was passiert hier:

Delphi-Quellcode:

          P^.rgbRed   := 0;
          P^.rgbGreen := 0;
          P^.rgbBlue  := $ff;  <-- haben wir ja schon, siehe IF Bedingung

Im 32 Bit Farben Modus besteht ein Pixel aus 4 Bytes: 1 Byte Rotanteil, 1 Byte Grünanteil, 1 Byte Blauanteil und 1 Füllbyte. Die TRGBQuad Struktur setzt sich aus den 4 Elementen zusammen. Darin hast du 4 Elemente definiert: rgbRed, rgbGreen, rgbBlue und rgbReserved. Das sind die 4 Elemente und deren Funktion sollte klar sein.
ScanLine liefert dir immer ein Zeiger auf das 1. Byte der jeweiligen Zeile zurück und ich habe mir die Variable P als PRGBQuad definiert, also ein Zeiger auf diese oben angesprochene TRGBQuad Struktur. Damit habe ich also beim zuweisen von P := ScanLine[y]; sofort einen Zeiger auf das erste Pixel und ich erhalte damit sofort z.B. den Rotanteil des Pixel mit P.rgbRed (das ^ vor dem . ist ab Delphi 5 optional).
So, nun zu deiner Frage: Dieser 3-zeiler weisst die Farbe Blau dem Pixel zu. Die Farbe blau besteht aus 0 Rotanteil, 0 Grünanteil und vollen 255 Blauanteil. Diese weise ich zu ($ff = hexadezimalzahl FF = 255 dezimal).

Zitat:

Zitat von steppo

Habe die Einfärbung unter dem oben genannten Code vorgenommen.

Delphi-Quellcode:

          Canvas.Pixels[x, y] := clBlue;

? Wie ist das zu verstehen? Hast du in der ScanLine Routine nochmals diese Zeile eingefügt? Warum? Dann ist doch der gesamte Geschwindigkeitsvorteil von ScanLine wieder dahin??!?!

MfG
Muetze1

[steppo]

Habe meine Zeile (mit gleichem Einwand wie du eben bezogen auf Geschwindigkeitsverlust) unter deinen dreizeiler eingefügt.
Habe keinen Verlust Festgestellt.

Grund:

Bei deinem Code wird kein Pixel eingefärbt.
Habe also keinen direkten Vergleich.

Die Seite bleibt bei deinem Code unverändert.
Entschuldige

[Muetze1]

Moin!

Zitat:

Zitat von steppo

Grund:

Bei deinem Code wird kein Pixel eingefärbt.
Habe also keinen direkten Vergleich.

Dann sag/schreib das und nicht:

Zitat:

Zitat von steppo

Habs gefunden.

Oh Man. Das nennt mann Performance.
Ok jetzt sehe ich den Unterschied mehr als deutlich.

Ich klicke mal schnell eine Beispiel App zusammen samt Zeitmessung und dann sehen wir weiter... mom...

MfG
Muetze1

[steppo]

Entschuldigung, war ein Schnellschuß meinerseits.

[steppo]

Du hast recht, die Performance leidet erheblich darunter.
OK.

Dennoch wird keine Pixeländerung vorgenommen.
Wenn ich dich richtig verstanden habe, werden in diesem Beispiel die Farbanteile von Rot und Grün auf null gesetzt, sodaß nur der Blaue Anteil übrig bleibt.
Warum wird dieser nicht angezeigt?

[Muetze1]

Moin!

Das ist ein Fehler in deinem Code - mein Code habe ich übernommen in die Beispiel App und der klappt einwandfrei. Schau es dir an...

Also der Unterschied ist auch sehr gut zu erkennen, siehe Screenshot...

MfG
Muetze1

[steppo]

Das sieht gut aus.
Habe jetzt den Qullcode eins zu eins übernommen (copy/past).
Lediglich den Pfad zu meiner datei angepasst.
Keine Pixelfarbänderung.

OK.

Werde morgen weitermachen.

Danke für deine Hilfe

Gute Nacht