پیاده سازی دستور like

سلام
لطفا راهنمایی کنید معادل دستور زیر رودر دلفی پیاده سازی کنم
[code]

('*')select * from bimar WHERE bimar.fname LIKE ' + QuotedStr('*') + '&' + QuotedStr(Edit1.Text)+ '&'+ QuotedStr'
[code/]

سلام. در دلفی برای بررسی قسمتی از یک رشته دستور Pos وجود داره
if Pos('x', Str) > 0 then

اما منظور من این دستور هست:
مشخصات بیمارانی روبرگردونه که نامشون مشابه رشته س... باشد
یعنی چندحرف اول فقط برای جستجو تایپ بشه
اما دستور فوق که اول نوشتم کار نمی کنه

راه حل رو با جستجودر اینترنت پیدا کردم:
ADOQuery1.SQL.Add('select * from bimar WHERE bimar.fname LIKE :fname ORDER BY lname ASC');
ADOQuery1.Parameters.ParamByName('fname').Value := '%'+trim(Edit1.Text)+'%';