umysqlnet.hpp

MYSQL 连接控件 MYSQL 连接控件

// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'uMysqlNet.pas' rev: 6.00

#ifndef uMysqlNetHPP
#define uMysqlNetHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <uMysqlVio.hpp>	// Pascal unit
#include <uMysqlCT.hpp>	// Pascal unit
#include <uMysqlErrors.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Umysqlnet
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TMysqlNet;
class PASCALIMPLEMENTATION TMysqlNet : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	Umysqlvio::TMysqlVio* fvio;
	bool fcompress;
	Byte freading_or_writing;
	void *fbuff;
	Byte fpkt_nr;
	int fmax_packet;
	int fwrite_pos;
	int fread_pos;
	int fbuf_length;
	int fwhere_b;
	int fremain_in_buf;
	char fsave_char;
	unsigned fprotocol_version;
	void __fastcall Setlast_error(const AnsiString Value);
	AnsiString __fastcall Getlast_error();
	void __fastcall Setlast_errorno(const unsigned Value);
	unsigned __fastcall Getlast_errorno(void);
	void __fastcall setcompress(const bool Value);
	bool __fastcall GetNetConnected(void);
	Umysqlct::TEnumVioType __fastcall GetVioType(void);
	void __fastcall SetNoTimeOut(const bool Value);
	bool __fastcall GetNoTimeOut(void);
	
public:
	__property AnsiString last_error = {read=Getlast_error, write=Setlast_error};
	__property unsigned last_errno = {read=Getlast_errorno, write=Setlast_errorno, nodefault};
	__property int read_pos = {read=fread_pos, nodefault};
	__property unsigned protocol_version = {read=fprotocol_version, write=fprotocol_version, nodefault};
	__property bool compress = {read=fcompress, write=setcompress, nodefault};
	__property bool net_connected = {read=GetNetConnected, nodefault};
	__property Umysqlct::TEnumVioType vio_type = {read=GetVioType, nodefault};
	__property bool NoTimeOut = {read=GetNoTimeOut, write=SetNoTimeOut, nodefault};
	__fastcall TMysqlNet(void);
	__fastcall virtual ~TMysqlNet(void);
	int __fastcall net_open(Umysqlct::TEnumVioType VioType, AnsiString host = "localhost", AnsiString unix_socket = "MySQL", int port = 0x0, unsigned connect_timeout = (unsigned)(0x0), bool trysock = true);
	int __fastcall net_close(void);
	bool __fastcall net_pack(void);
	bool __fastcall net_realloc(unsigned len1);
	void __fastcall net_clear(void);
	int __fastcall net_flush(void);
	int __fastcall my_net_write(const char * packet, unsigned len1);
	int __fastcall net_write_command(char command, const char * packet, unsigned len1);
	int __fastcall net_write_buff(char * packet, int len1);
	int __fastcall net_real_write(char * packet1, int len1);
	int __fastcall my_real_read(int &complen);
	int __fastcall my_net_read(void);
	int __fastcall net_safe_read(void);
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Umysqlnet */
using namespace Umysqlnet;
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// uMysqlNet