Announcement

Collapse
No announcement yet.

Datensätze filtern

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Datensätze filtern

    Ich möchte Datensätze zur Laufzeit des programmes filtern, es sollen nur die Datensätze
    angezeigt werden die dem Bezeichner des RadioButtons entsprechen.
    Ich versuche es seit Stunden wie unten aufgeführt.
    kann mir jemand sagen warum das nicht funktioniert?

    procedure TForm1.RadioButton1Click(Sender: TObject);
    begin
    if radiobutton1.checked=true then
    begin
    if query1.active = true then query1.close;
    query1.sql.clear;
    query1.sql.add
    ('select*from country where Name like :irgendwas');
    query1.params[0].AsString:=RadioButton1.Caption;
    query1.open;
    end;
    end;

    Danke im Voraus

    Peter

  • #2
    Hallo Peter,

    wenn Du statt <b>query1.params[0].AsString:=RadioButton1.Caption</b> die Variante <b>query1.parambyname('irgendwas').asstring := RadioButton1.Caption</b>
    verwendest sollte es funktionieren.

    Tschüß

    Torste

    Comment


    • #3
      Hallo Thorsten,
      leider funktioniert es mit Ihrer Variante auch nicht.
      Vielleicht habe ich noch etwas grundlegendes im Objektinspektor
      nicht angelegt. Wäre dankbar wenn Sie sich nochmal mit meinem
      Problem auseinandersetzen.

      Danke
      Pete

      Comment


      • #4
        Hallo Peter,

        bei mir funktionieren beide Varianten (Deine und meine). Zum Test habe ich ein DBGrid auf dem Formular eingefügt und die Eigenschaft DataSource von DBGrid auf DataSource1 gesetzt.
        Die Eigenschaft DataSet der Komponente DataSource1 ist Query1.

        Werden Daten angezeigt, wenn Du auf eine Datenfilterung verzichtest
        (select * from country) ?

        Tschüß

        Torste

        Comment


        • #5
          Hallo Thorsten,
          vielen herzlichen Dank, das wars.
          Ich war der Verzeifelung nah.
          Der Objektinspektor und ich können uns nur sehr schwer anfreunden.
          Nochmals Danke
          Tschüß
          Peter henne

          Comment

          Working...
          X