Einzelnen Beitrag anzeigen

simon790

Registriert seit: 6. Mär 2008
43 Beiträge
 
Delphi 7 Professional
 
#5

Re: Integer Filtern in einem DBgrid

  Alt 3. Apr 2008, 07:51
Zitat von shmia:
Frage doch ab, ob es sich um ein String- oder Integer-Feld handelt.
Ich weiss ja welches Feld ein Integer Feld ist und kann der Filter demenstprechend zusammenstellen:

Delphi-Quellcode:
procedure TMainForm.FilterEditChange(Sender: TObject);
begin
  with DBGrid do
  begin
    DataSource.DataSet.Filtered := Trim(FilterEdit.Text) <> '';
    if DataSource.DataSet.Filtered then
      if SelectedField.FieldName ='TELEFONthen //Das ist das IntegerFeld
        DataSource.DataSet.Filter := SelectedField.FieldName + ' = ' + QuotedStr('*'+FilterEdit.Text+'*')
      else // all die StringFelder
      DataSource.DataSet.Filter := SelectedField.FieldName + ' Like ' + QuotedStr('*'+FilterEdit.Text+'*')
    else
      DataSource.DataSet.Filter := '';
  end;
end;
aber mit dem Gleichheitszeichen statt dem Like Operator tuts auch nicht!
Es gibt 10 Arten von Menschen.
Diejenigen, die das binäre System verstehen, und die, die es nicht verstehen.
Aber ich frag mich was ist mit den anderen 8?
  Mit Zitat antworten Zitat