Delphi错误问题请教,在线等谢谢
ProjectProject1.exeraisedexceptionclassEAccessViolationwithmessage'Accessviolationata...
Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 004040CE in module' Project1.exe'.Read of address FFFFFFF9'.
这个错误不是每次都出,有时错有时不错,请指教
我做的是从Access数据库中随机抽内容放入Memo中,但有时不出错,有时是内容都放到Memo中了才出错.究竟是什么问题啊?请教谢谢 展开
这个错误不是每次都出,有时错有时不错,请指教
我做的是从Access数据库中随机抽内容放入Memo中,但有时不出错,有时是内容都放到Memo中了才出错.究竟是什么问题啊?请教谢谢 展开
1个回答
展开全部
大多数情况是因为调用了没创建的对象导致的
看看这两个例子你就明白了
procedure TForm1.Button1Click(Sender: TObject);
var
test: TStringList;
begin
test.Add('111');
//ShowMessage(test.Text);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
test: TStringList;
begin
test := TStringList.Create;
Try
test.Add('111');
//ShowMessage(test.Text);
finally
test.Free;
end;
end;
----------------------------
不知道你抽取的内容是多大的,Memo好象有64K的大小限制,如果内容很大,改用RichEdit
看看这两个例子你就明白了
procedure TForm1.Button1Click(Sender: TObject);
var
test: TStringList;
begin
test.Add('111');
//ShowMessage(test.Text);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
test: TStringList;
begin
test := TStringList.Create;
Try
test.Add('111');
//ShowMessage(test.Text);
finally
test.Free;
end;
end;
----------------------------
不知道你抽取的内容是多大的,Memo好象有64K的大小限制,如果内容很大,改用RichEdit
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询