DelphiX无缘无故引起的Access Violation问题！
新建unit2,贴上下面代码：
unit Unit2;
interface
uses
Forms,DXDraws;
type TDX=class
DirectX:TDXDraw;
constructor Create(Owner:TForm);
destructor Free();
end;
implementation
constructor TDX.Create(Owner:TForm);
begin
if DirectX=nil then begin
DirectX:=TDXDraw.Create(Owner);
DirectX.Parent:=Owner;
DirectX.Initialize();
DirectX.Visible:=true;
end;
end;
destructor TDX.Free();
begin
if DirectX <>nil then begin
DirectX.Free();DirectX:=nil;
end;
end;
end.
在主unit里加入下面代码(记得在uses里添加DXDraws,unit2)：
procedure TForm1.Button1Click(Sender: TObject);
var i:Integer;dx:array [0..1] of TDX;
begin
for i:=1 to 2 do begin //第2次发生错误
dx[0]:=TDX.Create(Self);
dx[1]:=TDX.Create(Self);
dx[0].Free();dx[0]:=nil;
dx[1].Free();dx[1]:=nil;
end;
end;
它有2次循环，第1次没发生错误，第2次循环时发生错误。我试过达到这样的条件时才会有错：1.必须是以类的形式把DelphiX包含在类里，2.必须是数组,例如dx,如果是单个则不会发生错误.
指针释放好像没问题，到底是什么问题？谢谢！
dx[0]:=TDX.Create(Self);
dx[0].Free();dx[0]:=nil;
这样试一下
dx[1]:
相关问答：
我的数据库是简体sqlserver2000 ,我想在繁体access下连接,通过odbc是可以了,但在access下出现打开的表全中"#已删除"
不知道要怎么操作才可以用ACCESS繁体连接简体sqlserver2000.谢谢!!!
大家都 ......
哪里出错了，输出这样的结果？？
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
它的定义是这样的
_CRTIMP __checkReturn int __cdecl _access(__in_z const char * _Filename, __in int _AccessMode);
大哥，看个函数声明就能看出他干啥的？
从命名来看应该是判� ......
如何将Excel数据导入Access数据库?,
表名:crk
不顶不行
excel可以直接作为数据库操作
使用ADO然后搞进去
procedure TExInput.Excel1Click(Sender: TObject); //实现Excel导入SQL
var
& ......
我把sql的数据库换为access数据库，只修改了连接文件，其它的都没有改变，出现错误(0x80004005)
無法指出的錯誤。
function returnrsByParam(strsql,con,cursor_type,lock_type,options)
......
