次のようなもののバイト単位のサイズを決定する方法はありますか
TItem <T> = record
Data : T;
end;
のようなものを書くことができますか
function TItem <T>.GetByteSize : Integer;
begin
if (T = String) then
Result := GetStringByteSize (Data as String)
else
Result := SizeOf (Data);
end;
それとも専門化の助けを借りて?
function TItem <String>.GetByteSize : Integer;
begin
Result := GetStringByteSize (Data)
end;
function TItem <T>.GetByteSize : Integer;
begin
Result := SizeOf (Data);
end;
ありがとう!