ups.
ja stimmt:
Da steht 2030 Byts gelesen Bild  

Jetzt habe ich mal im Programm ein paar Zeilen gelöscht...
Habe jetzt 1934 Byts
Dann eine Dim Anweisung mit Long durch Word ersetzt.
Dann habe ich gleich 2040 Byts..

Das macht ja schön viel aus Bild