Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.298 Beiträge
 
Delphi 12 Athens
 
#12

Re: Query... Feld nicht gefunden

  Alt 7. Okt 2007, 18:19
Hallo alle...

Die Lösung war der Filterstring !

Delphi-Quellcode:
procedure Filter;
begin
  with Flieferschein do
    begin
      case ComboBox2.ItemIndex of
        0: begin
             Query1.Filter:= '';
             Query1.Filtered:= False;
           end;
        1: begin
             if ComboBox2.Text = 'kein Lieferscheinthen
               begin
                 Query1.Filter:= 'LS = '+ QuotedStr('');
                 Query1.Filtered:= True;
                 SMatch.SetFocus;
               end
                 else
                   begin
                     Query1.Filter:= 'RE = '+ QuotedStr('');
                     Query1.Filtered:= True;
                     SMatch.SetFocus;
                   end;
           end;
      end;
  end;
end;
... d.h. das trotz Filtered:= False eine Überprüfung des Strings durchgeführt wird ?

... kann das jemand logisch erklären

[edit]
Da war Progman schneller und hat Recht, aber ich hatte es selbst gefunden Trotzdem Danke...
[edit/]

  Mit Zitat antworten Zitat