Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 249567 (11003)
  Suchen
 Zurück zur Übersicht
 AutorThema: JPG speichern mit Nviewlib.dll
Ewald Göstl
Datum:11.07.01 23:38 Antwortenals Email verschicken (ewald.goestl@rodenstock.de) 


Kann man mit der Nviewlib.dll eigentlich Bilder im jpg.format speichern, dabei die Originalgröße verändern und den Komprimierungsfaktor einstellen? Gibt es dafür sonst eine Lösung?

Besten Dank.


Sebastian Sprenger
Datum:12.07.01 02:08 Antwortenals Email verschicken (prof.chaos@netcologne.de) 


Ja das geht:

declare dll%,text#
dim text#,256
dll%=usedll("NVIEWLIB.DLL")	' DLL laden
def NViewLibLoad(2)		!"NVIEWLIB.DLL","NViewLibLoad"
def NViewLibSaveAsJPG(2)	!"NVIEWLIB.DLL","NViewLibSaveAsJPG"

loadbmp "SATURN.BMP",0,0;0	' Nehmen wir ein Bild aus dem Profan Demo zum Laden!
savebmp "SATURN2.BMP",0,0-%bmpx,%bmpy
' Das Bild MUSS neu gespeichert werden, es klappt sonst nicht.

string text#,0="SATURN2.BMP"
NViewLibLoad(text#,0)		' Bild laden
string text#,0="SATURN.JPG"
NViewLibSaveAsJPG(80,text#)	' Bild mit einer Qualität von 80% speichern

assign #1,"SATURN2.BMP"
erase #1			' Testbitmap löschen
dispose text#			' Speicher freigeben
freedll dll%			' DLL-Resourcen freigeben


Und das war's.Gruß,
Sebastian



Ewald Göstl
Datum: 12.07.01 21:50 Antwortenals Email verschicken (ewald.goestl@rodenstock.de) 


Hallo Sebastian,
du bist der Größte. Danke für Deine Lösung. Schließe Dich in mein Nachtgebet ein.


 Zurück zur Übersicht