On Thu, 3 Apr 2003, Eike Lange wrote:
Hi Folks!
By Compiling the following program with the given unit, the compiler throws no warning but fails running.
program Foo;
uses MySQL;
begin WriteLn (MySQLOptConnectTimeout); MySQLOptConnectTimeout := 100; WriteLn (MySQLOptConnectTimeout); end.
{ ======== }
unit MySQL; interface
What if you changed:
var MySQLOptConnectTimeout: Integer;
to:
function MySQLOptConnectTimeout: Integer;
(etc, etc)
Russ