DXE2; X64; Type cast

[SirThornberry]

funktioniert daher bei seinem Beispiel nicht. "Scanlinebytes" lässt vermuten das durch incrementieren die Zeile gewechselt werden soll. Und eine Zeile hat nicht zwangsläufig als Größe ein Vielfaches eines Pixels.

[Uwe Raabe]

Zitat von SirThornberry:

funktioniert daher bei seinem Beispiel nicht. "Scanlinebytes" lässt vermuten das durch incrementieren die Zeile gewechselt werden soll.

Deshalb ja auch meine Anmwerkung.

Zitat von SirThornberry:

Und eine Zeile hat nicht zwangsläufig als Größe ein Vielfaches eines Pixels.

Aber ganz sicher hat eine Zeile als Größe ein Vielfaches der eines Pixels. Dieses Vielfache ist exakt die Anzahl der Pixel pro Zeile.

[bernhard_LA]

wollte endlich mal sauber programmieren und mit LONG_PTR geht der Code unter XE 2 , aber nicht mehr unter DELPHI 7
(wir haben alle alle Delphi Version im Team / Projekt )

[jbg]

Zitat von bernhard_LA:

wollte endlich mal sauber programmieren und mit LONG_PTR geht der Code unter XE 2 , aber nicht mehr unter DELPHI 7

Dann musst du eben auf das "alte" PAnsiChar zurückgreifen

[jaenicke]

Am saubersten ist wohl für alle Versionen:

Delphi-Quellcode:

Dec(PByte(RowRotated), ScanLineBytes); 
//Move Pointer

PAnsiChar macht das gleiche, hat aber einen gewissen Beigeschmack...

[jbg]

PByte gibt es erst seit "kurzem". PAnsiChar ist älter. Es kommt also darauf an, welche Delphi Versionen man unterstützen möchte, oder ob man einfach "type PByte = ^Byte;" selbst im Code hinterlegt.

[jaenicke]

Zitat von jbg:

PByte gibt es erst seit "kurzem". PAnsiChar ist älter.

Gut, ob es das bei Delphi 1 oder 2 schon gab, weiß ich nicht, aber weder hätte ich vermutet, dass es hier um Delphi 1 oder 2 geht (wenn es das da noch nicht gibt), noch hätte ich Delphi 3 als "seit kurzem" angesehen...

Der Code von oben funktioniert mit PByte jedenfalls auch schon bei Delphi 3, auch TRGBTriple gibt es dort.