نمایش نتایج 1 تا 6 از 6

نام تاپیک: فیلتر روی فیلد عددی

  1. #1

    فیلتر روی فیلد عددی

    من می خواهم روی فیلد عددی فیلتر بگذارم به طوری که اگر کاربر عدد 1 را وارد کرد، اعداد 1و 11و 112و 14و 123و .... همه را نشان دهد. بانکم هم SQL Server هست ولی به دلایلی نمی خواهم از دستورات SQL استفاده کنم. خودم کد زیر را نوشتم که برای فیلدهای متنی جواب می دهد ولی اینجا خطا می گیرد و پیغام می دهد که مثلا *1 از نوع Integer نیست:

    DM.ClientDataSet1.Filter:='ssjens='+QuotedStr&  #40;Ajnas_Show.Edit1.Text+'*');


    با تشکر

  2. #2
    کاربر دائمی آواتار فرزاد دلفی باز
    تاریخ عضویت
    تیر 1383
    محل زندگی
    ایـــران ....
    پست
    464
    دوست عزیز : من از این تیکه کد استفاده کرده ام که SQL هم نیست .
    : table1.Filtered := false
    : ' ' ' ' + ' * ' + table1.Filter := 'Code='+' ' ' '+Edit1.text
    : table1.filtered := true
    که Code آن فیلد ای است که شما می خواهید آنرا فیلتر کنید . موفق باشی :flower:

  3. #3
    کاربر دائمی آواتار MiRHaDi
    تاریخ عضویت
    تیر 1383
    محل زندگی
    تهران - سوهانک
    پست
    982
    سلام
    نیازی به true/false کردن filtered نیست ! همون فعال باشه خودش درست میشه
    ولی سوال ایشون برای عددی هست این که شما نوشتی برای نوشتاریه ! برای عددی من از راست به چپش رو بلدم از چپ به راستش فکر نکردن هنوز روش اگه چیزی به ذهنم رسید یادم بود میگم بای

  4. #4
    کاربر تازه وارد
    تاریخ عضویت
    بهمن 1382
    محل زندگی
    بهبهو
    پست
    91
    با سلام
    شما میتوانید یک editboxدر فرمتان قرار دهید و در رویداد OnFilter recordجدول کدهای زیر را وارد کنید

    procedure TForm1.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
    begin

    Accept:=table1.FieldByName(feildname).Value=edit1. text;
    end;
    موفق باشید.

  5. #5
    نقل قول نوشته شده توسط فریدی
    با سلام
    شما میتوانید یک editboxدر فرمتان قرار دهید و در رویداد OnFilter recordجدول کدهای زیر را وارد کنید

    procedure TForm1.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
    begin

    Accept:=table1.FieldByName(feildname).Value=edit1. text;
    end;
    موفق باشید.
    با تشکر از شما
    اگر ممکن است یک نمونه برنامه در اینجا قرار دهید چون من نتوانستم با این چیزی که شما فرمودید، کار کنم.
    ضمنا لطفا کدهای خود را درون تگ Code قرار دهید.

  6. #6
    کاربر تازه وارد
    تاریخ عضویت
    بهمن 1382
    محل زندگی
    بهبهو
    پست
    91
    این دستور را امتحان کن :

    ;Accept:=table1.FieldByName(feildname).Value=feild data

    feilddata و feildname هر دو String هستند.[/code]

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •