共收录

成语 13307条

歇后语5967条

和 若干常用百科知识

能查拼音、释义、反义词、近（同）义词、出处，能自已  编辑  和  新增  成语。

 

采用SQLite数据库，启动和 搜索 更另快捷。

20240211

Procedure TForm1.lstSearchResultMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Var
  APoint: TPoint;
  lstIndex: Integer;
Begin

  APoint.X := X;
  APoint.Y := Y;

  Case Button Of
    mbLeft:
      Begin
        lstIndex := lstSearchResult.ItemAtPos(APoint, True);
        If (lstIndex > -1) And (lstSearchResult.tag > 0) Then
        Begin
          lstSearchResult.ItemIndex := lstIndex;
          CurrDBfind(FMemSL.Strings[lstIndex], InfoStringList.Strings[lstIndex]); //点击列表结果时，直接在结果集里找记录，不用再用SQL查询
        End;
      End; 

 

select [id],[name],[info] from atb where [name] like "五%四%"

%代表任意多个字符
_代表一个字符

select [id],[name],[info] from atb where substr([name],1,1)="涂"
select [id],[name],[info] from atb where substr([name],1,1)=substr([name],2,1) and substr([name],3,1)=substr([name],4,1)

select [id],[name],[info] from atb  where info='Z~!~~!@~!' --没有解释的词条

 

 insert into atb(id,name,info)  select  value +65500,ci.rhythmic||"_"||ci.author,ci.content from ci 

     EXE格式    

链接：https://pan.baidu.com/s/1r1-V_n93bVM0MHE930gOGA
提取码：g15d

 chm格式             网络版OnLinePart1  Part2