MyInfo=class(TRemotable) private FUnit:string; published propertyUnit:stringreadFUnitwriteFUnit; end;很显然这段代码无法编译通过，因为定义中包含了关键字Unit但是这个是需要传递给别人程序的参数，必须使用U

从客户端上传大量照片（20000张。但总大小只有300M）到远程服务器（findfiel是一个文件搜索控件），但是客户端消耗内存越来越多。最后outof了。怎么回事 zp.Close;zp.SQL.Text:='updatezpsetzp=:zpwherebmh=:bmh';fori:=0toFindFile1.searchforfiles.count-

procedureTfm_main.autoreconnect;begin try Data_sys.SimpleObjectBroker1.SetConnectStatus(Data_sys.DConn.Host,false); fm_main.getnewserver; except begin showm

从客户端上传大量照片（20000张。但总大小只有300M）到远程服务器（findfiel是一个文件搜索控件），但是客户端消耗内存越来越多。最后outof了。怎么回事 zp.Close;zp.SQL.Text:='updatezpsetzp=:zpwherebmh=:bmh';fori:=0toFindFile1.searchforfiles.count-

classLoginTypeArgs:EventArgs { privatestringloginType; publicstringLoginType { get{returnloginType;} } publicLoginTypeArgs(stringloginType

自己做了一个软件，但是在登录画面点击取消(不登陆)，是报错'Accessviolationatadress00520694inmodule'，如果登录后，再退出，就没有任何问题。

请教大家：ifcdsshouliao.ChangeCount>=0then begin ovdata:=cdsshouliao.delta; end; 都可以修改，但就是不修改直接保存时报错：deltaisempty，我知道是因为没修改delta为empty，但应该怎么写哇，求教学哇 

在Delphi中我用DateTimeToStr(StartOfTheDay(Now))后发现显示的是：yyyy-mm-dd-hh:mm:ss请问有人知道为什么会在dd后面有一个‘-’呢？这是怎么原因呢？

代码如下：proceduretform1.runprogram;var I:integer; path:PCHAr;begin I:=listview1.ItemIndex; ifI>=0then begin path:=pchar(listview1.Items[i].SubItems.Tex

已获取颜色表的数据为cBuf(cBuf:Tbyte)，是8位色，长度为1024字节var BitmapInfo:TBitmapInfo; BitmapInfo.bmiHeader.biSize:=sizeof(BITMAPINFOHEADER); BitmapInfo.bmiHeader.biCompression:=BI_RGB