Archivado/Componentes.Terceros.MyDAC
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Importación inicial

Browse Source 
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.MyDAC/internal@2 3346b395-6983-df4c-9436-dd2a26bad8f4
This commit is contained in:
David Arranz 2008-06-13 15:19:37 +00:00
parent 28526c73a4
commit aab2016bf5
103 changed files with 2779 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

697
5.50.0.34/1/FAQ.html Normal file
View File

@ -0,0 +1,697 @@
<!doctype html public "-//w3c//dtd html 4.0 Transitional//en">
<html>
<head>
<title>Frequently Asked Questions</title>
<style>
body {
overflow: hidden;
margin: 0px 0px 0px 0px;
padding: 0px 0px 0px 0px;
background: #ffffff;
color: #000000;
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 70%;
width: 100%;
}
p
{
margin: .5em 0em .5em 0em;
}
ol, ul
{
margin-top: .5em;
}
li
{
margin-bottom: .5em;
}
ul p, ol p, dl p
{
margin-left: 0em;
}
blockquote.dxOverload
{
margin: .5em 1.5em .5em 1.5em;
}
h1, h2, h3, h4
{
font-family: Verdana, Arial, Helvetica, sans-serif;
margin-bottom: .4em;
margin-top: 1em;
font-weight: bold;
}
h1
{
font-size: 120%;
margin-top: 0em;
}
h2
{
font-size: 130%;
}
h3
{
font-size: 115%;
}
h4
{
font-size: 100%;
}
.dxH1, .dxH2, .dxH3, .dxH4
{
margin-left: -18px;
}
A
{
color: #0000FF;
}
A:link
{
color: #0000FF;
}
A:active
{
color: #000080;
}
A:visited
{
color: #800080;
}
A:hover
{
color: #FF0000;
}
pre
{
font-family: Courier New;
font-size: 9pt;
color: #000060;
margin-top: 0px;
}
code, p.example, p.sourcecode, table.sourcecode, tr.sourcecode, td.sourcecode
{
font-family: Courier New;
font-size: 9pt;
color: #000060;
}
div#pagetop {
margin: 0px;
padding: 0px;
background-color: #99ccff;
height: 44;
width: 100%;
border-bottom: 1px solid #999999;
}
div#pagebody {
margin: 0px 0px 0px 0px;
padding: 5px 10px 0px 22px;
height: 90%;
width: 100%;
overflow: auto;
background-color: #FFFFFF;
vertical-align: top;
}
table#BannerTable
{
width: 100%;
height: 100%;
border-collapse:collapse;
font-family: Verdana, Arial, Helvetica, sans-serif;
}
table#BannerTable td
{
padding-left: 8px;
padding-right: 8px;
}
tr#BannerTopRow
{
font-style: italic;
font-size: 70%;
}
tr#Banner2ndRow
{
font-weight: bold;
font-size: 80%;
}
table.filtereditemlisttable, table.xmldoctable
{
width: 95%;
margin-top: .6em;
margin-bottom: .3em;
border-width: 1px 1px 0px 0px;
border-style: solid;
border-color: #999999;
background-color: #999999;
font-size: 100%;
border-collapse:collapse;
}
table.filtereditemlisttable th, table.filtereditemlisttable td, table.xmldoctable th, table.xmldoctable td
{
/* border-style: solid; */
border-width: 0px 0px 1px 1px;
border-style: solid;
border-color: #999999;
padding: 4px 6px;
text-align: left;
vertical-align: top;
}
table.filtereditemlisttable th, table.xmldoctable th
{
background: #cccccc;
vertical-align: bottom;
}
table.filtereditemlisttable td, table.xmldoctable td
{
background-color: #ffffff;
vertical-align: top;
}
table.desctable
{
margin-top: .6em;
margin-bottom: .3em;
border-width: 1px 1px 0px 0px;
border-style: solid;
border-color: #999999;
background-color: #999999;
font-size: 100%;
}
table.desctable th, table.desctable td
{
border-style: solid;
border-width: 0px 0px 1px 1px;
border-style: solid;
border-color: #999999;
padding: 4px 6px;
text-align: left;
vertical-align: top;
}
table.desctable th
{
background: #cccccc;
vertical-align: bottom;
}
table.desctable td
{
background: #ffffff;
vertical-align: top;
}
span.Q
{
font-weight: bold;
color: #000088;
}
span.A
{
color: #000000;
}
span#Category
{
font-weight: 600;
font-size: 110%;
}
</style>
<script>
var Engine;
var enOpera = 'Opera';
var enIE = 'IE';
var enGecko = 'Gecko';
function TestEngine()
{
if (document.all) {
if (window.opera) {
Engine = enOpera;
}
else {
Engine = enIE;
}
}
else {
Engine = enGecko;
}
}
function RunningInCHM()
{
var wstr = document.location.href.substr(0,14);
return (wstr == 'mk:@MSITStore:');
}
function RunningInHxS()
{
var wstr = document.location.href.substr(0,10);
return (wstr == 'ms-help://');
}
function RunningInHost()
{
return RunningInCHM() || RunningInHxS();
}
function AdjustContentSize()
{
var cDiv = document.getElementById("pagebody");
if ((Engine == enGecko)||(Engine == enOpera))//amend padding
{
var w = document.body.clientWidth;
cDiv.style.width = w - 32;
}
var h = document.body.clientHeight;
var diff = 44;
if ((Engine == enGecko)||(Engine == enOpera)) diff = diff + 6;
cDiv.style.height = h - diff;
}
function Startup()
{
//add startup code here
}
</script>
</head>
<body onresize="AdjustContentSize()" onload="Startup()">
<div id="pagetop">
<table id="BannerTable">
<tr id="BannerTopRow">
<td>Data Access Components for MySQL</td>
<td align="right">mydac@crlab.com</td>
</tr>
<tr id="Banner2ndRow">
<td>Frequently Asked Questions</td>
<td>&nbsp;</td>
</tr>
</table>
</div>
<div id="pagebody" valign="bottom">
<!-- begin content -->
<p>
This page contains a list of Frequently Asked Questions for Data Access Components for MySQL.
</p>
<p>
If you have encounter a question with using MyDAC, please browse through this list first. If this page does not answer your question, refer to the Getting Support topic in MyDAC help.
</p>
<div id="InsertHere">
</div>
<p>&nbsp;</p>
<span id="Category">Installation and Deployment</span>
<ol>
<li>
<span id="Qx" class="Q">I am having a problem installing MyDAC or compiling MyDAC-based projects...</span><br>
<span class="A">
<p>
You may be having a compatibility issue that shows up in one or more of the following forms:<p>
<ul>
<li>Get a "Setup has detected already installed DAC packages which are incompatible with current version" message during MyDAC installation.
<li>Get a "Procedure entry point ... not found in ... " message when starting IDE.
<li>Get a "Unit ... was compiled with a different version of ..." message on compilation.
</ul>
<p>
You can have such problems if you installed incompatible MyDAC, SDAC, ODAC or IBDAC versions. All these products use common base packages. The easiest way to avoid the problem is to uninstall all installed DAC products and then download from our site and install the last builds.</p></span>
</li>
<li>
<span id="Qx" class="Q">What software should be installed on a client computer for MyDAC-based applications to work?</span><br>
<span class="A">
<p>Usually, you do not need any additional files. The only exceptions to this rule are listed below:</p><p>
<ul>
<li>If you are using MySQL Embedded server (if you are using TMyConnection with TMyConnection.Options.Embedded = True or TMyEmbConnection), you need the server itself (<i>libmysqld.dll</i>) and the service files for it, for example <i>errmsg.sys</i>.</li>
<li>If you are connecting in Client mode, (TMyConnection.Options.Direct = False), you need <i>libmysql.dll</i>.</li>
<li>If you are using SSL (TMyConnection.Options.Protocol = mpSSL), you need the OpenSSL library files - <i>ssleay32.dll</i> and <i>libeay32.dll</i>.</li>
</ul></p>
</span>
</li>
<li>
<span id="Qx" class="Q">When I try to install MyDAC packages under Kylix, I get an "Invalid package" error.</span><br>
<span class="A"><p>Probably you are using Kylix Open Edition. MyDAC does not support this version of Kylix.</p></span>
</li>
<li>
<span id="Qx" class="Q">When I try to connect to the server, I get an error "MySQL client library couldn't be loaded."</span><br>
<span class="A"><p>You are using TMyConnection.Options.Direct := False mode and the client library is not
available for your application. <br>
<u>Windows:</u> You should copy client file libmysql.dll to a folder available to the executable unit of your program.
For example, to the folder containing the executable or to the Windows system folder. For more details, see the
description of LoadLibrary and the PATH environment variable. <br>
<u>Linux:</u> You should copy the client file libmysqlclient.so.X to the folder available to the executable unit of
your program. For more details, see the description of the dlopen function and the LD_LIBRARY_PATH environment
variable.</p></span>
</ol>
<span id="Category">Licensing and Subscriptions</span>
<ol>
<li>
<span id="Qx" class="Q">Am I entitled to distribute applications written with MyDAC?</span><br>
<span class="A"><p>If you have purchased a full version of MyDAC, you are entitled to distribute pre-compiled programs created with its use. You are not entitled to propagate any components inherited from MyDAC or using MyDAC source code. For more information see the <i>License.rtf</i> file in your MyDAC installation directory.</p></span>
</li>
<li>
<span id="Qx" class="Q">Can I create components using MyDAC?</span><br>
<span class="A">
<p>You can create your own components that are inherited from MyDAC or that use the MyDAC source code. You are entitled to sell and distribute compiled application executables that use such components, but not their source code and not the components themselves.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">What licensing changes can I expect with MyDAC 5.00?</span><br>
<span class="A">
<p>The basic MyDAC license agreement will remain the same. With MyDAC 5.00, the <a href="http://www.crlab.com/mydac/#editionmatrix">MyDAC Edition Matrix</a> will be reorganized and a new <a href="#subscriptionprogram">MyDAC Subscription Program</a> will be introduced.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">What do the MyDAC 5.00 Edition Levels correspond to?</span><br>
<span class="A">
<p>MyDAC 5.00 will come in six editions: Trial, Standard, Professional, Professional with Sources, Developer, and Developer with Sources.</p>
<p>When you upgrade to the new version, your edition level will be automatically updated using the following Edition Correspondence Table.</p><br>
<center>
<b>Edition Correspondence Table for Upgrading to MyDAC 5.00</b>
<table width = "550" class="desctable" cellspacing="0" >
<tr><th width="50%">Old Edition Level</th><th>New Edition Level</th></tr>
<tr><td><i>- No Correspondence -</i></td><td>MyDAC Standard Edition</td></tr>
<tr><td>MyDAC Standard Edition</td><td>MyDAC Professional Edition</td></tr>
<tr><td>MyDAC Professional Edition</td><td>MyDAC Professional Edition with Sources</td></tr>
<tr><td><i>- No Correspondence -</i></td><td>MyDAC Developer Edition</td></tr>
<tr><td><i>- No Correspondence -</i></td><td>MyDAC Developer Edition with Sources</td></tr>
<tr><td>MyDAC Trial Edition</td><td> MyDAC Trial Edition</td></tr>
</table></center><br>
<p>
The feature list for each edition can be found in the MyDAC documentation and on the <a href="http://www.crlab.com/mydac/#editionmatrix">MyDAC website</a>.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">I have a registered version of MyDAC. Will I need to pay to upgrade to future versions?</span><br>
<span class="A">
<p>After MyDAC 5.00, all upgrades to future versions are free to users with an active MyDAC Subscription.</p>
<p>Users that have a registration for versions of MyDAC prior to MyDAC 5.00 will have to first upgrade to MyDAC 5.00 to jump in on the Subscription program.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">What are the benefits of the MyDAC Subscription Program?</span><br>
<span class="A">
<p><a href="#subscriptionprogram"></a>The <b>MyDAC Subscription Program</b> is an annual maintenance and support service
for MyDAC users.</p>
<p>Users with a valid MyDAC Subscription get the following benefits:</p>
<ul>
<li>Access to new versions of MyDAC when they are released
<li>Access to all MyDAC updates and bug fixes
<li>Product support through the MyDAC Priority Support program
<li>Notification of new product versions
</ul>
<p><b>Priority Support</b> is an advanced product support program which offers you expedited individual assistance with MyDAC-related questions from the MyDAC developers themselves. Priority Support is carried out over email and has a two business day response policy.</p>
<p>The MyDAC Subscription Program is available for registered users of MyDAC 5.00 and higher.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">Can I use my version of MyDAC after my Subscription expires?</span><br>
<span class="A">
<p>Yes, you can. MyDAC version licenses are perpetual.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">I want a MyDAC Subscription! How can I get one?</span><br>
<span class="A">
<p>An annual MyDAC Subscription is included when ordering or upgrading to any registered (non-Trial) edition of MyDAC 5.00 or higher.</p>
<p>You can renew your MyDAC Subscription on the <a href="http://www.crlab.com/mydac/ordering.html">MyDAC Ordering Page</a>. For more information, please contact <a href="mailto:sales@crlab.com">sales@crlab.com</a>.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">Does this mean that if I upgrade to MyDAC 5 from MyDAC 4, I'll get an annual MyDAC Subscription for free?</span><br>
<span class="A">
Yes.
</span>
</li>
<li>
<span id="Qx" class="Q">How do I upgrade to MyDAC 5.00?</span><br>
<span class="A">
<p>To upgrade to MyDAC 5.00, you can get a Version Update from the <a href="http://www.crlab.com/mydac/ordering.html">MyDAC Ordering Page</a>. For more information, please contact <a href="mailto:sales@crlab.com">sales@crlab.com</a>.</p>
</span>
</li>
</ol>
<span id="Category">Performance</span>
<ol>
<li>
<span id="Qx" class="Q">How productive is MyDAC?</span><br>
<span class="A"><p>MyDAC uses a low-level protocol to access the database server. This allows MyDAC to achieve high performance. From time to time we compare MyDAC with other products, and MyDAC always takes first place.</p></span>
</li>
<li>
<span id="Qx" class="Q">Why does the Locate function work so slowly the first time I use it?</span><br>
<span class="A"><p>Locate is performed on the client. So if you had set FetchAll to False when opening your dataset, cached only some of the rows on the client, and then invoked Locate, MyDAC will have to fetch all the remaining rows from the server before performing the operation. On subsequent calls, Locate should work much faster.</p>
<p>
If the Locate method keeps working slowly on subsequent calls or you are working with FetchAll=True, try the following. Perform local sorting by a field that is used in the Locate method. Just assign corresponding field name to the IndexFieldNames property.</p></span>
</li>
</ol>
<span id="Category">How To</span>
<ol>
<li>
<span id="Qx" class="Q">How can I enable syntax highlighting in MyDAC component editors at design time?</span><br>
<span class="A"><p>Download and install <A HREF="http://crlab.com/mysqldevtools/">MySQL Developer Tools</A>. In addition to syntax highlighting, MySQL Developer Tools provides a lot of <A HREF="http://crlab.com/mysqldevtools/features.html">additional features</A>.<br>
Alternatively, you can download and install the freeware <A HREF="http://synedit.sourceforge.net/">SynEdit component set</A>.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">How can I quickly convert a project from BDE to MyDAC?</span><br>
<span class="A"><p>To quickly migrate your project from BDE you can use the BDE Migration Wizard. To start it, open your project and choose BDE Migration Wizard from the MySQL menu of your IDE.</p></span>
</li>
<li>
<span id="Qx" class="Q">How can I determine which version of MyDAC I am using?</span><br>
<span class="A"><p>You can determine your MyDAC version number in several ways:
<ul>
<li>During installation of MyDAC, consult the MyDAC Installer screen.
<li>After installation, see the <i>history.html</i> file in your MyDAC installation directiory.
<li>At design-time, select MySQL | About MyDAC from the main menu of your IDE.
<li>At run-time, check the value of the MydacVersion and DACVersion constants.
</ul></p>
</span>
</li>
<li>
<span id="Qx" class="Q">How can I stop the cursor from changing to an hour glass during query execution?</span><br>
<span class="A"><p>Just set the DBAccess.ChangeCursor variable to False anywhere in your program. The cursor will stop changing after this command is executed.</p></span>
</li>
<li>
<span id="Qx" class="Q">How can I execute a query saved in the SQLInsert, SQLUpdate, SQLDelete, or SQLRefresh properties of a MyDAC dataset?</span><br>
<span class="A"><p>The values of these properties are templates for query statements, and they cannot be manually executed. Usually there is no need to fill these properties because the text of the query is generated automatically.</p>
<p> In special cases, you can set these properties to perform more complicated processing during a query. These properties are automatically processed by MyDAC during the execution of the Post, Delete, or RefreshRecord methods, and are used to construct the query to the server. Their values can contain parameters with names of fields in the underlying data source, which will be later replaced by appropriate data values. </p>
<p>For example, you can use the SQLInsert template to insert a row into a query instance as follows.</p>
<ol>
<li>Fill the SQLInsert property with the parameterized query template you want to use.
<li>Call Insert.
<li>Initialize field values of the row to insert.
<li>Call Post.
</ol>
<p>The value of the SQLInsert property will then be used by MyDAC to perform the last step.</p>
<p>Setting these properties is optional and allows you to automatically execute additional SQL statements, add calls to stored procedures and functions, check input parameters, and/or store comments during query execution. If these properties are not set, the MyDAC dataset object will generate the query itself using the appropriate insert, update, delete, or refresh record syntax.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">How can I get a list of the databases on the server?</span><br>
<span class="A"><p>Use the TMyConnection.GetDatabaseNames method.</p></span>
</li>
<li>
<span id="Qx" class="Q">How can I get a list of the tables list in a database?</span><br>
<span class="A">Use the TMyConnection.GetTableNames method.</span>
</li>
<li>
<span id="Qx" class="Q">Some questions about the visual part of MyDAC</span><br>
<span class="A"><p>
The following situations usually arise from the same problem:
<ul>
<li>I set the Debug property to True but nothing happens!
<li>While executing a query, the screen cursor does not change to an hour-glass.
<li>Even if I have LoginPromp set to True, the connect dialog does not appear.
</ul>
To fix this, you should add the MyDacVcl (for Windows) or MyDacClx (for Linux) unit to the uses clause of your project.</p></span>
</li>
</ol>
<span id="Category">General Questions</span><br>
<ol>
<li>
<span id="Qx" class="Q">I would like to develop an application that works with MySQL Server. Should I use MyDAC or DbxMda?</span><br>
<span class="A"><p><a href="http://www.crlab.com/dbx/">DbxMda</a> is our dbExpress driver for MySQL. dbExpress technology serves for providing a more or less uniform way to access different servers (SQL Server, MySQL, Oracle and so on). It is based on drivers that include server-specific features. Like any universal tool, in many specialized cases dbExpress providers lose some functionality. For example, the dbExpress design-time is quite poor and cannot be expanded.</p>
<p>MyDAC is a specialized set of components for MySQL, which has advanced server-specific design-time and a component interface similar to that of BDE.</p>
<p>We tried to include maximal support of MySQL-specific features in both DbxMda and MyDAC. However, the nature of dbExpress technology has some insurmountable restrictions. For example, Unicode fields cannot be passed from a driver to dbExpress.</p>
<p>MyDAC and DbxMda use the same kernel and thus have similar performance. In some cases dbExpress is slower because data undergoes additional conversion to correspond to dbExpress standards.</p>
<p>To summarise, if it is important for you to be able to quickly adapt your application to a database server other than MySQL, it is probably better to use DbxMda. In other cases, especially when migrating from BDE or ADO, you should use MyDAC. </span>
</li>
<li>
<span id="Qx" class="Q">Are the MyDAC connection components thread-safe?</span><br>
<span class="A"><p>Yes, MyDAC is thread-safe but there is a restriction. The same TMyConnection object cannot be used in several threads. So if you have a multithreaded application, you should have a TMyConnection object for each thread that uses MyDAC.</p></span>
</li>
<li>
<span id="Qx" class="Q">Behaviour of my application has changed when I upgraded MyDAC. How can I restore the old behaviour with the new version?</span><br>
<span class="A"><p>We always try to keep MyDAC compatible with previous versions, but sometimes we have to change behaviour of MyDAC in order to enhance its functionality, or avoid bugs. If either of changes is undesirable for your application, and you want to save the old behaviour, please refer to the "Compatibility with previous versions" topic in MyDAC help. This topic describes such changes, and how to revert to the old MyDAC behaviour.</p></span>
</li>
<li>
<span id="Qx" class="Q">When editing a DataSet, I get an exception with the message 'Update failed. Found %d records.' or 'Refresh failed. Found %d records.'
</span><br>
<span class="A"><p>This error occurs when the database server is unable to determine which record to modify or delete. In other words, there are either more than one record or no records that suit the UPDATE criteria. Such situation can happen when you omit the unique field in a SELECT statement (TCustomDADataSet.SQL) or when another user modifies the table simultaneously. This exception can be suppressed. Refer to TCustomMyDataSet.Options.StrictUpdate topic in MyDAC help for more information.</p>
</span>
</li>
<li>
<span id="Qx" class="Q">I have problems using BIGINT and INT UNSIGNED fields as key fields in master/detail relationships, and accessing values of such fields through the Field.Value property.</span><br>
<span class="A"><p>Fields of this type are represented in Delphi by TLargeIntField objects. In some versions of Delphi, you cannot access these fields through the Value property (for more information see the SetVarValue protected method of TLargeintField in the DB unit). To avoid this problem, you can change the field type to INT, which is usually sufficient for key fields. Alternatively, you can avoid using Value. <br/>
For master/detail relationships the problem can be avoided only by changing type of the key field to INT, as Delphi's master/detail mechanism works through Field.Value.</p></span>
</li>
<li>
<span id="Qx" class="Q">On accessing server I get a 'MySQL server has gone away' or 'Lost connection to MySQL server during query' error.</span><br>
<span class="A"><p>First of all, you should find out what causes the problem. The list of most frequent reasons for this error to occur is below.</p>
<ul>
<li> Client side: The value of TMyConnection.ConnectionTimeout or TCustomMyDataSet.CommandTimeout is too small. To check this hypothesis, try setting TCustomMyDataSet.CommandTimeout to 0 (infinitive) and TMyConnection.ConnectionTimeout to 300.
<li> Server side: MySQL server has closed the connection. You can read a detailed description of all possible reasons for this to happen in the <A HREF="http://dev.mysql.com/doc/mysql/en/gone-away.html">MySQL Reference Manual</A>. Almost always it is because the value of wait_timeout variable is too small. Try increasing it. If this solution is not possible (for example, because you don't have enough rights), you should invoke MyConnection.Ping with an interval less than wait_timeout. Use TTimer in TMyConnection thread to accomplish this task.
<li> Unstable connection (GPRS etc). In case of unstable connection you can adapt MyDAC to work in such conditions by changing some of its settings. For more information please see the "Working in Unstable Networks" article in the MyDAC help documentation.
</ul>
<p>If the connection is lost, MyDAC tries to reconnect to server. However, your last command will probably not be executed, and you should repeat it again. MyDAC does not try to reconnect if a transaction has started or if at least one of statements is prepared.</p>
</span>
<li>
<span id="Qx" class="Q">Some problems using TCustomDADataSet.FetchAll=False mode</span><br>
<span class="A"><p>The following problems may appear when using FetchAll=False mode:</p>
<ul>
<li>I have problems working with temporary tables.
<li>I have problems working with transactions.
<li>Sometimes my application hangs on applying changes to the database.
</ul>
<p>Usage of FetchAll=False mode has many advantages; however, it also has some restrictions since it requires an additional connection to server for data fetching to be created. The additional connection is created to prevent the main connection from blocking.</p>
<p>These problems can be avoided by setting the FetchAll property. Please see description of the FetchAll propery and the CreateConnection option in MyDAC help for more information.</p>
<p>Another alternative that prevents the application from hanging is to switch to the InnoDB storage engine from MyISAM (FetchAll stays False). An application may hang because MyISAM tables can get locked in a read/write collision. If you try to update a table that is not fetched out, MySQL blocks the thread and waits untill the table is completely fetched. For details please refer to the MySQL Reference Manual, the <a href="http://dev.mysql.com/doc/mysql/en/locking-issues.html" target="_blank">Locking Issues</a> section.</p></span>
</li>
<li>
<span id="Qx" class="Q">I get an error when opening a Stored Procedure that returns a result set.</span><br>
<span class="A">Probably this is a bug of the MySQL Server protocol with prepared stored procedures that return record sets. It occurs in the following cases:
<ul>
<li>After a call to the Prepare method of MyStoredProc, if the latter had already prepared and opened. The following piece of code demonstrates the problem:
<pre class="code">
MyStoredProc.Prepare;
MyStoredProc.Open;
MyStoredProc.UnPrepare;
MyStoredProc.Prepare;
</pre>
</li>
<li>After a call to the MyStoredProc.Execute method, if the stored procedure returns more than one record set.</li>
</span>
</li>
</ol>
<!-- end content -->
<p>&nbsp;</p><p>&nbsp;</p><hr size=1>
<p>&copy; 2002-2008 Core Lab. All rights reserved.</p>
</div>
<script>
function CreateAnchor(aName)
{
var anc;
if (Engine == enIE)
{
anc = document.createElement('<a name="' + aName + '"></a>');
anc.href = '';
}//IE
else
{
anc = document.createElement("a");
anc.href = '';
anc.name = aName;
}//Mozilla, Opera
return anc;
}
function BuildTOC()
{
var str = "";
var coll = document.getElementsByTagName('span');
var i;
var theSpan;
var InsertHere = document.getElementById("InsertHere");
var firstBR = document.createElement("br");
InsertHere.insertBefore(firstBR, InsertHere.lastChild);
for (i=0;i<coll.length;++i)
{
theSpan = coll[i];
if (theSpan.id == "Qx")
{
var anc = CreateAnchor('q' + i);
var theHref = document.createElement("a");
theHref.href = "#q" + i;
theHref.innerHTML = theSpan.innerHTML;
InsertHere.insertBefore(theHref, InsertHere.lastChild);
var theBR = document.createElement("br");
InsertHere.insertBefore(theBR, InsertHere.lastChild);
theSpan.insertBefore(anc, theSpan.firstChild);
}
if (theSpan.id == "Category")
{
var theCaption = document.createElement("h4");
theCaption.innerHTML = theSpan.innerHTML;
theCaption.className = "dxH4";
InsertHere.insertBefore(theCaption, InsertHere.lastChild);
}
}
InsertHere.removeChild(firstBR);
}
TestEngine();
BuildTOC();
AdjustContentSize();
</script>
</body>
</html>

6
5.50.0.34/1/Help/CRControls.HxA Normal file
View File

@ -0,0 +1,6 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpAttributes>
<HelpAttributes
DTDVersion="1.0">
</HelpAttributes>

22
5.50.0.34/1/Help/CRControls.HxC Normal file
View File

@ -0,0 +1,22 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpCollection>
<HelpCollection
DTDVersion="1.0"
FileVersion="2.00.0.0"
LangId="1033"
Title="Core Lab VCL Controls"
Copyright="Core Lab">
<AttributeDef File="CRControls.HxA" />
<TOCDef File="CRControls.HxT" />
<KeywordIndexDef File="CRControlsK.HxK" />
<KeywordIndexDef File="CRControlsF.HxK" />
<KeywordIndexDef File="CRControlsN.HxK" />
<ItemMoniker Name="!DefaultToc" ProgId="HxDs.HxHierarchy" InitData="" />
<ItemMoniker Name="!DefaultFullTextSearch" ProgId="HxDs.HxFullTextSearch" InitData="" />
<ItemMoniker Name="!DefaultKeywordIndex" ProgId="HxDs.HxIndex" InitData="K" />
<ItemMoniker Name="!DefaultAssociativeIndex" ProgId="HxDs.HxIndex" InitData="A" />
<ItemMoniker Name="!DefaultContextWindowIndex" ProgId="HxDs.HxIndex" InitData="F" />
<ItemMoniker Name="!DefaultNamedUrlIndex" ProgId="HxDs.HxIndex" InitData="NamedUrlIndex"/>
</HelpCollection>

9
5.50.0.34/1/Help/CRControls.HxT Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpTOC>
<HelpTOC
DTDVersion="1.0"
PluginStyle="Hierarchical"
PluginTitle="Core Lab VCL Controls">
<HelpTOCNode NodeType="TOC" Url="CRControls"/>
</HelpTOC>

BIN
5.50.0.34/1/Help/CRControls.hxs Normal file
View File

Binary file not shown.

9
5.50.0.34/1/Help/CRControlsF.HxK Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex DTDVersion = "1.0"
Name = "F"
Title="F-Keyword Index"
Visible="No"
LangId="1033">
</HelpIndex>

10
5.50.0.34/1/Help/CRControlsK.HxK Normal file
View File

@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex
DTDVersion = "1.0"
Name = "K"
Title="K-Keyword Index"
Visible="Yes"
LangId="1033">
</HelpIndex>

26
5.50.0.34/1/Help/CRControlsN.HxK Normal file
View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex
DTDVersion = "1.0"
Name="NamedUrlIndex"
AutoInclude = "Yes"
Merge="Yes"
Sort="Yes"
Title="NIndex"
Visible="No"
LangId="1033">
<Keyword Term="HomePage">
<Jump Url = "Overview.html"/>
</Keyword>
<Keyword Term="DefaultPage" Ref="HomePage"/>
<Keyword Term="AboutPageInfo">
<Jump Url = "AboutInfo.html"/>
</Keyword>
<Keyword Term="AboutPageIcon">
<Jump Url = "AboutIcon.html"/>
</Keyword>
</HelpIndex>

6
5.50.0.34/1/Help/MyDac.HxA Normal file
View File

@ -0,0 +1,6 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpAttributes>
<HelpAttributes
DTDVersion="1.0">
</HelpAttributes>

22
5.50.0.34/1/Help/MyDac.HxC Normal file
View File

@ -0,0 +1,22 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpCollection>
<HelpCollection
DTDVersion="1.0"
FileVersion="2.00.0.0"
LangId="1033"
Title="Data Access Components for MySQL"
Copyright="Core Lab">
<AttributeDef File="MyDac.HxA" />
<TOCDef File="MyDac.HxT" />
<KeywordIndexDef File="MyDacK.HxK" />
<KeywordIndexDef File="MyDacF.HxK" />
<KeywordIndexDef File="MyDacN.HxK" />
<ItemMoniker Name="!DefaultToc" ProgId="HxDs.HxHierarchy" InitData="" />
<ItemMoniker Name="!DefaultFullTextSearch" ProgId="HxDs.HxFullTextSearch" InitData="" />
<ItemMoniker Name="!DefaultKeywordIndex" ProgId="HxDs.HxIndex" InitData="K" />
<ItemMoniker Name="!DefaultAssociativeIndex" ProgId="HxDs.HxIndex" InitData="A" />
<ItemMoniker Name="!DefaultContextWindowIndex" ProgId="HxDs.HxIndex" InitData="F" />
<ItemMoniker Name="!DefaultNamedUrlIndex" ProgId="HxDs.HxIndex" InitData="NamedUrlIndex"/>
</HelpCollection>

9
5.50.0.34/1/Help/MyDac.HxT Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpTOC>
<HelpTOC
DTDVersion="1.0"
PluginStyle="Hierarchical"
PluginTitle="Data Access Components for MySQL">
<HelpTOCNode NodeType="TOC" Url="MyDac"/>
</HelpTOC>

BIN
5.50.0.34/1/Help/MyDac.hxs Normal file
View File

Binary file not shown.

9
5.50.0.34/1/Help/MyDacF.HxK Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex DTDVersion = "1.0"
Name = "F"
Title="F-Keyword Index"
Visible="No"
LangId="1033">
</HelpIndex>

10
5.50.0.34/1/Help/MyDacK.HxK Normal file
View File

@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex
DTDVersion = "1.0"
Name = "K"
Title="K-Keyword Index"
Visible="Yes"
LangId="1033">
</HelpIndex>

26
5.50.0.34/1/Help/MyDacN.HxK Normal file
View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE HelpIndex>
<HelpIndex
DTDVersion = "1.0"
Name="NamedUrlIndex"
AutoInclude = "Yes"
Merge="Yes"
Sort="Yes"
Title="NIndex"
Visible="No"
LangId="1033">
<Keyword Term="HomePage">
<Jump Url = "Overview.html"/>
</Keyword>
<Keyword Term="DefaultPage" Ref="HomePage"/>
<Keyword Term="AboutPageInfo">
<Jump Url = "AboutInfo.html"/>
</Keyword>
<Keyword Term="AboutPageIcon">
<Jump Url = "AboutIcon.html"/>
</Keyword>
</HelpIndex>

4
5.50.0.34/1/Help/_BatchLog.txt Normal file
View File

@ -0,0 +1,4 @@
04.04.2008 10:35:17
04.04.2008 10:35:17 @-------- Start Batch Job ---------@
04.04.2008 10:35:17
04.04.2008 10:35:17 Batch Log File: "d:\Projects\Delphi\MyDac\Help\BDS\_BatchLog.txt"

1158
5.50.0.34/1/History.html Normal file
View File

File diff suppressed because it is too large Load Diff

BIN
5.50.0.34/1/Lib/D10/CLRClasses.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRAccess.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRBatchMove.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRConnectionPool.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRGrid.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRGrid.res Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRParser.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/CRXml.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DAConsts.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DADump.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DALoader.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DASQLMonitor.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DAScript.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DAVersionInfo.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DBAccess.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DBAccess.res Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DBMonitorClient.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DBMonitorIntf.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/DacVcl.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MTSCall.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MemDS.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MemData.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MemUtils.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyAccess.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyBackup.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyBuilderClient.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyBuilderIntf.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyCall.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyClasses.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyConnectForm.dcu Normal file
View File

Binary file not shown.

156
5.50.0.34/1/Lib/D10/MyConnectForm.dfm Normal file
View File

@ -0,0 +1,156 @@
object MyConnectForm: TMyConnectForm
Left = 368
Top = 255
ActiveControl = edUsername
BorderIcons = []
BorderStyle = bsDialog
Caption = 'Connect'
ClientHeight = 243
ClientWidth = 291
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object Panel: TPanel
Left = 8
Top = 8
Width = 273
Height = 189
Anchors = [akLeft, akTop, akBottom]
BevelInner = bvRaised
BevelOuter = bvLowered
FullRepaint = False
TabOrder = 0
object lbUsername: TLabel
Left = 16
Top = 20
Width = 73
Height = 13
AutoSize = False
Caption = 'Username'
Layout = tlCenter
end
object lbPassword: TLabel
Left = 16
Top = 54
Width = 73
Height = 13
AutoSize = False
Caption = 'Password'
Layout = tlCenter
end
object lbServer: TLabel
Left = 16
Top = 88
Width = 73
Height = 13
AutoSize = False
Caption = 'Server'
Layout = tlCenter
end
object lbPort: TLabel
Left = 16
Top = 122
Width = 73
Height = 13
AutoSize = False
Caption = 'Port'
Layout = tlCenter
end
object lbDatabase: TLabel
Left = 16
Top = 156
Width = 73
Height = 13
AutoSize = False
Caption = 'Database'
Layout = tlCenter
end
object edUsername: TEdit
Left = 104
Top = 16
Width = 153
Height = 21
AutoSelect = False
MaxLength = 32767
TabOrder = 0
OnExit = edExit
end
object edPassword: TEdit
Left = 104
Top = 50
Width = 153
Height = 21
AutoSelect = False
MaxLength = 32767
PasswordChar = '*'
TabOrder = 1
OnExit = edExit
end
object edServer: TComboBox
Left = 104
Top = 84
Width = 153
Height = 21
DropDownCount = 10
ItemHeight = 13
TabOrder = 2
OnDropDown = edServerDropDown
OnExit = edExit
end
object edPort: TEdit
Left = 104
Top = 118
Width = 153
Height = 21
TabOrder = 3
OnExit = edExit
end
object edDatabase: TComboBox
Left = 104
Top = 152
Width = 153
Height = 21
DropDownCount = 10
ItemHeight = 13
TabOrder = 4
OnDropDown = edDatabaseDropDown
OnExit = edExit
end
end
object btConnect: TButton
Left = 52
Top = 209
Width = 89
Height = 25
Anchors = [akLeft, akBottom]
Caption = 'Connect'
Default = True
TabOrder = 1
OnClick = btConnectClick
end
object btCancel: TButton
Left = 148
Top = 209
Width = 89
Height = 25
Anchors = [akLeft, akBottom]
Cancel = True
Caption = 'Cancel'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 2
ParentFont = False
TabOrder = 2
end
end

255
5.50.0.34/1/Lib/D10/MyConnectForm.pas Normal file
View File

@ -0,0 +1,255 @@
//////////////////////////////////////////////////
// Data Access Components for MySQL
// Copyright © 1998-2008 Core Lab. All right reserved.
// Connect Form
//////////////////////////////////////////////////
{$IFNDEF CLR}
unit MyConnectForm;
{$ENDIF}
interface
uses
{$IFNDEF LINUX}
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls,
{$ELSE}
SysUtils, Types, Classes, QGraphics, QControls, QForms, QDialogs, QStdCtrls,
QExtCtrls,
{$ENDIF}
DBAccess, MyCall, MyAccess, TypInfo;
type
TMyConnectForm = class(TForm)
Panel: TPanel;
lbUsername: TLabel;
lbPassword: TLabel;
lbServer: TLabel;
edUsername: TEdit;
btConnect: TButton;
btCancel: TButton;
edPassword: TEdit;
edServer: TComboBox;
lbPort: TLabel;
lbDatabase: TLabel;
edPort: TEdit;
edDatabase: TComboBox;
procedure btConnectClick(Sender: TObject);
procedure edServerDropDown(Sender: TObject);
procedure edDatabaseDropDown(Sender: TObject);
procedure edExit(Sender: TObject);
private
FConnectDialog: TCustomConnectDialog;
FRetries: integer;
FOldCreateOrder: boolean;
FRetry: boolean;
FListGot: boolean;
procedure SetConnectDialog(Value: TCustomConnectDialog);
protected
procedure DoInit; virtual;
procedure DoConnect; virtual;
public
published
property ConnectDialog: TCustomConnectDialog read FConnectDialog write SetConnectDialog;
property OldCreateOrder: boolean read FOldCreateOrder write FOldCreateOrder;
end;
implementation
{$IFDEF IDE}
{$R *.dfm}
{$ENDIF}
{$IFNDEF LINUX}
{$R MyConnectForm.dfm}
{$ELSE}
{$R *.xfm}
{$ENDIF}
procedure TMyConnectForm.DoInit;
var
PropInfo: PPropInfo;
VisibleEditors: integer;
StepH, DeltaH, T: integer;
begin
FRetry := False;
FRetries := FConnectDialog.Retries;
Caption := FConnectDialog.Caption;
FListGot := False;
with FConnectDialog do begin
lbUsername.Caption := UsernameLabel;
lbPassword.Caption := PasswordLabel;
lbServer.Caption := ServerLabel;
btConnect.Caption := ConnectButton;
btCancel.Caption := CancelButton;
edUsername.Text := Connection.Username;
edPassword.Text := Connection.Password;
edServer.Text := Connection.Server;
if (edUsername.Text <> '') and (edPassword.Text = '') then
ActiveControl := edPassword;
end;
VisibleEditors := 3;
PropInfo := GetPropInfo(FConnectDialog, 'PortLabel');
if PropInfo <> nil then
lbPort.Caption := GetStrProp(FConnectDialog, PropInfo);
PropInfo := GetPropInfo(FConnectDialog, 'DatabaseLabel');
if PropInfo <> nil then
lbDatabase.Caption := GetStrProp(FConnectDialog, PropInfo);
PropInfo := GetPropInfo(FConnectDialog, 'ShowPort');
if PropInfo <> nil then begin
lbPort.Visible := Boolean(GetOrdProp(FConnectDialog, PropInfo));
edPort.Visible := lbPort.Visible;
if edPort.Visible then
Inc(VisibleEditors);
end;
StepH := edPassword.Top - edUsername.Top;
PropInfo := GetPropInfo(FConnectDialog, 'ShowDatabase');
if PropInfo <> nil then begin
lbDatabase.Visible := Boolean(GetOrdProp(FConnectDialog, PropInfo));
edDatabase.Visible := lbDatabase.Visible;
if edDatabase.Visible then begin
Inc(VisibleEditors);
if edPort.Visible then
T := edPort.Top
else
T := edServer.Top;
edDatabase.Top := T + StepH;
lbDatabase.Top := edDatabase.Top + (lbUsername.Top - edUsername.Top);
end;
end;
DeltaH := ClientHeight - Panel.Height;
ClientHeight := StepH * VisibleEditors + 19 + DeltaH;
if FConnectDialog.Connection is TCustomMyConnection then begin
edDatabase.Text := TCustomMyConnection(FConnectDialog.Connection).Database;
end;
if FConnectDialog.Connection.ClassName = 'TMyEmbConnection' then begin
lbServer.Enabled := False;
edServer.Enabled := False;
lbPort.Enabled := False;
edPort.Enabled := False;
end
else begin
lbServer.Enabled := True;
edServer.Enabled := True;
lbPort.Enabled := True;
edPort.Enabled := True;
end;
if FConnectDialog.Connection is TMyConnection then begin
edPort.Text := IntToStr(TMyConnection(FConnectDialog.Connection).Port);
end;
end;
procedure TMyConnectForm.DoConnect;
begin
try
edExit(nil);
FConnectDialog.Connection.PerformConnect(FRetry);
ModalResult := mrOk;
except
on E: EDAError do begin
Dec(FRetries);
FRetry := True;
if FRetries = 0 then
ModalResult:= mrCancel;
case E.ErrorCode of
ER_ACCESS_DENIED_ERROR: ActiveControl := edUsername;
CR_UNKNOWN_HOST: ActiveControl := edServer;
end;
raise;
end
else
raise;
end;
end;
procedure TMyConnectForm.SetConnectDialog(Value: TCustomConnectDialog);
begin
FConnectDialog := Value;
DoInit;
end;
procedure TMyConnectForm.btConnectClick(Sender: TObject);
begin
DoConnect;
end;
procedure TMyConnectForm.edServerDropDown(Sender: TObject);
var
OldCursor: TCursor;
begin
if FListGot then
Exit;
FListGot := True;
OldCursor := Screen.Cursor;
Screen.Cursor := crSQLWait;
try
FConnectDialog.GetServerList(edServer.Items);
finally
Screen.Cursor := OldCursor;
end;
end;
procedure TMyConnectForm.edDatabaseDropDown(Sender: TObject);
var
OldCursor: TCursor;
OldLoginPrompt: boolean;
begin
if not (FConnectDialog.Connection is TCustomMyConnection) then
Exit;
edDatabase.Items.Clear;
OldLoginPrompt := FConnectDialog.Connection.LoginPrompt;
OldCursor := Screen.Cursor;
Screen.Cursor := crSQLWait;
try
FConnectDialog.Connection.LoginPrompt := False;
GetDatabasesList(TCustomMyConnection(FConnectDialog.Connection), edDatabase.Items);
finally
FConnectDialog.Connection.LoginPrompt := OldLoginPrompt;
Screen.Cursor := OldCursor;
end;
end;
procedure TMyConnectForm.edExit(Sender: TObject);
begin
try
FConnectDialog.Connection.Password := edPassword.Text;
FConnectDialog.Connection.Server := edServer.Text;
FConnectDialog.Connection.UserName := edUsername.Text;
if FConnectDialog.Connection is TCustomMyConnection then begin
TCustomMyConnection(FConnectDialog.Connection).Database := edDatabase.Text;
end;
if FConnectDialog.Connection is TMyConnection then begin
TMyConnection(FConnectDialog.Connection).Port := StrToInt(edPort.Text);
end;
except
ActiveControl := Sender as TWinControl;
raise;
end;
end;
initialization
if GetClass('TMyConnectForm') = nil then
Classes.RegisterClass(TMyConnectForm);
end.

BIN
5.50.0.34/1/Lib/D10/MyConnectionPool.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyConsts.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyDacMonitor.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyDump.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyEmbConnection.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyLoader.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyParser.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySQLMonitor.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyScript.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyScriptProcessor.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyServerControl.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MyServices.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlApi.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlApiDirect.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlBind.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlErrors.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlNet.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlResultSet.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlSSL.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlSession.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlStmt.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlType.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlVio.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlVioPipe.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlVioTcp.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MySqlVioTcpSSL.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/MydacVcl.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/VirtualTable.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/Win32Timer.dcu Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/crcontrols100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/crcontrols100.dcp Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dac100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dac100.dcp Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dacvcl100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dacvcl100.dcp Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/datasetmanager100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dcldac100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dclmydac100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/dclmysqlmon100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mydac100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mydac100.dcp Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mydacvcl100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mydacvcl100.dcp Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mymigwizard100.dll Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mysqlmon100.bpl Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Lib/D10/mysqlmon100.dcp Normal file
View File

Binary file not shown.

42
5.50.0.34/1/License.rtf Normal file
View File

@ -0,0 +1,42 @@
{\rtf1\ansi\ansicpg1251\deff0{\fonttbl{\f0\fnil\fcharset204{\*\fname Courier New;}Courier New CYR;}{\f1\fnil\fcharset0 Courier New;}{\f2\fnil\fcharset2 Symbol;}}
\viewkind4\uc1\pard\lang1049\f0\fs20 Data Access Components for MySQL Developer License Agreement\par
Copyright 1997-200\lang1033\f1 8\lang1049\f0 , Core Lab. All Rights Reserved\par
--------------------------------------------------\par
\par
\b PLEASE READ THIS LICENSE AGREEMENT CAREFULLY. BY\lang1033\f1 \lang1049\f0 INSTALLING OR USING THIS SOFTWARE, YOU INDICATE\lang1033\f1 \lang1049\f0 ACCEPTANCE OF AND AGREE TO BECOME BOUND BY THE\lang1033\f1 \lang1049\f0 TERMS AND CONDITIONS OF THIS LICENSE. IF YOU DO\lang1033\f1 \lang1049\f0 NOT AGREE TO THE TERMS OF THIS LICENSE, DO NOT\lang1033\f1 \lang1049\f0 INSTALL OR USE THIS SOFTWARE AND PROMPTLY RETURN\lang1033\f1 \lang1049\f0 IT TO CORE LAB.\b0\par
\par
INTRODUCTION\par
\par
This is a legal agreement between you (either an individual\lang1033\f1 \lang1049\f0 or an entity), the end-user, and Core Lab. \par
\par
LICENSE\par
\par
1. GRANT OF LICENSE\par
\par
This License Agreement grants you the next:\par
Software may be used by a single developer who uses the software\lang1033\f1 \lang1049\f0 personally on one or more computers.\par
\par
2. COPYRIGHT\par
\par
The Software is owned by Core Lab and is protected by\lang1033\f1 \lang1049\f0 international copyright laws and treaty provisions.\lang1033\f1 \lang1049\f0 You may not remove the copyright notice from any copy of the\lang1033\f1 \lang1049\f0 Software or any copy of the written materials, if any,\lang1033\f1 \lang1049\f0 accompanying the Software. \par
\par
3. RESTRICTIONS\par
\par
The license grants using MyDAC for a single person. The license grants you a non-exclusive right to compile,\par
reproduce, and distribute any new software programs created\lang1033\f1 \lang1049\f0 using MyDAC. You can distribute MyDAC only in compiled executable\lang1033\f1 \lang1049\f0 programs.\par
\par
You may not:\par
\par
\pard{\pntext\f2\'B7\tab}{\*\pn\pnlvlblt\pnf2\pnindent0{\pntxtb\'B7}}\fi568\li568 Distribute and sell any portion of the Software without\lang1033\f1 \lang1049\f0 integrating it into your Applications as Executable Code, except Trial edition that can be distributed free as original Core Lab's MyDAC Trial package;\par
{\pntext\f2\'B7\tab}Use any part of the source code of the Software (original or modified) to build any other components for public distribution or commercial sale;\par
{\pntext\f2\'B7\tab}Build any other components through inheritance for public distribution or commercial sale;\par
{\pntext\f2\'B7\tab}Remove or alter any Core Lab's copyright, trademark, or other proprietary rights notice contained in any portion of Core Lab units, source code, or other files that bear such a notice;\par
\pard\par
All Core Lab's units, source code, and other files remain Core Lab's\lang1033\f1 \lang1049\f0 exclusive property.\par
\par
4. SUPPORT\par
\par
Core Lab makes no representation or warranty that the software or\lang1033\f1 \lang1049\f0 documentation are "error-free", or meet any user's particular\lang1033\f1 \lang1049\f0 standards, requirements, or needs. In all events, Core Lab will\lang1033\f1 \lang1049\f0 exercise tech support of the\lang1033\f1 \lang1049\f0 Software.\par
\par
}

303
5.50.0.34/1/ReadMe.html Normal file
View File

@ -0,0 +1,303 @@
<!doctype html public "-//w3c//dtd html 4.0 Transitional//en">
<html>
<head>
<title>Data Access Components for MySQL Readme</title>
<meta http-equiv="Content-Type" content="text/html">
<style>
body {
overflow: hidden;
margin: 0px 0px 0px 0px;
padding: 0px 0px 0px 0px;
background: #ffffff;
color: #000000;
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 70%;
width: 100%;
}
p
{
margin: .5em 0em .5em 0em;
}
ol, ul
{
margin-top: .5em;
}
li
{
margin-bottom: .5em;
}
ul p, ol p, dl p
{
margin-left: 0em;
}
blockquote.dxOverload
{
margin: .5em 1.5em .5em 1.5em;
}
h1, h2, h3, h4
{
font-family: Verdana, Arial, Helvetica, sans-serif;
margin-bottom: .4em;
margin-top: 1em;
font-weight: bold;
}
h1
{
font-size: 120%;
margin-top: 0em;
}
h2
{
font-size: 130%;
}
h3
{
font-size: 115%;
}
h4
{
font-size: 100%;
}
.dxH1, .dxH2, .dxH3, .dxH4
{
margin-left: -18px;
}
A
{
color: #0000FF;
}
A:link
{
color: #0000FF;
}
A:active
{
color: #000080;
}
A:visited
{
color: #800080;
}
A:hover
{
color: #FF0000;
}
pre
{
font-family: Courier New;
font-size: 9pt;
color: #000060;
margin-top: 0px;
}
code, p.example, p.sourcecode, table.sourcecode, tr.sourcecode, td.sourcecode
{
font-family: Courier New;
font-size: 9pt;
color: #000060;
}
div#pagetop {
margin: 0px;
padding: 0px;
background-color: #99ccff;
height: 44;
width: 100%;
border-bottom: 1px solid #999999;
}
div#pagebody {
margin: 0px 0px 0px 0px;
padding: 5px 10px 0px 22px;
height: 90%;
width: 100%;
overflow: auto;
background-color: #FFFFFF;
vertical-align: top;
}
table#BannerTable
{
width: 100%;
height: 100%;
border-collapse:collapse;
font-family: Verdana, Arial, Helvetica, sans-serif;
}
table#BannerTable td
{
padding-left: 8px;
padding-right: 8px;
}
tr#BannerTopRow
{
font-style: italic;
font-size: 70%;
}
tr#BannerTopRow td
{
padding-top: 4px;
}
tr#Banner2ndRow
{
font-weight: bold;
font-size: 80%;
}
tr#Banner2ndRow td
{
padding-bottom: 4px;
}
table.filtereditemlisttable, table.xmldoctable
{
width: 95%;
margin-top: .6em;
margin-bottom: .3em;
border-width: 1px 1px 0px 0px;
border-style: solid;
border-color: #999999;
background-color: #999999;
font-size: 100%;
border-collapse:collapse;
}
table.filtereditemlisttable th, table.filtereditemlisttable td, table.xmldoctable th, table.xmldoctable td
{
border-width: 0px 0px 1px 1px;
border-style: solid;
border-color: #999999;
padding: 4px 6px;
text-align: left;
vertical-align: top;
}
table.filtereditemlisttable th, table.xmldoctable th
{
background: #cccccc;
vertical-align: bottom;
}
table.filtereditemlisttable td, table.xmldoctable td
{
background-color: #ffffff;
vertical-align: top;
}
</style>
<script>
var Engine;
var enOpera = 'Opera';
var enIE = 'IE';
var enGecko = 'Gecko';
function TestEngine()
{
if (document.all) {
if (window.opera) {
Engine = enOpera;
}
else {
Engine = enIE;
}
}
else {
Engine = enGecko;
}
}
function AdjustContentSize()
{
var cDiv = document.getElementById("pagebody");
if ((Engine == enGecko)||(Engine == enOpera))//amend padding
{
var w = document.body.clientWidth;
cDiv.style.width = w - 32;
}
var h = document.body.clientHeight;
var diff = 44;
if ((Engine == enGecko)||(Engine == enOpera)) diff = diff + 6;
cDiv.style.height = h - diff;
}
function Startup()
{
//add startup code here
}
</script>
</head>
<body onresize="AdjustContentSize()" onload="Startup()">
<div id="pagetop">
<table id="BannerTable">
<tr id="BannerTopRow">
<td>Data Access Components for MySQL</td>
<td align="right">mydac@crlab.com</td>
</tr>
<tr id="Banner2ndRow">
<td>Readme</td>
<td>&nbsp;</td>
</tr>
</table>
</div>
<div id="pagebody">
<!-- begin content -->
<h4 class="dxH4">Product Description</h4>
<p>
Data Access Components for MySQL (MyDAC) is a library of components that provides direct access to MySQL database servers from Delphi, Delphi for .NET, C++Builder and Kylix. MyDAC can connect directly to MySQL server or work through the MySQL client library. The MyDAC library is designed to help programmers develop faster and cleaner MySQL database applications. MyDAC is a complete replacement for standard MySQL connectivity solutions and presents an efficient alternative to the Borland Database Engine for access to MySQL.
</p>
<h4 class="dxH4">Requirements</h4>
<p>
If you use MyDAC to connect to MySQL in Direct mode, you do not need to install MySQL client library on your machine or deploy it with your MyDAC-based application. Detailed requirements for all other cases can be found in the Requirements topic in the MyDAC Help documentation. Direct mode is enabled by default.
</p>
<h4 class="dxH4">Installation</h4>
<p>
Compiled versions of MyDAC are installed automatically by the MyDAC Installer for all supported IDEs except Kylix. Versions of MyDAC with Source Code must be installed manually. For more information, see the Installation topic of the MyDAC Help documentation.
</p>
<p>
It is important to know that ODAC, SDAC, MyDAC, and IBDAC components use the common base packages, so product compatibility is provided for the current build only.
In the other words, if you upgrade one of the installed products, it
may conflict with older builds of other products. In order to continue using
the products simultaneously, you should upgrade all of them at the same time.
</p>
<h4 class="dxH4">Documentation and informational resources</h4>
<p>
MyDAC comes with full documentation, which includes a detailed reference for all the MyDAC components and classes and set of articles
that highlight MyDAC advanced functionality.
The MyDAC documentation is integrated into your IDE at install time.
It can be invoked from the MySQL menu added to the Menu Bar, or by pressing F1 in an object inspector or on a selected code segment.
<!-- You can also download the documentation in <b>chm</b>
format from <a href="http://crlab.com/mydac/download.html" target="_blank">our site</a>. -->
</p>
<p>
If you have a question regarding MyDAC, look at the list of
<a href="FAQ.html">Frequently Asked Questions</a> or visit the MyDAC forum online at
<a href="http://crlab.com/forums/viewforum.php?f=7" target="_blank">http://crlab.com/forums/viewforum.php?f=7</a>.
</p>
<p>
If your problem is not covered in the documentation, FAQ, or forum, refer to the Getting Support topic in MyDAC help
for information on how to contact the MyDAC support team.
</p>
<!-- end content -->
<p>&nbsp;</p><p>&nbsp;</p><hr size=1>
<p>&copy; 1997-2008 Core Lab. All rights reserved.</p>
</div>
<script>
TestEngine();
AdjustContentSize();
</script>
</body>
</html>

BIN
5.50.0.34/1/Uninstall/HelpReg.exe Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Uninstall/InnovaHxReg.exe Normal file
View File

Binary file not shown.

BIN
5.50.0.34/1/Uninstall/InstallicoImage.bmp Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 4.1 KiB

Some files were not shown because too many files have changed in this diff Show More