umysqlvio.hpp

MYSQL 连接控件 MYSQL 连接控件

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

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

#ifndef uMysqlVioHPP
#define uMysqlVioHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#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 Umysqlvio
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TMysqlVio;
class PASCALIMPLEMENTATION TMysqlVio : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	int FSd;
	int FHPipe;
	int ffcntl_mode;
	Umysqlct::TEnumVioType ftype;
	System::SmallString<200>  flast_error;
	unsigned flast_errno;
	int ftimeout;
	bool fNoTimeOut;
	void __fastcall Setlast_error(const AnsiString Value);
	void __fastcall SetNoTimeOut(const bool Value);
	AnsiString __fastcall Getlast_error();
	int __fastcall fastsend(void);
	int __fastcall keepalive(bool onoff);
	bool __fastcall vio_poll_read(unsigned timeout);
	
public:
	__property int fcntl_mode = {read=ffcntl_mode, nodefault};
	__property AnsiString last_error = {read=Getlast_error, write=Setlast_error};
	__property unsigned last_errno = {read=flast_errno, write=flast_errno, nodefault};
	__property Umysqlct::TEnumVioType VIO_type = {read=ftype, nodefault};
	__property bool NoTimeOut = {read=fNoTimeOut, write=SetNoTimeOut, nodefault};
	__fastcall TMysqlVio(void);
	__fastcall virtual ~TMysqlVio(void);
	int __fastcall vio_read(void * buf, const int sz);
	int __fastcall vio_write(void * buf, int size);
	int __fastcall vio_blocking(bool onoff);
	bool __fastcall vio_intrerupted(void);
	bool __fastcall vio_should_retry(void);
	int __fastcall vio_open(Umysqlct::TEnumVioType _type, AnsiString host = "localhost", AnsiString unix_socket = "MySQL", int port = 0x0, unsigned connect_timeout = (unsigned)(0x0), bool trysock = true);
	int __fastcall vio_close(void);
};


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

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

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