Markku
That's a bit difficult since the coderunning in the thread is in an external
module loaded by ElevateDB at run time and depending on how much I comment out
I get different errors. eg with the following
function AttachSearch(const LstStr, FldStr, TstStr, CompStr, CI: string):
boolean;
var
DocumentText: string;
Cntr: integer;
fExtn: string;
fName: string;
Reversing: boolean;
ms: TMemoryStream;
aSource: TMimeMess;
dotDoc: TMSWordDocument;
dotDocX: TMSWordXDocument;
dotWPD: TWordPerfectFile;
dotWRI: TWRIFile;
dotPDF: TSMPDFReader;
begin
{UDF mask is AttachSearch(_aList, _Encoded, '$T', '$V', $Case)}
Result := False;
if (LstStr = '') or (CompStr = '') then Exit;
Reversing := 0 <> Pos(' not ', TstStr);
aSource := TMimeMess.Create;
{
..
..
}
aSource.Free;
end;
I get an AV
Run just one thread and everything's fine. Run two and kerpow.
Roy Lambert
------------------------------------------------------------------------------
The Planet: dedicated and managed hosting, cloud storage, colocation
Stay online with enterprise data centers and the best network in the business
Choose flexible plans and management services without long-term contracts
Personal 24x7 support from experience hosting pros just a phone call away.
http://p.sf.net/sfu/theplanet-com
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public
