uGridUtils -> fallo en la función 'FindRecordEx' que podía producir errores de violación de memoria.

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@521 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2010-06-22 16:05:27 +00:00
parent 4ecbf9930e
commit 0c042482c0

View File

@ -88,6 +88,9 @@ var
AList: TList;
AKeyValue: Variant;
begin
if not Assigned(RecordInfo) then
Exit;
I := 0;
ARecordIndex := AView.DataController.FindRecordIndexByKey(RecordInfo.KeyValues);
Result := nil;