Unter 32 Bit habe ich hier kein Problem..

markieren

Delphi-Quellcode:

var
  pXY: PPoint;

meta := Pointer(pXY);

In 64 Bit meckert der Compiler

Zitat:

[dcc64 Error] uSpriteContainer.pas(4481): E2010 Incompatible types: 'System.TArray<System.Integer>' and 'Pointer'

??

anderes Problem

Zitat:

[dcc64 Warning] uSpriteContainer.pas(6299): W1000 Symbol 'Seek' is deprecated

FileStream.Seek(AniHeader.offset - 1, soFromBeginning);
Was nehmen statt dessen ?

gruss

Was ist PPoint? Das aus System.Types?

Was ist meta?

Zitat von EWeiss:

FileStream.Seek(AniHeader.offset - 1, soFromBeginning);
Was nehmen statt dessen ?

Das andere overload:
FileStream.Seek(AniHeader.offset - 1, soBeginning);

Zitat:

Was ist PPoint? Das aus System.Types

Ja..

Zitat:

Was ist meta?

Dachte das wäre ersichtlich

TArray<Integer>

gruss

Zitat:

anderes Problem
Zitat:
[dcc64 Warning] uSpriteContainer.pas(6299): W1000 Symbol 'Seek' is deprecated
FileStream.Seek(AniHeader.offset - 1, soFromBeginning);
Was nehmen statt dessen ?

Nicht seek ist veraltet nur eine der 3 überladenen Versionen. Komischerweise die mit größeren möglichen Offset (64 Bit).

FileStream.Seek(AniHeader.offset - 1, TSeekOrigin.soFromBeginning);

Das funktioniert Danke Uwe
FileStream.Seek(AniHeader.offset - 1, soBeginning);

gruss

markieren

Delphi-Quellcode:

procedure Main;
var
  meta: TArray<Integer>;
  pXY: PPoint;
begin
  meta := Pointer(pXY); // [dcc32 Fehler] Project403.dpr(31): E2010 Inkompatible Typen: 'System.TArray<System.Integer>' und 'Pointer'
end;

Funktioniert hier auch unter Win32 nicht und gibt die gleiche Fehlermeldung.

Zitat von Uwe Raabe:

markieren

Delphi-Quellcode:

procedure Main;
var
  meta: TArray<Integer>;
  pXY: PPoint;
begin
  meta := Pointer(pXY); // [dcc32 Fehler] Project403.dpr(31): E2010 Inkompatible Typen: 'System.TArray<System.Integer>' und 'Pointer'
end;

Funktioniert hier auch unter Win32 nicht und gibt die gleiche Fehlermeldung.

Aber mit D2010 hatte bisher nie Probleme damit. (kann nur 32Bit)

gruss

Zitat von EWeiss:

Aber mit D2010 hatte bisher nie Probleme damit.

Dann was das vermutlich ein Fehler in D2010. Eigentlich darf dieser Cast nicht funktionieren. Ein dynamisches Array verwaltet seine Länge und den Referenzzähler in einem Bereich vor dem ersten Element. Bei dem Cast ist vollkommen unklar, was dann in diesem Bereich steht. Das kann eigentlich nur schief gehen.

http://docwiki.embarcadero.com/RADSt...he_Array-Typen

Zitat von Uwe Raabe:

Zitat von EWeiss:

Aber mit D2010 hatte bisher nie Probleme damit.

Dann was das vermutlich ein Fehler in D2010. Eigentlich darf dieser Cast nicht funktionieren. Ein dynamisches Array verwaltet seine Länge und den Referenzzähler in einem Bereich vor dem ersten Element. Bei dem Cast ist vollkommen unklar, was dann in diesem Bereich steht. Das kann eigentlich nur schief gehen.

http://docwiki.embarcadero.com/RADSt...he_Array-Typen

Ich glaube dir das

Aber bitte siehe shot!
Das es durchläuft ohne Fehler kannst du am aktuellen Breakpoint sehen dieser ist weiter unten.
meta := Pointer(pXY);

dann ist

markieren

Delphi-Quellcode:

meta[0] := pXY.X;
meta[1] := pXY.Y;

gruss

Ich weiß ja nicht, wie du pXY zuweist. Wenn das ein Pointer auf das erste Element eines TArray<Integer> ist, dann funktioniert das natürlich, weil dann die betreffenden Speicherbereiche ja sinnvolle Werte beinhalten.