var thefilename:string;
begin
if filelist.itemindex>=0 then
begin
thefilename:=filelist.items[filelist.itemindex];//为什么[]里输入filelist.后只显示有items而没有itemindex。
filepanel.caption:=thefilename;
end;
....
end;
begin
if filelist.itemindex>=0 then
begin
thefilename:=filelist.items[filelist.itemindex];//为什么[]里输入filelist.后只显示有items而没有itemindex。
filepanel.caption:=thefilename;
end;
....
end;
解决方案 »
- 请问:如何比较两个tstringlist是否有相同值呢?
- 请问如何利用日期进行排序,大小如何比较
- 对查询结果的处理
- 两台打印机(一个CANON喷墨,一个EPSON针打),一次只能连接一台打印机,如何用程序确定当前所连接的打印机?
- ADO的疑问
- 谁有异步socket程序的源代码?不是用控件的那种,给最高100分
- 关于corba之event service
- 请问想要截获word的保存动作该如何实现?
- 各位老兄,delphi的codeinsight除了能用ctrl+space调出来还能用其的方法么
- 关于数据存储的问题??
- 样用 WebBrowser 登陆 论坛??( 比如CSDN)
- daisy8675(莫依)你给我进来,我有话要说!
implementation
uses
fmxutils,fattrdlg,fchngdlg;问一下这两个到底是什么了?fmxutils是自定义的单元