Ich erzeuge folgendermaßen ein Picture:
Ausschnitt.Bild=newPicture(x,y,32) //x=19842, y=27874
In der nachfolgenden Routine kommt dann der Hinweis, dass das Picture
nicht erzeugt werden konnte und es wird auf 13016x18287 Pixel reduziert.
if Ausschnitt.Bild=nil then
hinweis(HinweisAufloesungNichtMoeglich)
do
x=x*0.9
y=y*0.9
Ausschnitt.Bild=newPicture(x,y,32)
Faktor=Faktor*0.9
if Ausschnitt.Bild<>nil or x<200 then exit
loop
end
Woran leigt es, dass das Picture nicht in der Wunschgröße erzeugt
werden konnte?
MfG, Metti.