问一个问题,MDISA里,我需要服务端接受到数据后在服务端的一个FORM里面显示,我在客户端的一个'时间'字段用DisplayFormat := 'HH":"N

问一个问题,MDISA里,我需要服务端接受到数据后在服务端的一个FORM里面显示,我在客户端的一个'时间'字段用DisplayFormat := 'HH":"NN":"SS'格式化后,显示正常,但送到服务端后显示又恢复到原来状态,怎么办?(20分)<br />procedure TWatchSever.WS_DataSetProviderAfterUpdateRecord(Sender: TObject;
SourceDS: TDataSet;
DeltaDS: TClientDataSet;
UpdateKind: TUpdateKind);
begin

TDateField(DeltaDS.FieldByName('时间')).DisplayFormat := 'HH":"NN":"SS';
//在这里我添加数据,并且格式化,但是没有用
MainForm.AddChildStr(DeltaDS.FieldByName('客户名').AsString,
DeltaDS.FieldByName('事件类型').AsString,
DeltaDS.FieldByName('事件描述').AsString,
DeltaDS.FieldByName('时间').AsString,
DeltaDS.FieldByName('日期').AsString )
end;

与机器上控制面板中时间/日期格式有关吧。在控制面板中改一下试一试。

客户端的显示格式与后台数据库的存储格式是无关的

........
MainForm.AddChildStr(DeltaDS.FieldByName('客户名').OldValue,
DeltaDS.FieldByName('事件类型').OldValue,
DeltaDS.FieldByName('事件描述').OldValue,
DeltaDS.FieldByName('时间').OldValue,
DeltaDS.FieldByName('日期').OldValue)

//在这里我添加数据,并且格式化,但是没有用
MainForm.AddChildStr(DeltaDS.FieldByName('客户名').AsString,
DeltaDS.FieldByName('事件类型').AsString,
DeltaDS.FieldByName('事件描述').AsString,
FormatDateTime('hh:nn:ss', DeltaDS.FieldByName('时间').AsDateTime),
DeltaDS.FieldByName('日期').AsString )

多人接受答案了。