abrras
18-05-2010, 09:05
چگونه میتوان دو فیلد را در یک CELL از DBGRID نمایش داد.
procedure TForm2.Edit1Change(Sender: TObject);
var s:string;
begin
Personel_frm.Personel_Query.Close;
Personel_frm.Personel_Query.SQL.Clear;
if edit1.text<>'' then
begin
s:=('select * from personel where nam like');
s:=s+''''+'%'+edit1.Text+'%'+'''';
end
else
s:=('select * from personel ');
Personel_frm.Personel_Query.SQL.Add(s);
Personel_frm.Personel_Query.Open;
Personel_frm.Personel_Query.ExecSQL;
end;
دستور جستجو براساس یک فیلد را مطابق با دستوارت بالا ثبت کردیم .
اما اگر دو فیلد را در یک سلول از دی بی گرید ذخیره کنیم چگونه می توان برایش دستور جست و جو نوشت.
نام پرسنل از طریق یک ادیت جست و جو می شود و در فروم پرسنل ذخیره می گردد.
------------------------
امیدوارم توضیحاتم کامل باشه ....:11:
procedure TForm2.Edit1Change(Sender: TObject);
var s:string;
begin
Personel_frm.Personel_Query.Close;
Personel_frm.Personel_Query.SQL.Clear;
if edit1.text<>'' then
begin
s:=('select * from personel where nam like');
s:=s+''''+'%'+edit1.Text+'%'+'''';
end
else
s:=('select * from personel ');
Personel_frm.Personel_Query.SQL.Add(s);
Personel_frm.Personel_Query.Open;
Personel_frm.Personel_Query.ExecSQL;
end;
دستور جستجو براساس یک فیلد را مطابق با دستوارت بالا ثبت کردیم .
اما اگر دو فیلد را در یک سلول از دی بی گرید ذخیره کنیم چگونه می توان برایش دستور جست و جو نوشت.
نام پرسنل از طریق یک ادیت جست و جو می شود و در فروم پرسنل ذخیره می گردد.
------------------------
امیدوارم توضیحاتم کامل باشه ....:11: