aview-app 1.0.2

package/aardio/lib/gdip/exifTags.aardio

@@ -0,0 +1,192 @@
+//exifTags 标签
+namespace gdip;
+	
+exifTags = {
+[0x0001]="GpsLatitudeRef";
+[0x0003]="GpsLongitudeRef";
+[0x0005]="GpsAltitudeRef";
+[0x0006]="GpsAltitude";
+[0x0007]="GpsGpsTime";
+[0x0008]="GpsGpsSatellites";
+[0x0009]="GpsGpsStatus";
+[0x000C]="GpsSpeedRef";
+[0x000D]="GpsSpeed";
+[0x000E]="GpsTrackRef";
+[0x0010]="GpsImgDirRef";
+[0x0013]="GpsDestLatRef";
+[0x0015]="GpsDestLongRef";
+[0x0017]="GpsDestBearRef";
+[0x0019]="GpsDestDistRef";
+[0x001A]="GpsDestDist";
+[0x00FE]="NewSubfileType";
+[0x00FF]="SubfileType";
+[0x0100]="ImageWidth";
+[0x0101]="ImageHeight";
+[0x0102]="BitsPerSample";
+[0x0103]="Compression";
+[0x0106]="PhotometricInterp";
+[0x0107]="ThreshHolding";
+[0x0108]="CellWidth";
+[0x0109]="CellHeight";
+[0x010A]="FillOrder";
+[0x010D]="DocumentName";
+[0x010E]="ImageDescription";
+[0x010F]="EquipMake";
+[0x0110]="EquipModel";
+[0x0111]="StripOffsets";
+[0x0112]="Orientation";
+[0x0115]="SamplesPerPixel";
+[0x0116]="RowsPerStrip";
+[0x0117]="StripBytesCount";
+[0x0118]="MinSampleValue";
+[0x0119]="MaxSampleValue";
+[0x011A]="XResolution";
+[0x011B]="YResolution";
+[0x011C]="PlanarConfig";
+[0x011D]="PageName";
+[0x011E]="XPosition";
+[0x011F]="YPosition";
+[0x0120]="FreeOffset";
+[0x0121]="FreeByteCounts";
+[0x0123]="GrayResponseCurve";
+[0x0128]="ResolutionUnit";
+[0x0129]="PageNumber";
+[0x012D]="TransferFunction";
+[0x0131]="SoftwareUsed";
+[0x0132]="DateTime";
+[0x013B]="Artist";
+[0x013C]="HostComputer";
+[0x013D]="Predictor";
+[0x013E]="WhitePoint";
+[0x013F]="PrimaryChromaticities";
+[0x0140]="ColorMap";
+[0x0141]="HalftoneHints";
+[0x0142]="TileWidth";
+[0x0143]="TileLength";
+[0x0144]="TileOffset";
+[0x0145]="TileByteCounts";
+[0x014C]="InkSet";
+[0x014D]="InkNames";
+[0x014E]="NumberOfInks";
+[0x0151]="SamplesPerPixel";
+[0x0152]="ExtraSamples";
+[0x0153]="SampleFormat";
+[0x0154]="SMinSampleValue";
+[0x0155]="SMaxSampleValue";
+[0x0156]="TransferRange";
+[0x0200]="JPEGProc";
+[0x0201]="JPEGInterFormat";
+[0x0202]="JPEGInterLength";
+[0x0203]="JPEGRestartInterval";
+[0x0205]="JPEGLosslessPredictors";
+[0x0206]="JPEGPointTransforms";
+[0x0207]="JPEGQTables";
+[0x0208]="JPEGDCTables";
+[0x0209]="JPEGACTables";
+[0x0211]="YCbCrCoefficients";
+[0x0212]="YCbCrSubsampling";
+[0x0213]="YCbCrPositioning";
+[0x0214]="REFBlackWhite";
+[0x0302]="ICCProfileDescriptor";
+[0x0303]="SRGBRenderingIntent";
+[0x0320]="ImageTitle";
+[0x5001]="ResolutionXUnit";
+[0x5002]="ResolutionYUnit";
+[0x5003]="ResolutionXLengthUnit";
+[0x5004]="ResolutionYLengthUnit";
+[0x5005]="PrintFlags";
+[0x5006]="PrintFlagsVersion";
+[0x5007]="PrintFlagsCrop";
+[0x5008]="PrintFlagsBleedWidth";
+[0x5009]="PrintFlagsBleedWidthScale";
+[0x500A]="HalftoneLPI";
+[0x500B]="HalftoneLPIUnit";
+[0x500C]="HalftoneDegree";
+[0x500D]="HalftoneShape";
+[0x500E]="HalftoneMisc";
+[0x500F]="HalftoneScreen";
+[0x5010]="JPEGQuality";
+[0x5011]="GridSize";
+[0x5012]="ThumbnailFormat";
+[0x5013]="ThumbnailWidth";
+[0x5014]="ThumbnailHeight";
+[0x5015]="ThumbnailColorDepth";
+[0x5016]="ThumbnailPlanes";
+[0x5017]="ThumbnailRawBytes";
+[0x5018]="ThumbnailSize";
+[0x5019]="ThumbnailCompressedSize";
+[0x501A]="ColorTransferFunction";
+[0x501B]="ThumbnailData";
+[0x5020]="ThumbnailImageWidth";
+[0x5021]="ThumbnailImageHeight";
+[0x5022]="ThumbnailBitsPerSample";
+[0x5023]="ThumbnailCompression";
+[0x5024]="ThumbnailPhotometricInterp";
+[0x5025]="ThumbnailImageDescription";
+[0x5026]="ThumbnailEquipMake";
+[0x5027]="ThumbnailEquipModel";
+[0x5028]="ThumbnailStripOffsets";
+[0x5029]="ThumbnailOrientation";
+[0x502A]="ThumbnailSamplesPerPixel";
+[0x502B]="ThumbnailRowsPerStrip";
+[0x502C]="ThumbnailStripBytesCount";
+[0x502D]="ThumbnailResolutionX";
+[0x502E]="ThumbnailResolutionY";
+[0x502F]="ThumbnailPlanarConfig";
+[0x5030]="ThumbnailResolutionUnit";
+[0x5031]="ThumbnailTransferFunction";
+[0x5032]="ThumbnailSoftwareUsed";
+[0x5033]="ThumbnailDateTime";
+[0x5034]="ThumbnailArtist";
+[0x5035]="ThumbnailWhitePoint";
+[0x5036]="ThumbnailPrimaryChromaticities";
+[0x5037]="ThumbnailYCbCrCoefficients";
+[0x5038]="ThumbnailYCbCrSubsampling";
+[0x5039]="ThumbnailYCbCrPositioning";
+[0x503A]="ThumbnailRefBlackWhite";
+[0x503B]="ThumbnailCopyRight";
+[0x5100]="FrameDelay";
+[0x5101]="LoopCount";
+[0x5102]="GlobalPalette";
+[0x5103]="IndexBackground";
+[0x5104]="IndexTransparent";
+[0x5110]="PixelUnit";
+[0x5111]="PixelPerUnitX";
+[0x5112]="PixelPerUnitY";
+[0x5113]="PaletteHistogram";
+[0x8298]="Copyright";
+[0x829A]="ExifExposureTime";
+[0x829D]="ExifFNumber";
+[0x8769]="ExifIFD";
+[0x8773]="ICCProfile";
+[0x8822]="ExifExposureProg";
+[0x8824]="ExifSpectralSense";
+[0x8825]="GpsIFD";
+[0x9101]="ExifCompConfig";
+[0x9102]="ExifCompBPP";
+[0x9201]="ExifShutterSpeed";
+[0x9202]="ExifAperture";
+[0x9206]="ExifSubjectDist";
+[0x9207]="ExifMeteringMode";
+[0x9208]="ExifLightSource";
+[0x927C]="ExifMakerNote";
+[0x9286]="ExifUserComment";
+[0x9290]="ExifDTSubsec";
+[0x9291]="ExifDTOrigSS";
+[0x9292]="ExifDTDigSS";
+[0xA002]="ExifPixXDim";
+[0xA003]="ExifPixYDim";
+[0xA005]="ExifInterop";
+[0xA20B]="ExifFlashEnergy";
+[0xA20E]="ExifFocalXRes";
+[0xA20F]="ExifFocalYRes";
+[0xA210]="ExifFocalResUnit";
+[0xA214]="ExifSubjectLoc";
+[0xA215]="ExifExposureIndex";
+[0xA217]="ExifSensingMethod";
+[0xA302]="ExifCfaPattern";
+}
+
+/**intellisense()
+gdip.exifTags = Exif 标签列表\n此名字空间存储的键为数值,键对应的值为 Exif 标签名
+end intellisense**/

package/aardio/lib/gdip/family.aardio

@@ -0,0 +1,91 @@
+//family 字样 
+import gdip.core;
+import gdip.font;
+namespace gdip ;
+
+class family {
+	ctor(name,collection){
+		if(name === null || name === "Tahoma" )	{
+			name = _WINXP ? "MS Shell Dlg" : "Segoe UI"; 
+		}
+		
+		if(type(name) == type.string){ 
+			var e,f = gdip.CreateFontFamilyFromName ( ..string.toUnicode(name),collection) ;
+			if( e ) return null,gdip.errMsg[e];
+			this.pFamily = f;  
+			this.name = name; 
+			
+			..table.gc(this,"delete");
+		}
+		elseif(type(name) == type.pointer){ 
+			this.pFamily = name;
+			if(collection){
+				var family2 = {ptr p};
+				gdip.assert2( ::Gdiplus.GdipCloneFontFamily(this.pFamily,family2) );
+				this.pFamily = family2.p;
+				..table.gc(this,"delete");
+			}
+		}
+		else {
+			error("参数错误",2)
+		}
+
+		if(!this.pFamily) return;
+	}
+
+	@_metaProperty
+}
+
+
+namespace family {
+
+ 	self.gdip = ..gdip;
+	var gdip = gdip;
+	
+	_metaProperty = ..util.metaProperty(
+	
+	 	createFont = function( emSize,style=0/*_GdipFontStyleRegular*/,unit=2/*_GdipUnitPixel*/ ){
+			return gdip.font(owner,..math.abs(emSize),style,unit) ; 
+		};
+		
+		getName = function(lang){
+			var name ={WORD value[32]};
+			::Gdiplus.GdipGetFamilyNameW(owner[["pFamily"]],name,lang);
+			return name.value;
+		};
+		
+		name = {
+			_get = lambda() owner.getName();
+		};
+	 	
+		delete = function(){
+			if( owner[["pFamily"]]  ){
+				gdip.DeleteFontFamily(owner[["pFamily"]])
+				owner[["pFamily"]] = null;
+			}
+		};
+		
+		_type = "gdip.family";
+		_topointer = function(){
+			return owner[["pFamily"]];
+		}
+	)   
+}
+
+var $ = _dll; 
+/*intellisense(gdip)*/ 
+CreateFontFamilyFromName = $.api("GdipCreateFontFamilyFromName","int(string name,ptr fontColl,pointer& fontFamily)")
+DeleteFontFamily = $.api("GdipDeleteFontFamily","int(PTR family)") 
+/*end intellisense*/
+ 
+/**intellisense()
+gdip.family = 字样\n已安装或嵌入的字体列表（FontCollection）包含字样（Family），\n字样可以用于创建不同大小、不同样式的字体(Font)
+gdip.family(.("字体名") = 创建字样,\n不指定字体名字时,默认为"MS Shell Dlg",\n字样可以用于创建不同样式的同名字体\n创建失败返回空值
+gdip.family(.(字样指针,复制对象) = 字样指针转换为字样对象,\n如果参数@2为true,则复制字样并在对象销毁时负责回收字样\n\n否则仅绑定指针到对象,这时应当谨慎使用避免字样指针被释放
+!gdipfamily.createFont(15,_GdipFontStyle__) = 创建字体,参数一指定大小,\n参数二指定样式\n可选参数三指定单位,默认值为_GdipUnitPixel
+!gdipfamily.delete() = 删除字样\n注意不应手工调用此函数,除非该集合内创建的字体已不再使用
+!gdipfamily.getName() = 返回字体名,可选在参数@1中指定语言ID，不指定时默认为LANG_NEUTRAL
+gdip.family() = !gdipfamily.
+!gdipfamily.createFont() = !gdipfont.
+!gdipfamily.name = 字体名
+end intellisense**/

package/aardio/lib/gdip/feather.aardio

@@ -0,0 +1,74 @@
+//feather 图像羽化
+import gdip.path;
+import gdip.pathGradientBrush;
+import gdip.bitmap;
+
+namespace gdip;
+
+class feather{
+	ctor(bmp,radius,focusScales,blend,positions){ 
+		if( type(bmp) == type.string ) bmp = ..gdip.bitmap(bmp);
+		if( !bmp ) return;
+		
+		var width = bmp.width;
+		var height = bmp.height; 		
+		
+		var path = ..gdip.path();
+		if( radius === null || radius < 0 ){
+			path.addEllipse(0,0,width,height);	
+		}
+		else {
+			path.addRoundRect(::RECT(0,0,width,height) ,radius);
+		}
+		
+		var brush = ..gdip.pathGradientBrush(path);
+		brush.setCenterColor(0xFFFFFFFF);
+		brush.setSurroundColors(0);
+		brush.gammaCorrection = true;
+		
+		if(blend && positions){
+			brush.setBlend(blend,positions);
+		}
+		
+		if( focusScales){ 
+			brush.setFocusScales(focusScales,focusScales);
+		}
+		
+		var mask = ..gdip.bitmap(width,height);
+		mask.getGraphics().fillPath(brush,path); 
+		copyAlpha(bmp,mask);
+		
+		brush.delete();	
+		path.delete();
+		mask.dispose();
+		
+		return bmp;	
+	};
+}
+
+namespace feather{
+    
+    _dll = ..raw.loadDll($"~\lib\gdip\.res\feather.dll",,"cdecl");
+    copyAlpha = function(bmpDst,bmpSrc){
+		var r;
+		var s = bmpSrc.lockMemory(,0x26200A/*_PixelFormat32bppARGB*/);
+		var d = bmpDst.lockMemory(,0x26200A/*_PixelFormat32bppARGB*/);
+		if( #s.Scan0 == #d.Scan0 ){
+			_dll.copyAlpha(d.Scan0,s.Scan0,#s.Scan0);
+			r = true;
+		}
+		bmpDst.unlockMemory(d);
+		bmpSrc.unlockMemory(s);
+		
+		if(!r){
+			error("源图与目标图像大小必须一样",2)
+		}
+	};
+}
+
+/**intellisense()
+gdip.feather = 用于实现图像羽化边缘效果
+gdip.feather( = 羽化图像边缘,返回gdip.bitmap对象
+gdip.feather(.(bmp,radius,focusScales,blend,positions) = 参数@1可指定gdip.bitmap对象,\n如果参数@1是字符串,则调用gdip.bitmap创建位图,\n其他所有参数都是可选参数,\n\nradius: 指定羽化边框圆角半径,为-1时表示羽化边框为圆形\nfocusScales 参数使用0到1的小数指定中心焦点区域缩放百分比,类似探照灯效果,\nblend,positions指定渐变颜色因子数组,渐变位置因子数组,\n关于最后2个参数请参考gdip.pathGradientBrush中setBlend函数的用法说明
+gdip.feather() = !gdipbitmap.
+end intellisense**/

package/aardio/lib/gdip/font.aardio

@@ -0,0 +1,130 @@
+//font 字体
+import gdi;
+import gdip.core;
+namespace gdip;
+ 
+class font {
+	ctor( hdcIn,logfont,... ){
+		 
+		var err;
+		if( hdcIn[["pFamily"]] ){ 
+			this.__family = hdcIn;//gc;
+			
+			var pFamily,emSize,style,unit =  hdcIn[["pFamily"]],logfont,... ;
+			if( style === null ) style =  0/*_GdipFontStyleRegular*/; 
+			if( unit === null ) unit =  2/*_GdipUnitPixel*/;
+			err,this.pFont  = gdip.CreateFont(pFamily,..math.abs(emSize),style,unit) 
+		}
+		else {
+			hdc = hdcIn : ::GetDC(0);
+			 
+			if( !logfont ){
+				err,this.pFont = gdip.CreateFontFromDC(hdc);
+			}
+			else {
+				logfont.stripPoint(hdcIn);
+				
+				var privateFamily = ..fonts[["_privateGdipFamilies"]][[logfont.name]];
+				if(privateFamily[["pFamily"]]){
+					var style = logfont.weight > 600 ? 1/*_FontStyleBold*/ : 0/*_FontStyleRegular*/;
+					if( logfont.underline ) style = style | 4/*_FontStyleUnderline*/
+					if( logfont.strike  ) style = style | 8/*_FontStyleStrikeout*/
+					if( logfont.italic ) style = style | 2/*_FontStyleItalic*/; 
+					err,this.pFont  = gdip.CreateFont(privateFamily[["pFamily"]],..math.abs(logfont.h),style,2/*_GdipUnitPixel*/ );
+				}
+				else {
+					err,this.pFont = gdip.CreateFontFromLogfont(hdc,logfont);
+				}
+			}
+			
+			if(!hdcIn) ::ReleaseDC(0,hdc);
+		}
+		
+		if( err ) return null,gdip.errMsg[err]; 
+		if(!this.pFont) error("创建字体参数错误",2) ; 
+		..table.gc(this,"delete");
+	}
+
+	@_metaProperty
+}
+
+
+namespace font {
+
+ 	self.gdip = ..gdip;
+	var gdip = gdip;
+	
+	_metaProperty = ..util.metaProperty(
+	
+	 	getStyle = function( ){
+			return gdip.assert(  gdip.GetFontStyle(owner[["pFont"]],0) ); 
+		} 
+	 	
+	 	getSize = function( ){
+			return gdip.assert(  gdip.GetFontSize(owner[["pFont"]],0) ); 
+		} 
+		
+		getUnit = function( ){
+			return gdip.assert(  gdip.GetFontUnit(owner[["pFont"]],0) ); 
+		} 
+		
+		getHeight = function(graphics){
+			return gdip.assert(  gdip.GetFontHeight(owner[["pFont"]],graphics,0 ) );
+		}
+		
+		getLogFont = function(graphics){
+			return gdip.assert(  gdip.GetLogFont(owner[["pFont"]],graphics,::LOGFONT() ) );
+		}
+		
+		clone = function(){ 
+			return ..table.gc( {
+				pFont = gdip.assert(  gdip.CloneFont(owner[["pFont"]] ) ); 
+				@_metaProperty
+			},"delete" );	
+		}
+	
+		delete = function(){
+			if( owner[["pFont"]]  ){
+				gdip.DeleteFont(owner[["pFont"]])
+				owner[["pFont"]] = null;//让其他的函数都用不了
+			}
+		}
+		
+		_type = "gdip.font";
+		_topointer = function(){
+			return owner[["pFont"]];
+		}
+	)   
+}
+
+var $ = _dll; 
+/*intellisense(gdip)*/  
+CreateFontFromDC = $.api("GdipCreateFontFromDC","int(POINTER hDc,pointer& createdfont)")
+CreateFontFromLogfont = $.api("GdipCreateFontFromLogfont","int(POINTER hDc,struct logfont,pointer& createdfont)") 
+GetLogFont = $.api("GdipGetLogFont","int(POINTER curFont,pointer Graphics,struct& logfont)") 
+CloneFont = $.api("GdipCloneFont","int(POINTER curFont,pointer& cloneFont)")
+GetFamily = $.api("GdipGetFamily","int(POINTER curFont,pointer& family)")
+GetFontStyle = $.api("GdipGetFontStyle","int(POINTER curFont,int& style)")
+GetFontSize = $.api("GdipGetFontSize","int(POINTER curFont,float& size)")
+GetFontUnit = $.api("GdipGetFontUnit","int(POINTER curFont,int& unit)")
+GetFontHeight = $.api("GdipGetFontHeight","int(POINTER curFont,pointer Graphics,float& Height)")
+
+/*end intellisense*/
+self.CreateFont = $.api("GdipCreateFont","int(PTR family,float emSize,int style,int unit,pointer& createdfont)")
+self.DeleteFont = $.api("GdipDeleteFont","int(POINTER curFont)")
+
+/**intellisense()
+gdip.font = GDI+字体
+gdip.font(  = 创建字体
+gdip.font(.(family对象,emSize,style,unit) = 创建字体,参数@3,@4为可选参数
+gdip.font(.(hdc) = hdc为空则取屏幕DC
+gdip.font(.(hdc,LOGFONT字体) = 使用LOGFONT字体创建GDI+字体对象\n可自动支持fonts名字空间下已导入的自带字体\n参数hdc为空则取屏幕DC
+gdip.font() = !gdipfont.
+!gdipfont.getStyle() = 样式\n数值
+!gdipfont.getSize() = 字体大小\n数值
+!gdipfont.getUnit() = 单位\n数值
+!gdipfont.getHeight(.(graphics) = 显示高度\n数值
+!gdipfont.getLogFont(.(graphics) = 返回LOGFONT字体对象
+!gdipfont.clone() = 复制字体\n!gdipfont.
+!gdipfont.delete() = 删除字体
+end intellisense**/