[jmbarrio]

Buenas tardes, estoy intentando hacer un zoom en un formulario o en una imagen con delphi 12, el código es el siguiente:

Código Delphi [-]
Procedure TF_Foto.Image1Gesture(Sender: TObject;
const EventInfo: TGestureEventInfo; var Handled: Boolean);
var
ZoomFactor: Single;
begin
if EventInfo.GestureID = sgiZoom then
begin
// Calcula el factor de zoom basado en la distancia de los dedos
ZoomFactor := EventInfo.Distance / 100;

// Aplica el factor de zoom a la imagen
Image1.Width := Round(Image1.Width * ZoomFactor);
Image1.Height := Round(Image1.Height * ZoomFactor);

// Ajusta la posición para mantener la imagen centrada (opcional)
Image1.Position.X := Image1.Position.X - (Image1.Width * (ZoomFactor - 1)) / 2;
Image1.Position.Y := Image1.Position.Y - (Image1.Height * (ZoomFactor - 1)) / 2;

Handled := True; // Marca que el gesto ha sido manejado
end;
end;

En la instrucción

Código Delphi [-]
EventInfo.GestureID = sgiZoom

que es la que se supone identifica la realizacion del zoom, sgiZoom me dice identificador no declarado

La propiedad Touch esta bien configurada asignándole un TGestureManager y habilitando el zoom.

Alguna idea de porque no reconoce el sgiZoom?

Gracias, un saludo.