小问题

Question

procedure Tydfloorform.Table1FilterRecord(DataSet: TDataSet;
  var Accept: Boolean);
var
t:boolean;
s1,s2:Pchar;
begin
s1:=pchar(combobox1.Text);
s2:=pchar(gjxm.Text );
 if s1='全部' then t:= true
   else t:= (table1.FieldByName('ab').AsString=s1);
  accept:=(strlcomp(pchar(table1.FieldByName('xm').AsString),s2 ,length(s2))=0) and t;问题1：pchar和String有何区别？
问题2：accept:=(strlcomp(pchar(table1.FieldByName('xm').AsString),s2 ,length(s2))=0) and t;
这一句应该怎么理解？

Answer 1

问题1:string Delphi替你管理内存，PChar 要你自己管理内存。
其他没区别不大，相互可以强制转化，都是以\0结尾。不过WinAPI函数都要用PChar。
问题2：看到Accept: Boolean就知道什么意思了