Regiones y arreglos dinámicos

[roman]

Empezado por yusnerqui

Alguna idea de como hacer lo que quiero???

Sí.

En lugar de

Código Delphi [-]
RG := CreatePolygonRgn(PT, High(PT), ALTERNATE);

pon

Código Delphi [-]
RG := CreatePolygonRgn(Pointer(PT)^, Length(PT), ALTERNATE);

Cuando usas un arreglo dinámico, PT en realidad no es un arreglo sino un apuntador al arreglo por lo que hay que pasar la dirección a la que apunta.

Por cierto, usa Length y no High ya que High = Length - 1 (los arreglos dinámicos siempre están basados en 0).

// Saludos

[yusnerqui]

Mil gracias Román, funciona a la perfección.

Empezado por Roman

Por cierto, usa Length y no High ya que High = Length - 1 (los arreglos dinámicos siempre están basados en 0).

que pena, ojalá y este hilo no lo lea mi jefe, pues me echaría por ignorante.

Gracias nuevamente Roman y un saludo.