求助 把下面一段（Delphi）代码 编译成C#形式
Delphi, CB：procedure TFPProcess.SaveFPData(AQuery: TADOQuery; AFingerID: Integer; AFPData: OleVariant);var pData: PChar;begin with AQuery do begin Close; SQL.Clear; SQL.Add('SELECT * FROM zkFingerPrint WHERE FingerID = ' + IntToStr(AFingerID)); Open; if IsEmpty then Append else Edit; FieldByName('FingerID').Value := AFingerID; //保存指纹模板 with TBlobStream(CreateBlobStream(FieldByName('Template'), bmWrite)) do begin pData := VarArrayLock(AFPData); try Write(pData^, VarArrayHighBound(AFPData, 1) - VarArrayLowBound(AFPData, 1) + 1); finally VarArrayUnlock(AFPData); end; Free; end; Post; Close; end;end;procedure TFPProcess.GetFPData(AQuery: TADOQuery; AFingerID: Integer; var AFPData: OleVariant);var pData: PChar;begin with AQuery do begin Close; SQL.Clear; SQL.Add('SELECT * FROM zkFingerPrint WHERE FingerID = ' + IntToStr(AFingerID)); Open; //读取数据 if not IsEmpty then with TBlobStream(CreateBlobStream(FieldByName('Template'), bmRead)) do begin AFPData := VarArrayCreate([0, Size + 1], varByte); pData := VarArrayLock(AFPData); try Read(pData^, Size); finally VarArrayUnlock(AFPData); end; Free; end; Close; end;end;