RE: Retrieving thesaurus words

["Glenn Crouch" <address@hidden>]

From the Addict Author:

Roughly:

Var
	T:TThesaurusFile;
	Entry:TThesaurusEntry;
Begin

	T := new TThesaurusFile;

	T.Filename := 'blah';\
	T.Loaded := True;

	if (T.LookupWord( 'foo' )) then
	begin

		For I := 0 to T.Contexts.Length do
		begin
			Entry	:= TThesaurusEntry(T.Contexts[I]);

			// Entry should now hold all properties of this
particular context topic.
		end;
	end;

	T.Free;
End;

Glenn Crouch, Addict Support
mailto:address@hidden
Addictive Software http://www.addictivesoftware.com