是個初學者,這里的Delphi的克隆是不能強制轉換的。因為是動態的。
uj5u.com熱心網友回復:
procedure AssignTo(Dest: TPersistent);這個程序是克隆操作。在派生類里要多載這個方法。在這里操作要復制的資料。
以下是ADODB引數的克隆方法。
procedure TParameter.AssignTo(Dest: TPersistent);
procedure AssignToParam(Param: TParam);
begin
Param.Name := Name;
Param.ParamType := TParamType(Direction);
Param.DataType := DataType;
Param.Size := Size;
Param.Precision := Precision;
Param.NumericScale := NumericScale;
Param.Value := Value;
end;
begin
if Dest is TField then
TField(Dest).Value := Value
else if Dest is TParam then
AssignToParam(TParam(Dest)) else
inherited AssignTo(Dest);
end;
uj5u.com熱心網友回復:
能不能加一個QQ我是自學的QQ992951871uj5u.com熱心網友回復:
用型別別的運用怎么搞啊?uj5u.com熱心網友回復:
誰克隆誰呀?
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/56611.html
標籤:語言基礎/算法/系統設計
