TStringList <> nil ,但访问TStringList.Text出现地址错误,为什么?怎么判断出不能访问TStringList.Text?
解决方案 »
- 怎么将edit框的内容赋值到 wdata 数组里呢??只有一个edit1框
- EXCEL如何Copy选写RANGE的范围?
- 这个sql语句怎么写?
- 请教如何在delphi中操纵excel,望穿浑水等待中...
- 如何在一个存储过程中调用另一个存储过程,共用同一个参数?在线.....
- 一个关于FORM问题
- 有没有在程序中动态修改自定义纸张大小的方法?
- 请教对于treeview的操作。。
- 报表的问题TQRDbtext的属性中autosize=false ,autostretch=true 后的问题?
- 关于delphi函数,计算点到直线的距离。。。。。。50分!!
- delphi中如何设置弹出对话框呀,解决了就马上给分~!!!
- 我的服务器端只放数据,通过adoconnection直接指定服务器ip地址,客户端安装应用程序。然后直接从客户端向服务器发送和接受数据,数据传
先用GetText看看取出来的是不是空。
没要用.text
添加字符串直接add() or append()方法。为什么要用stringlist.text呢?
procedure TForm1.Button2Click(Sender: TObject);
begin
s:= TStringList.Create;
//s.Append('a');
//s.Append('b');
s.SetText('tt');
//s.Add('ldskfj');
if s.GetText <> '' then showmessage(s.GetText) else showmessage('nil');
end;
加上s:= TStringList.Create;应该没有错误了。s为你定义的TStringList类型!
用Assigned检查,
Index越界?http://lysoft.7u7.net
try ... except 来判断要不, 你每次释放时, 用 FreeAndNil(StringList);