Question

delphi like 在delphi中 if Edit.Text like j% then 怎么表达

edit.text like ''%'+j+'%''

Answer 1

with TStringlist.create do
begin
Add('J1');
Add('J2');
Add('J3');
...

If Indexof(Edit1.Text) then
Showmessage('Found');
end;
如果是补充的就更简单了：）
Uses strUtils;
if AnsiContainsStr(Edit1.Text,J) then
showmessage('Found');
或者：
if Pos(Edit1.Text,'j')>-1 then
Showmessage('Found');

Answer 2

if pos('j',Edit1.text)=1 then result:= true;

Answer 3

用 if pos()>0

Answer 4

不支持这样写！！
like只有用在SQL语句中才可以
没有什么好办法，只能写全()or()or()

追问

那有别的方式达到目的吗？？

追答

只能(Edit.Text ='j1')or(Edit.Text ='j2')or.....