Jpeg: IGxImageFormat;
Свойство Jpeg возвращает графический объект в формате Jpeg.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Image: IGxImage;
ImgFormat: IGxImageFormat;
s: String;
Begin
Image:=ImageBox1.Image;
ImgFormat:=Image.RawFormat;
If ImgFormat=GxImageFormats.Jpg Then
s:="Yes";
Else
s:="No";
End If;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку в переменной «s» будет содержаться «Yes» если в компоненте с наименованием «ImageBox1» содержится изображение в формате «Jpg» или «Jpeg».
См. также: