lpr_h.pas

能够实现汽车的车牌定位并且最终识别车牌字符

(*
* Copyright (c) 2003, try2it.com
* All rights reserved.
*
* This program is free software; you can redistribute it and/or modify it under
* the terms of the GNU General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option) any later
* version.
* 
* This program is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
* details.
* 
* You should have received a copy of the GNU General Public License along with
* this program; if not, write to the Free Software Foundation, Inc., 59 Temple
* Place - Suite 330, Boston, MA 02111-1307, USA.

* 文件名称：LPR_h.pas
* 文件标识：LPR-02-02
* 摘要：牌照识别车牌识别调用头文件

* 当前版本：1.0
* 作者：王正平
* 完成日期：2003年09月16日
*)

unit LPR_h;

{$X+}{$Z2}{$A4}

interface
  uses windows;

{$IFNDEF _LPR_H_PAS_}
{$DEFINE _LPR_H_PAS_}

  const LPRDLL = 'LPR.dll';

  // 车牌颜色索引
  type TColorID = (LP_BLACK=0, LP_BLUE, LP_YELLOW, LP_WHITE);

  // 车牌位置
  type TMyRect = record
    left: Integer;
    right: Integer;
    top: Integer;
    bottom: Integer;
  end;

  // 返回结果结构
  type TLPInfo = record
    LPNum: array[0..15] of char;        // 车牌号码
    LPColor: TColorID;                  // 车牌颜色
    LPRect: TMyRect;                    // 车牌在图像中的位置
  end;
  type PLPInfo = ^TLPInfo;

  // 初始化
  function InitLPRDll(hwnd: HWND; var version: WORD): Integer;stdcall;external LPRDLL;
  // 识别主函数
  function GetLPR(var LPInfo: TLPInfo; pBuf: PChar): Integer;stdcall;external LPRDLL;

{$ENDIF}(* _LPR_H_PAS_ *)
implementation

end.