亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

? 歡迎來到蟲蟲下載站! | ?? 資源下載 ?? 資源專輯 ?? 關于我們
? 蟲蟲下載站

?? commonuse.pas

?? Delphi的很有用的常用的方法和函數列表.
?? PAS
?? 第 1 頁 / 共 5 頁
字號:
{**********************************************
 * 2003年7月                                  *
 * 編者:何智勇                               *
 **********************************************
}

Unit CommonUse;

Interface

Uses
  Windows, SysUtils, Forms, JPEG, Graphics, Types, StrUtils, TlHelp32, Gauges,
  Winsock, Classes, ShellAPI;

const
  START_YEAR=1901;
  END_YEAR=2050;

Procedure ShowInformation(Const Msg: String);
  //顯示一信息框

Function YesNoDialogDef1(Const Msg: String): Boolean;
  //顯示一對話框"是"返回True,"否"返回False   默認按鈕為“是”

Function YesNoDialogDef2(Const Msg: String): Boolean;
  //顯示一對話框"是"返回True,"否"返回False   默認按鈕為“否”

Function OkCancelDialogDef1(Const Msg: String): Boolean;
  //顯示一對話框"確定"返回True,"取消"返回False   默認按鈕為“是”

Function OkCancelDialogDef2(Const Msg: String): Boolean;
  //顯示一對話框"確定"返回True,"取消"返回False   默認按鈕為“否”

Function RetryCancelDialogDef1(Const Msg: String): Boolean;
  //顯示一對話框"重試"返回True,"取消"返回False   默認按鈕為“是”

Function RetryCancelDialogDef2(Const Msg: String): Boolean;
  //顯示一對話框"重試"返回True,"取消"返回False   默認按鈕為“否”

Function FindFirstRemoveDrive: Char;
  //返回第一個可用的可移動式磁盤盤符

Procedure ShowWarning(Const Msg: String);
  //顯示一警告對話框

Procedure ShowError(Const Msg: String);
  //顯示一錯誤對話框

Function SuperQuestion(Msg: String; Title: String; Icon: Integer;
  defButton: Integer): Boolean;
  //超級的有返回值的"是否"對話框Msg:信息內容;Title標題;Icon:左邊圖標;defButton默認按鈕

Procedure SuperMsg(Text: String; Title: String; Icon: Integer);
  //超級提示框,可自定義左邊圖標樣式

Function FindFirstCDROMDrive: Char;
  //返回第一個可用的CDROM的盤符

Function isReadWriteDisk(Drive: Char): Bool;
  //判斷目標盤是否可寫,只讀返回False,可寫返回True

Procedure GetScreenPic(ZipScale: Word);
  //抓取當前屏幕并保存到文件:C:\Temp.jpg中,ZipScale為JPEG壓縮比

Procedure BMPToJPG(Const BmpFileName, JPGFileName: String);
  //將BMP文件轉換為JPG文件以指定的文件名保存在指定目錄下
  //如:BMPToJPG(ExtractFileName(Application.EXEName) + 'Goods.bmp', 'C:\Temp\Tmp.jpg')

Function GetMaskString(S, Mask: String; Position: Integer): String;
  //返回字符串S中,從第Position個Mask字符開始,直到第Positon + 1個Mask結束的字符串

Function DateStr(Const aDateTime: TDateTime): String;
  //返回類似"2003年4月5日"的字符串

Function DateTimeStr(Const aDateTime: TDateTime): String;
  //返回類似"2003年4月5日 3點05分"的字符串

Function TimeStr(Const aDateTime: TDateTime): String;
  //返回類似"3點05分09秒"的字符串

Function SmallToBig1(Const rmbSmall: Currency): String;
  //返回大寫人民幣如輸入123.45則輸出"  12345" 適合于票據小寫數據的填空輸出或打印

Function SmallToBig2(Const rmbSmall: Currency): String;
  //返回大寫人民幣如輸入123.45則輸出"※※壹貳叁肆伍" 適合于票據大寫數據的填空輸出或打印

Function SmallToBig3(Const rmbSmall: Currency): String; //黃清寫
  //返回大寫人民幣如輸入123.45則輸出"壹佰貳拾叁圓肆角伍分" 適合于票據大寫數據的輸出或打印

Function SmallToBig4(Const rmbSmall: Currency): String; //小何寫
  //返回大寫人民幣如輸入123.45則輸出"壹佰貳拾叁圓肆角伍分" 適合于票據大寫數據的輸出或打印

Function SmallToBig5(Const aNumber: Double): String;
  //返回大寫數字字符如輸入123.45則輸出"壹佰貳拾叁點肆伍"適合于票據中輸入大寫的數量、噸位等

Function AppIsRunning: Boolean;
  //返回本程序是否正在運行,若正在執行,則退出。注:可在主窗口的OnCreate事件中調用

Function GetApplicationPath: String;
  //得到程序所在的路徑

Function KillTask(ExeFileName: String): Integer;
  //結束外部程序

Procedure RestoreDateType;
  //初始化日期的格式,初始后如:2003-02-03、2003年2月3日

Procedure CopyFileWithProgressBar(Source, Destination: String; aGauge: TGauge);
  //帶進度條的復制文件函數

Function LocalIP: String;
  //返回本機IP地址

Function IPAddrToName(IPAddr: String): String;
  //根據本機IP地址得到本機的計算機名稱

Function GetPYIndexChar(hzchar: String): Char;
  // 獲取指定漢字的拼音索引字母,如:“漢”的索引字母是“H”

Function SearchByPYIndexStr(SourceStrs: TStrings; PYIndexStr: String): String;
  // 在指定的字符串列表SourceStrs中檢索符合拼音索引字符串PYIndexStr的所有字符串,并返回。

//計算iYear,iMonth,iDay對應是星期幾 1年1月1日 --- 65535年12月31日
function WeekDay(iYear,iMonth,iDay:Integer):Integer;

//計算指定日期的周數,周0為新年開始后第一個星期天開始的周
function WeekNum(const TDT:TDateTime):Word;overload;
function WeekNum(const iYear,iMonth,iDay:Integer):Word;overload;

//返回iYear年iMonth月的天數 1年1月 --- 65535年12月
function MonthDays(iYear,iMonth:Integer):Integer;

//返回陰歷iLunarYer年陰歷iLunarMonth月的天數,如果iLunarMonth為閏月,
//高字為第二個iLunarMonth月的天數,否則高字為0
// 1901年1月---2050年12月
function LunarMonthDays(iLunarYear,iLunarMonth:Integer):Integer;

//返回陰歷iLunarYear年的總天數
// 1901年1月---2050年12月
function LunarYearDays(iLunarYear:Integer):Integer;

//返回陰歷iLunarYear年的閏月月份,如沒有返回0
// 1901年1月---2050年12月
function GetLeapMonth(iLunarYear:Integer):Integer;

//把iYear年格式化成天干記年法表示的字符串
procedure FormatLunarYear(iYear:Integer;var pBuffer:string);overload;
function FormatLunarYear(iYear:Integer):string;overload;

//把iMonth格式化成中文字符串
procedure FormatMonth(iMonth:Integer;var pBuffer:string;bLunar:Boolean=True);overload;
function FormatMonth(iMonth:Integer;bLunar:Boolean=True):string;overload;

//把iDay格式化成中文字符串
procedure FormatLunarDay(iDay:Integer;var pBuffer:string);overload;
function FormatLunarDay(iDay:Integer):string;overload;

//計算公歷兩個日期間相差的天數  1年1月1日 --- 65535年12月31日
function CalcDateDiff(iEndYear,iEndMonth,iEndDay:Integer;iStartYear:Integer=START_YEAR;iStartMonth:Integer=1;iStartDay:Integer=1):Integer;overload;
function CalcDateDiff(EndDate,StartDate:TDateTime):Integer;overload;

//計算公歷iYear年iMonth月iDay日對應的陰歷日期,返回對應的陰歷節氣 0-24
//1901年1月1日---2050年12月31日
function GetLunarDate(iYear,iMonth,iDay:Integer; var iLunarYear,iLunarMonth,iLunarDay:Integer):Integer;overload;
procedure GetLunarDate(InDate:TDateTime;var iLunarYear,iLunarMonth,iLunarDay:Integer);overload;

function GetLunarHolDay(InDate:TDateTime):string;overload;
function GetLunarHolDay(iYear,iMonth,iDay:Integer):string;overload;

//計算從1901年1月1日過iSpanDays天后的陰歷日期
procedure l_CalcLunarDate(var iYear,iMonth,iDay:Integer;iSpanDays:Longint);

//計算公歷iYear年iMonth月iDay日對應的節氣 0-24,0表不是節氣
function l_GetLunarHolDay(iYear,iMonth,iDay:Integer):Integer;

//返回農歷年度月份字符串
function GetLunarDateString(const InDate: TDateTime): String;

//18位身份證驗證
function SfzOldIDToNewID(ID: String): String;

//身份證15位升為18位算法
function SFZ15to18(ID: string):string;

//base64加密
function Base64Encode(const s: string): string;

//base64解密
function Base64Decode(const s: string): string;

//base64與字符串變換
function Base64ToString(const Value : string): string;
function StringToBase64(const Value: string): string;
function GetTitle(const Value: string): string;

//計算目錄大小
function GetDirectorySize(const ADirectory: string): Integer;

//清空目錄
function EmptyDirectory(const TheDirectory :String ; const Recursive : Boolean) : Boolean;

Implementation

var
//數組gLunarDay存入陰歷1901年到2100年每年中的月天數信息,
//陰歷每月只能是29或30天,一年用12(或13)個二進制位表示,對應位為1表30天,否則為29天
  gLunarMonthDay:array[0..149] of Integer=(
    //測試數據只有1901.1.1 --2050.12.31
    $4ae0, $a570, $5268, $d260, $d950, $6aa8, $56a0, $9ad0, $4ae8, $4ae0,
//1910
    $a4d8, $a4d0, $d250, $d548, $b550, $56a0, $96d0, $95b0, $49b8, $49b0,
//1920
    $a4b0, $b258, $6a50, $6d40, $ada8, $2b60, $9570, $4978, $4970, $64b0,
//1930
    $d4a0, $ea50, $6d48, $5ad0, $2b60, $9370, $92e0, $c968, $c950, $d4a0,
//1940
    $da50, $b550, $56a0, $aad8, $25d0, $92d0, $c958, $a950, $b4a8, $6ca0,
//1950
    $b550, $55a8, $4da0, $a5b0, $52b8, $52b0, $a950, $e950, $6aa0, $ad50,
//1960
    $ab50, $4b60, $a570, $a570, $5260, $e930, $d950, $5aa8, $56a0, $96d0,
//1970
    $4ae8, $4ad0, $a4d0, $d268, $d250, $d528, $b540, $b6a0, $96d0, $95b0,
//1980
    $49b0, $a4b8, $a4b0, $b258, $6a50, $6d40, $ada0, $ab60, $9370, $4978,
//1990
    $4970, $64b0, $6a50, $ea50, $6b28, $5ac0, $ab60, $9368, $92e0, $c960,
//2000
    $d4a8, $d4a0, $da50, $5aa8, $56a0, $aad8, $25d0, $92d0, $c958, $a950,
//2010
    $b4a0, $b550, $b550, $55a8, $4ba0, $a5b0, $52b8, $52b0, $a930, $74a8,
//2020
    $6aa0, $ad50, $4da8, $4b60, $9570, $a4e0, $d260, $e930, $d530, $5aa0,
//2030
    $6b50, $96d0, $4ae8, $4ad0, $a4d0, $d258, $d250, $d520, $daa0, $b5a0,
//2040
    $56d0, $4ad8, $49b0, $a4b8, $a4b0, $aa50, $b528, $6d20, $ada0, $55b0);
//2050

//數組gLanarMonth存放陰歷1901年到2050年閏月的月份,如沒有則為0,每字節存兩年
  gLunarMonth:array[0..74] of Byte=(
    $00, $50, $04, $00, $20,   //1910
    $60, $05, $00, $20, $70,   //1920
    $05, $00, $40, $02, $06,   //1930
    $00, $50, $03, $07, $00,   //1940
    $60, $04, $00, $20, $70,   //1950
    $05, $00, $30, $80, $06,   //1960
    $00, $40, $03, $07, $00,   //1970
    $50, $04, $08, $00, $60,   //1980
    $04, $0a, $00, $60, $05,   //1990
    $00, $30, $80, $05, $00,   //2000
    $40, $02, $07, $00, $50,   //2010
    $04, $09, $00, $60, $04,   //2020
    $00, $20, $60, $05, $00,   //2030
    $30, $b0, $06, $00, $50,   //2040
    $02, $07, $00, $50, $03);  //2050

//數組gLanarHoliDay存放每年的二十四節氣對應的陽歷日期
//每年的二十四節氣對應的陽歷日期幾乎固定,平均分布于十二個月中
//   1月          2月         3月         4月         5月         6月
//小寒 大寒   立春  雨水   驚蟄 春分   清明 谷雨   立夏 小滿   芒種 夏至
//   7月          8月         9月         10月       11月        12月
//小暑 大暑   立秋  處暑   白露 秋分   寒露 霜降   立冬 小雪   大雪 冬至
{*********************************************************************************
 節氣無任何確定規律,所以只好存表,要節省空間,所以....
**********************************************************************************}
//數據格式說明:
//如1901年的節氣為
//  1月     2月     3月   4月    5月   6月   7月    8月   9月    10月  11月     12月
// 6, 21, 4, 19,  6, 21, 5, 21, 6,22, 6,22, 8, 23, 8, 24, 8, 24, 8, 24, 8,23, 8, 22
// 9, 6,  11,4,   9, 6,  10,6,  9,7,  9,7,  7, 8,  7, 9,  7,  9, 7,  9, 7,8, 7, 15
//上面第一行數據為每月節氣對應日期,15減去每月第一個節氣,每月第二個節氣減去15得第二行
// 這樣每月兩個節氣對應數據都小于16,每月用一個字節存放,高位存放第一個節氣數據,低位存放
//第二個節氣的數據,可得下表
  gLunarHolDay:array[0..1799] of Byte=(
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1901
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1902
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1903
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //1904
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1905
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1906
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1907
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1908
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1909
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1910
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1911
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1912
    $95, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1913
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1914
    $96, $A5, $97, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1915
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1916
    $95, $B4, $96, $A6, $96, $97, $78, $79, $78, $69, $78, $87,   //1917
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $77,   //1918
    $96, $A5, $97, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1919
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1920
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $87,   //1921
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $77,   //1922
    $96, $A4, $96, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1923
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1924
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $87,   //1925
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1926
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1927
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1928
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1929
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1930
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1931
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1932
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1933
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1934
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1935
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1936
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1937
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1938
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1939
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1940
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1941
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1942
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1943
    $96, $A5, $96, $A5, $A6, $96, $88, $78, $78, $78, $87, $87,   //1944
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1945
    $95, $B4, $96, $A6, $97, $97, $78, $79, $78, $69, $78, $77,   //1946
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1947
    $96, $A5, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1948
    $A5, $B4, $96, $A5, $96, $97, $88, $79, $78, $79, $77, $87,   //1949
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $77,   //1950
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1951
    $96, $A5, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1952
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1953
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $68, $78, $87,   //1954
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1955
    $96, $A5, $A5, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1956
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1957
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1958
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1959
    $96, $A4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1960
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1961
    $96, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1962
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1963
    $96, $A4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1964
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1965
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1966
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1967
    $96, $A4, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1968
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1969
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1970
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1971
    $96, $A4, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1972
    $A5, $B5, $96, $A5, $A6, $96, $88, $78, $78, $78, $87, $87,   //1973
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1974
    $96, $B4, $96, $A6, $97, $97, $78, $79, $78, $69, $78, $77,   //1975
    $96, $A4, $A5, $B5, $A6, $A6, $88, $89, $88, $78, $87, $87,   //1976
    $A5, $B4, $96, $A5, $96, $96, $88, $88, $78, $78, $87, $87,   //1977
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //1978
    $96, $B4, $96, $A6, $96, $97, $78, $79, $78, $69, $78, $77,   //1979
    $96, $A4, $A5, $B5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1980
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $77, $87,   //1981
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1982
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $77,   //1983
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $87,   //1984
    $A5, $B4, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1985
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1986
    $95, $B4, $96, $A5, $96, $97, $88, $79, $78, $69, $78, $87,   //1987
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1988
    $A5, $B4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1989
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $79, $77, $87,   //1990
    $95, $B4, $96, $A5, $86, $97, $88, $78, $78, $69, $78, $87,   //1991
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1992
    $A5, $B3, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1993
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1994
    $95, $B4, $96, $A5, $96, $97, $88, $76, $78, $69, $78, $87,   //1995
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1996
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1997
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1998
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1999
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2000
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2001
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //2002
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //2003
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2004
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2005
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2006
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //2007
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $87, $78, $87, $86,   //2008
    $A5, $B3, $A5, $B5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2009
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2010
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //2011
    $96, $B4, $A5, $B5, $A5, $A6, $87, $88, $87, $78, $87, $86,   //2012
    $A5, $B3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $87,   //2013

?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频
色偷偷88欧美精品久久久| 免费久久99精品国产| 日韩三级中文字幕| 91精品国产色综合久久ai换脸| 91麻豆免费看| 欧洲一区在线电影| 欧美亚洲动漫精品| 欧美日韩国产综合视频在线观看| 91在线视频在线| 色综合色狠狠综合色| 日本乱人伦一区| 欧美日韩精品一区二区天天拍小说| 欧美伊人久久久久久午夜久久久久| 91视频观看视频| 欧美日韩精品专区| 欧美一区二区久久| 久久久精品一品道一区| 中文欧美字幕免费| 亚洲精品免费一二三区| 亚洲国产欧美在线| 日韩黄色片在线观看| 久国产精品韩国三级视频| 国产伦精品一区二区三区视频青涩| 国产一区欧美二区| 91麻豆免费看| 8v天堂国产在线一区二区| 久久综合色之久久综合| 亚洲国产成人av网| 日韩精品一区二区三区中文精品 | 91视频免费观看| 欧美中文字幕一二三区视频| 欧美日韩一区二区三区免费看| 欧美一级在线观看| 国产精品免费观看视频| 亚洲国产乱码最新视频| 蜜臀av一级做a爰片久久| 国产精品综合在线视频| 一本到不卡精品视频在线观看| 欧美美女黄视频| 久久人人超碰精品| 亚洲午夜在线视频| 国产成人鲁色资源国产91色综| 97久久超碰精品国产| 久久精品一区二区三区不卡| 中文字幕一区二区三区蜜月| 香蕉加勒比综合久久| 国产成人精品aa毛片| 欧美性生交片4| 国产欧美一区二区精品性色超碰 | 成人午夜av影视| 欧美日韩精品一区二区三区四区 | 国产精品理伦片| 奇米精品一区二区三区在线观看一| 成人精品免费看| 日韩午夜激情视频| 亚洲午夜av在线| 成人国产视频在线观看| 欧美mv日韩mv| 日韩电影在线一区| 欧美亚洲丝袜传媒另类| 中文字幕乱码日本亚洲一区二区| 久久精品国产亚洲一区二区三区 | 欧美视频一区二区三区在线观看| 国产午夜精品一区二区三区视频 | 精品日韩av一区二区| 亚洲成人激情综合网| 欧美日韩一区三区四区| 国产精品短视频| 成人一区二区在线观看| 精品99999| 久久99精品网久久| 精品剧情在线观看| 奇米色777欧美一区二区| 欧美老女人在线| 亚洲国产日韩一区二区| 欧美日韩一区二区在线观看视频| 中文字幕亚洲在| 成人a级免费电影| 国产精品素人视频| 国产suv精品一区二区三区| 2019国产精品| 国产一区二区视频在线播放| 日韩欧美你懂的| 老司机精品视频导航| 欧美va亚洲va在线观看蝴蝶网| 日韩av中文在线观看| 日韩欧美色综合网站| 精品一区二区三区视频在线观看| 日韩欧美国产综合在线一区二区三区| 视频一区二区三区入口| 日韩一区二区三区视频| 蜜臀av一级做a爰片久久| 欧美成人精品3d动漫h| 国产主播一区二区| 国产精品久久久久久久久图文区| 成人av电影免费在线播放| 亚洲欧美日韩国产手机在线| 在线视频一区二区免费| 日本视频一区二区三区| 精品国产污污免费网站入口| 国产老肥熟一区二区三区| 国产精品高潮呻吟| 91国产成人在线| 91麻豆6部合集magnet| 亚洲综合在线电影| 7777精品伊人久久久大香线蕉经典版下载 | 亚洲福中文字幕伊人影院| 9191成人精品久久| 极品少妇xxxx精品少妇| 中文字幕在线观看不卡| 在线不卡一区二区| 国产精品99久久久久| 亚洲精品日韩一| 欧美电影精品一区二区| jlzzjlzz亚洲女人18| 婷婷丁香久久五月婷婷| 国产午夜精品一区二区 | 亚洲综合在线五月| 久久久亚洲国产美女国产盗摄 | 91玉足脚交白嫩脚丫在线播放| 亚洲第一二三四区| 欧美激情中文字幕一区二区| 在线精品视频小说1| 国产一区二区电影| 狠狠色综合日日| 亚洲高清中文字幕| 中文字幕一区二区视频| 欧美成人午夜电影| 欧美日韩不卡一区| 99免费精品在线观看| 激情综合网最新| 午夜视频在线观看一区二区| 欧美国产欧美综合| 精品999久久久| 在线播放日韩导航| 在线视频一区二区三| 99久久国产综合精品女不卡| 美女脱光内衣内裤视频久久网站| 亚洲精品成a人| 国产精品视频麻豆| 国产色产综合色产在线视频| 91精品国产色综合久久| 欧美日韩国产首页| 欧美亚洲综合网| 日本久久一区二区| 91麻豆国产精品久久| 成人福利在线看| 国产成人一区在线| 国产精品1区2区3区| 免费人成精品欧美精品| 亚洲国产美国国产综合一区二区| 亚洲欧洲www| 成人免费在线视频| 国产精品国产三级国产普通话蜜臀| 亚洲精品一线二线三线| 精品三级av在线| 精品日韩av一区二区| 欧美刺激午夜性久久久久久久 | 欧美一区二区三区四区在线观看| 欧美亚洲日本国产| 欧美日本韩国一区二区三区视频 | 欧美一级久久久| 日韩免费成人网| 精品国产91久久久久久久妲己| 91精品国产综合久久福利软件| 91麻豆精品国产91久久久更新时间| 欧美日韩精品一区二区三区四区| 欧美午夜精品电影| 4438亚洲最大| 日韩欧美色综合网站| 久久午夜电影网| 日韩影院在线观看| 免费不卡在线观看| 国产永久精品大片wwwapp| 国产v综合v亚洲欧| 99国产精品国产精品毛片| 欧洲在线/亚洲| 日韩免费电影一区| 欧美国产97人人爽人人喊| 中文字幕亚洲一区二区va在线| 一区二区三区国产精华| 水蜜桃久久夜色精品一区的特点| 麻豆成人综合网| 不卡电影一区二区三区| 91福利社在线观看| 日韩精品一区二| 中文字幕乱码久久午夜不卡| 亚洲尤物视频在线| 激情小说欧美图片| 91福利在线播放| 精品粉嫩aⅴ一区二区三区四区| 国产亚洲欧美日韩在线一区| 亚洲黄色av一区| 韩日av一区二区| 在线看国产一区二区| 精品日本一线二线三线不卡| 亚洲免费观看高清在线观看| 日本午夜一区二区| 色综合天天做天天爱| 日韩欧美在线综合网|