Class TDBJPEGImage (unit JpgImg)

Inherits from

TCustomJPEGImage

@\\\0000000315*) (*@/// TDBJPEGImage = class(TCustomJPEGImage)

Constructors


constructor create(Owner:TComponent);

@\\\*) (*$endif *) (*@/// constructor TDBJPEGImage.


Functions

procedure DBLoadFromFile(const filename:string);

@\\\*) (*@/// procedure TDBJPEGImage.

procedure DBLoadFromStream(stream:TStream);

@\\\*) (*@/// procedure TDBJPEGImage.

procedure DBSaveToFile(const filename:string);

@\\\0000000A01*) (*@/// procedure TDBJPEGImage.

procedure DBSaveToStream(stream:TStream);

@\\\000000072B*) (*@/// procedure TDBJPEGImage.

destructor destroy;

@\\\0000000A25*) (*@/// destructor TDBJPEGImage.

procedure LoadImage;

@\\\0000000507*) (*@/// procedure TDBJPEGImage.

procedure changed(sender:TObject);

$endif

@\\\*) (*@/// procedure TDBJPEGImage.


procedure cmgetdatalink(var msg:TMessage);

$ifndef ver80

@\\\0000000301*) (*$ifndef ver80 *) (*@/// procedure TDBJPEGImage.


procedure DataChange(sender:TObject);

@\\\0000000401*) (*@/// procedure TDBJPEGImage.

function GetDataField: string;

@\\\*) (*@\\\0000000901*) (*@/// TDBJPEGImage=class(TCustomJPEGImage) *) (*@/// function TDBJPEGImage.

function getDataSource: TdataSource;

@\\\0000000117*) (*@/// function TDBJPEGImage.

procedure notification(component:TComponent; operation:TOperation);

@\\\*) (*@/// procedure TDBJPEGImage.

procedure SetAutoDisplay(value: boolean);

@\\\*) (*@/// procedure TDBJPEGImage.

procedure SetDataField(const value:string);

@\\\0000000117*) (*@/// procedure TDBJPEGImage.

procedure SetDataSource(value:TDatasource);

@\\\0000000601*) (*@/// procedure TDBJPEGImage.

procedure updatedata(sender:Tobject);

@\\\000E00031700033600030A00030A*) (*@/// procedure TDBJPEGImage.

Properties

property AutoDisplay : boolean


property DataField : string


property DataSource : TDataSource


property Picture :


Events

Variables

changing : boolean;


fautodisplay : boolean;


fdatalink : tfielddatalink;


imageloaded : boolean;


oldchanged : tnotifyevent;



Constructors


constructor create(Owner:TComponent);

@\\\*) (*$endif *) (*@/// constructor TDBJPEGImage.create(Owner:TComponent);


Functions


procedure DBLoadFromFile(const filename:string);

@\\\*) (*@/// procedure TDBJPEGImage.DBLoadFromFile(const filename:string);


procedure DBLoadFromStream(stream:TStream);

@\\\*) (*@/// procedure TDBJPEGImage.DBLoadFromStream(stream:TStream);


procedure DBSaveToFile(const filename:string);

@\\\0000000A01*) (*@/// procedure TDBJPEGImage.DBSaveToFile(const filename:string);


procedure DBSaveToStream(stream:TStream);

@\\\000000072B*) (*@/// procedure TDBJPEGImage.DBSaveToStream(stream:TStream);


destructor destroy;

@\\\0000000A25*) (*@/// destructor TDBJPEGImage.destroy;


procedure LoadImage;

@\\\0000000507*) (*@/// procedure TDBJPEGImage.LoadImage;


procedure changed(sender:TObject);

$endif

@\\\*) (*@/// procedure TDBJPEGImage.changed(sender:TObject);


procedure cmgetdatalink(var msg:TMessage);

$ifndef ver80

@\\\0000000301*) (*$ifndef ver80 *) (*@/// procedure TDBJPEGImage.cmgetdatalink(var msg:TMessage);


procedure DataChange(sender:TObject);

@\\\0000000401*) (*@/// procedure TDBJPEGImage.DataChange(sender:TObject);


function GetDataField: string;

@\\\*) (*@\\\0000000901*) (*@/// TDBJPEGImage=class(TCustomJPEGImage) *) (*@/// function TDBJPEGImage.GetDataField: string;


function getDataSource: TdataSource;

@\\\0000000117*) (*@/// function TDBJPEGImage.getDataSource: TdataSource;


procedure notification(component:TComponent; operation:TOperation);

@\\\*) (*@/// procedure TDBJPEGImage.notification(component:TComponent; operation:TOperation);


procedure SetAutoDisplay(value: boolean);

@\\\*) (*@/// procedure TDBJPEGImage.SetAutoDisplay(value: boolean);


procedure SetDataField(const value:string);

@\\\0000000117*) (*@/// procedure TDBJPEGImage.SetDataField(const value:string);


procedure SetDataSource(value:TDatasource);

@\\\0000000601*) (*@/// procedure TDBJPEGImage.SetDataSource(value:TDatasource);


procedure updatedata(sender:Tobject);

@\\\000E00031700033600030A00030A*) (*@/// procedure TDBJPEGImage.updatedata(sender:Tobject);


Properties


property AutoDisplay : boolean


property DataField : string


property DataSource : TDataSource


property Picture :


Events


Variables


changing : boolean;


fautodisplay : boolean;


fdatalink : tfielddatalink;


imageloaded : boolean;


oldchanged : tnotifyevent;