DBGrid automatisch durchgehen!

Wuschl · Beiträge: 39

Salute!

Ich hoffe ich bin diesmal mit dem Posting richtig hier

Mein Problem ist, ich habe ein Formular und darauf ein DBGrid das eine Liste von Namen aus einer Query enthält! Jetzt möchte ich durch ein Event (zB. FormCreate, oder ButtonClick) die Namen von oben bis unten durchgehen und jedesmal soll er ein Event auslösen.

z.B. Es öffnet sich ein Fenster, der User kann 'ja' oder 'abbrechen' drücken, bei ja springt er zum nächsten Namen usw.

Ok ist vielleicht etwas schlecht erklärt aber ihr seid sicher nicht so verplant wie ich :lol:

. Hoffe ihr könnt mir helfen!

Gruß
Wuschl

Klabautermann · Verfasst: Mi 27.11.02 16:35

Hallo,

das tQuery-Objekt besitzt das Event AfterScroll. Damit solltest du das hinbekommen können.

Gruß
Klabautermann

Wuschl · Beiträge: 39

Ok danke mal!

Hab mirs mal angeschaut, aber ich steh da wohl grad etwas aufm Schlauch, hast du mir vielleicht noch ein kleines Beispiel??

Gruß
Wuschl

Klabautermann · Verfasst: Mi 27.11.02 17:38

Hallo,

wo ist denn dein Problem? Du musst in der AfterScroll Methode nur deine Frage stellen:

markieren

Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.Query1AfterScroll(DataSet: TDataSet);
begin
  IF (Application.MessageBox(PChar('Kennen Sie den Kunden ' + DataSet.FieldByName('Name').AsString),
                            'Dumme Frage', MB_YESNO) = IDYes) THEN
    Machwass;
end;

Das ganze musst du eventuell noch an eine Bedingung knüpfen, wenn du das selbe Query noch für andere Zwecke verwenden möchtest.

Gruß
Klabautermann

Wuschl · Beiträge: 39

Ok also ich habs jetzt mit ner while schleife gelöst, also das AfterScroll Event garnicht mit eingebaut, aber trotzdem danke....hat mir geholfen!

mfg
Wuschl

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme