StackOverflow

nschmied · Post by **nschmied** » Fri 23 Sep 2005 15:25

I have a stack OverFlow with AnsiCompareTextS

CoreLab.Dac.Units.MemUtils::AnsiCompareTextS()
CoreLab.Dac.Units.MemUtils::AnsiCompareTextS()
CoreLab.Dac.Units.MemUtils::AnsiCompareTextS()
CoreLab.Dac.TData::@32MemData$InitFields$InitAliases$ReplaceNextOriginalNames()
CoreLab.Dac.TData::@22MemData$InitFields$InitAliases()
CoreLab.Dac.TData::InitFields()
CoreLab.Dac.TMemData::InitFields()
CoreLab.Dac.TCRRecordSet::Prepare()
CoreLab.Dac.TMemDataSet::Prepare()

I check code for AnsiCompareTextS !!!!!

And wath the code ??????

Code: Select all

function AnsiCompareTextS(const S1, S2: string): integer; // SORT_STRINGSORT
begin
{$IFDEF SORT_STRINGSORT}
  Result := CompareString(LOCALE_USER_DEFAULT, NORM_IGNORECASE + SORT_STRINGSORT, PChar(S1),
    Length(S1), PChar(S2), Length(S2)) - 2;
{$ELSE}
  Result := AnsiCompareTextS(S1, S2);
{$ENDIF}
end;

it's normaly, I have a StackOverFlow ????? I don't understand waths you make with AnsiCompareTextS.

Alex · Post by **Alex** » Mon 26 Sep 2005 06:56

It's known problem and we've already fixed it. This fix will be included in the next ODAC build.

nschmied · Post by **nschmied** » Mon 26 Sep 2005 07:18

nice, very nice.