?? uinterface.pas
字號(hào):
unit uInterface;
interface
uses
Windows, Messages, SysUtils, Graphics, Forms, Dialogs, Controls, classes;
type
//屬性描述
TPhotoProp = record
Name:string;
Desc:string;
Data:TDateTime;
Size:Integer;
end;
//通知接口
//由photoMgr發(fā)送有關(guān)照片變更的消息通知界面組件。
//通知的內(nèi)容
//增加,刪除,刷新,屬性變化
IPhotoNotify = interface
function SelPhoto(const photoID:Integer):Boolean;
function NewPhoto(const photoID:Integer):Boolean;
function DelPhoto(const photoID:Integer):Boolean;
function Refresh():Boolean;
function PropChange(const photoID:Integer):Boolean;
end;
{------------------------------------------------------------------------------}
//實(shí)現(xiàn)PhotoMgr接口
//由PhotoMgr類來實(shí)現(xiàn)
IPhotoMgr = interface
function GetPhotoCount(var Count:Integer):Boolean;
function GetPhotoID(const idx:Integer; var PhotoID:Integer):Boolean;
function GetSelPhotoID(var PhotoID:Integer):Boolean;
function GetPhotoPorp(const photoID:Integer;var PhotoProp:TPhotoProp):Boolean;
function GetBmp(const PhotoID:Integer;var bmp:TBitmap):Boolean;
end;
implementation
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -