se_shared.pas

来自「小区水费管理系统源代码水费收费管理系统 水费收费管理系统」· PAS 代码 · 共 40 行

{==============================================================================

  Shared Routines for KSDev's products
  Copyright (C) 2000-2002 by Evgeny Kryukov
  All rights reserved

  All contents of this file and all other files included in this archive
  are Copyright (C) 2002 Evgeny Kryukov. Use and/or distribution of
  them requires acceptance of the License Agreement.

  See License.txt for licence information

  $Id: se_shared.pas,v 1.11 2002/10/29 02:41:20 Evgeny Exp $

===============================================================================}

unit se_shared;

{$I se_define.Inc}
{$T-,W-,X+,P+}

interface

uses Messages, Controls;

const

  ksSharedVersion: string = '1.0.0';

{ Paint to bitmap message - paint form content to specified DC
  wParam - Point
  lParam - DC }

  CM_PAINTTOBITMAP      = CM_BASE + 456;


implementation {===============================================================}

end.