zmysqlreg.~pas

来自「控件名称:WINZEOS.ZIP 2002年08月03日 作者:Capell」· ~PAS 代码 · 共 54 行

~PAS
54
字号
{********************************************************}
{                                                        }
{                 Zeos Database Objects                  }
{            MySql components registration               }
{                                                        }
{       Copyright (c) 1999-2001 Sergey Seroukhov         }
{    Copyright (c) 1999-2001 Zeos Development Group      }
{                                                        }
{********************************************************}

unit ZMySqlReg;

interface

{$IFNDEF LINUX}
{$INCLUDE ..\Zeos.inc}
{$ELSE}
{$INCLUDE ../Zeos.inc}
{$ENDIF}

{$IFNDEF LINUX}
{$INCLUDE ..\ZeosDef.inc}
{$ELSE}
{$INCLUDE ../ZeosDef.inc}
{$ENDIF}

procedure Register;

implementation

uses Classes, ZMySqlCon, ZMySqlTr, ZMySqlQuery, ZMySqlProp,DesignIntf;
;

{ Register components in a component palette }
procedure Register;
begin
  RegisterComponents(ZEOS_DB_PALETTE, [TZMySqlDatabase]);
{$IFDEF WITH_PROPEDIT}
  RegisterPropertyEditor(TypeInfo(string), TZMySqlDatabase, 'Database',
    TZMySqlDatabaseNameProperty);
{$ENDIF}

  RegisterComponents(ZEOS_DB_PALETTE, [TZMySqlTransact]);

  RegisterComponents(ZEOS_DB_PALETTE, [TZMySqlTable]);
  RegisterComponents(ZEOS_DB_PALETTE, [TZMySqlQuery]);
{$IFDEF WITH_PROPEDIT}
  RegisterPropertyEditor(TypeInfo(string), TZMySqlTable, 'TableName',
    TZMySqlTableNameProperty);
{$ENDIF}
end;

end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?