Patch for TZASAResultSet
Posted: 15.05.2009, 13:54
I've modified the UpdateUnicodeString procedure to avoid a compiler warning claiming a dangerous typecast
Code: Select all
procedure TZASAResultSet.UpdateUnicodeString(ColumnIndex: Integer; const Value: WideString);
begin
PrepareUpdateSQLData;
//HA 090515 fix dangerous typecast
//FUpdateSqlData.UpdatePChar( ColumnIndex, PChar( Value));
FUpdateSqlData.UpdatePChar( ColumnIndex, PChar( PWideChar(Value)));
end;