Here is the fix to IBODataset.pas:

function TIBODataset.LocateRecord( const AKeyFields: string;
const AKeyValues: Variant;
AOptions: TLocateOptions;
SyncCursor: boolean;
LocateNearest: boolean ): boolean;
begin
CheckBrowseMode; // Add this line of code here in place of CheckActive.
Result := InternalDataset.LocateRecord( AKeyFields,
AKeyValues,
TIB_LocateOptions( AOptions ),
SyncCursor,
LocateNearest );
if Result then
begin

Jason Wharton

> -----Original Message-----
> From: Ed Dressel [mailto:dressel@...]
> Sent: Monday, January 31, 2005 9:19 AM
> To: IBObjects@yahoogroups.com
> Subject: [IBO] Bug with .Locate
>
>
>
>
> I am seeing a bug in a m/d relationship with .Locate is called by the
> master grid--appended records of the detail dataset are not posted
> when a .Locate is called. (If a .MoveBy is called, the appended record
> in the detail dataset is saved).
>
> I created a Delphi demo program that reproduces this problem at:
>
> www.annuitypeople.com/files/MDDetailNotPosting.zip
>
> It's pretty simple to reproduce with instructions in the form. If
> someone could confirm that they see it as well, I would appreciate it.
>
> Thanks
> Ed Dressel