delphi and sql

delphi and sql

عمليات على LIKE
ان صح تعبير، اعذروا سوء تعبيري

ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM tab1');
ADOQuery1.SQL.Add(' WHERE (nom LIKE :m)');
/// عرض كل العبارات التي تحتوي على الحرف أو الحروف المكتوبة في مربع النص
/// سواء كانت بداية العبارة أو في وسطها أو أخرها
ADOQuery1.Parameters.ParamByName('m').Value := '%'+Edit1.Text+'%';
/// عرض كل العبارات التي تحتوي على الحرف أو الحروف المكتوبة في مربع النص
/// التي في بداية العبارة
// ADOQuery1.Parameters.ParamByName('m').Value := Edit1.Text+'%';
/// عرض كل العبارات التي تحتوي على الحرف أو الحروف المكتوبة في مربع النص
/// التي تكون في آخر العبارة
///ADOQuery1.Parameters.ParamByName('m').Value := '%'+Edit1.Text;
ADOQuery1.Open;