Runtime Error 216 - Trial

Runtime Error 216 - Trial

Postby John Bell » Sun 24 Jul 2005 12:12

D7 Enterprise; mysql 4.1 and your trial version
dropped a connection and query on the datamodule
(with a lot of Woll2Woll tables on it). intending to
convert an old app from bde/paradox to mysql with
your components. when i close the app from the ide,
it either never returns to the ide, or gives me a
runtime error 216. any suggestions?
John Bell
 

Postby Ikar » Tue 26 Jul 2005 07:42

Most likely it is an error of trial protection. Please send a complete sample and we can give you exact answer. Also specify the exact IDE version and your OS version.
Ikar
 
Posts: 1693
Joined: Thu 28 Oct 2004 13:56

Sample

Postby John Bell » Tue 26 Jul 2005 14:01

Very simple sample. first time i run (after cold boot), and
click on close window, i never get back to the ide. use task
manager to close, restarted delphi and this time, when I
closed the window, i got run error 216. third time, i end up
in the cpu trace window. if i reboot the computer, and open
the project up and then run it, i get run time error 216 on
the first go around, then i go into the cpu trace window.

trialbug.dpr
=============================
program trialbug;

uses
Forms,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
================================

Unit1.pas
================================
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBAccess, MyAccess;

type
TForm1 = class(TForm)
MyConnection1: TMyConnection;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

end.
================================

Unit1.dfm
=================================
object Form1: TForm1
Left = 507
Top = 287
Width = 483
Height = 251
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object MyConnection1: TMyConnection
Left = 208
Top = 48
end
end
=================================
John Bell
 

OS and IDE

Postby John Bell » Tue 26 Jul 2005 18:10

Running W2K SP4 and Delphi 7 Enterprise v7.0 (Build 8.1)
John Bell
 

Postby Ikar » Wed 27 Jul 2005 06:57

Please specify exact MyDAC version
Ikar
 
Posts: 1693
Joined: Thu 28 Oct 2004 13:56


Return to MySQL Data Access Components