Fields下增加一个AdapterFieldAdapterField的onDisplayText事件代码如下
procedure TPageProducerPage1.AdapterFieldGetDisplayText(Sender: TObject;
var Value: String);
begin
Value:='s';//返回字符串
end;网页中使用下面的语句,其中带有一个参数'asdfg'
<%=EndUser.AdapterField('asdfg').DisplayText%>如何在AdapterField的onDisplayText事件代码中获得所带的参数串?新的获得AdapterField所带参数的onDisplayText事件代码如下
procedure TPageProducerPage1.AdapterFieldGetDisplayText(Sender: TObject;
var Value: String);
var s:string;
begin
Value:='s';//返回字符串 s:=获得所带的参数串;{请问这里如何写,我用的是delphi7} Value:=Value+s;
end;
procedure TPageProducerPage1.AdapterFieldGetDisplayText(Sender: TObject;
var Value: String);
begin
Value:='s';//返回字符串
end;网页中使用下面的语句,其中带有一个参数'asdfg'
<%=EndUser.AdapterField('asdfg').DisplayText%>如何在AdapterField的onDisplayText事件代码中获得所带的参数串?新的获得AdapterField所带参数的onDisplayText事件代码如下
procedure TPageProducerPage1.AdapterFieldGetDisplayText(Sender: TObject;
var Value: String);
var s:string;
begin
Value:='s';//返回字符串 s:=获得所带的参数串;{请问这里如何写,我用的是delphi7} Value:=Value+s;
end;
请高手帮忙!!!!!!
请高手帮忙!!!!!!
请高手帮忙!!!!!!
请高手帮忙!!!!!!
请高手帮忙!!!!!!
请高手帮忙!!!!!!
请高手帮忙!!!!!!