procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
if not Treeview1.Selected.HasChildren then
begin
with informationSQLQuery do
begin
    SQL.Clear;
    Active:=false;
    SQL.Add('select * from information where id='''+inttostr(Treeview1.Selected.StateIndex)+'''');
    Active:=true;
    try
    loadtemp := TMemoryStream.Create;
    TBlobField(FieldByName('Message')).SaveToStream(loadtemp);
    loadtemp.Position := 0;
    RichEdit1.Lines.LoadFromStream(loadtemp);
    Active:=false;
    finally
    loadtemp.Free;
    end;
end;
end;
end;上面为程序的片断,目的:当TreeView改变时,将相应的数据库内容读到Richedit中。操作:我不停的点击TreeView的节点来测试读出内容是否有错!错误码提示:当不停的点击来改变节点时出现"'0x00401d49'指令引用的'0x0115e080'内存。该内存不能为'written'."请问是否不停点击时stream还没load完就有下一次的load所引发的错误????
请问如何解决以及出现"'0x00401d49'指令引用的'0x0115e080'内存。该内存不能为'XXXXXXXXX'等情况如何处理???????多谢!!
再次多谢!!!