设置AdvEdit1.LabelFont.Color:=clRed;无效

没有设置DBEdit的DataSource1时直接赋值DBEdit1.Text:='22';点击DBEdit1时,默认值会自动清空,怎样让它不清空,也就是把DBEdit1变得和edit一样因为是临时字段这样设置的所以不想换Edit

我写了一个接收clientsocket数据的程序，设了1K的char数组用于接收数据，但是对方发送的数据有时大有时小，小的数据比较好处理，一次接收完成。大的数据需要读几次，但是我不知道如何让char数组，接收数据的时侯能够存储在char数组的任何位置。varstr:string;i:integer;Buf:array[0..1023]ofchar;Len:Integer;

我想在工具栏某个按钮的右上区域动态显示数字，类似360软件管家、软件升级图标上提示的数字，如何实现的

procedureTForm1.Button1Click(Sender:TObject);var n1,n2:Integer;begin n1:=strtoint(inputbox('请输入','请输入武力指数','100')); n2:=strtoint(inputbox('游戏关卡','你要闯第几关（1-3）','100')); 

delphi7用TIdHTTP写抓取指定网页时，被报有毒，有没有其它代替办法？

例如密码:123456,加密后:44c2h5ab4f1e又或者密码:761229,加密后:cNTJfU8LAL0H

代码是从ＣＳＤＮ下的functionStartSpy(dwThreadID:DWORD;hTarget:THandle):boolean;stdcall;begin Result:=false; ifg_bSpyStartthenStopSpy; if(dwThreadID<>0)then 

我现在要查询一个表，并把里面的数据取出来在一个tree上面显示，查询我用的adoquery控件，比如我查tab1表的前10条内容，应该怎么弄呢用其他控件也行。我不知道怎么从结果里面取数据。

怎么用SPSS或其它工具对均匀设计的数据作线性回归