Si es en una pantalla, sacale el Report$
El codigo seria este, creo
IF Report$?Image1{PROP:Height} > 1000
AspectRatio$ = Report$?Image1{PROP:Width}/Report$?Image1{PROP:Height}
Report$?Image1{PROP:Height} = 1000
Report$?Image1{PROP:Width} = 1000 * AspectRatio$
END
IF Report$?Image1{PROP:Width} > 1000
AspectRatio$ = Report$?Image1{PROP:Height}/Report$?Image1{PROP:Width}
Report$?Image1{PROP:Width} = 1000
Report$?Image1{PROP:Height} = 1000 * AspectRatio$
END
Cualquier cosa avisame
Saludos
Andres Favilla
Evolution Consulting
andres@evolutionconsulting.com.ar