Einzelnen Beitrag anzeigen

Benutzerbild von LoewenZahn
LoewenZahn

Registriert seit: 10. Okt 2013
22 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#7

AW: Event bei Zeilenwechsel einer DataSource

  Alt 29. Jan 2014, 08:33
Hallo,

danke jetzt habe ich es verstanden

Ich hatte es gerade selbst mit einer anderen Methode gelöst, werde aber wohl auf die Scoll-Events umsatteln.

Selbst hatte ich im OnDataChange der TDataSource, eine Abfrage des .State genutzt. Hinzukommend musste ich um einen Datensatzwechsel zu bemerken, stets die zuletzt angewählte ZeilenNr merken.
Code:
procedure Tfbestelldetails.ds_archivDataChange(Sender: TObject; Field: TField);
begin
  if (ds_archiv.State in [dsBrowse]) and (selected_row <> query_archiv.RecNo) then
  begin
    selected_row := query_archiv.RecNo;
    ...
  end;
end;
Da man jedoch, wie ich es bereits ein paar mal in diesem Forum gelesen habe, globale Variablen vermeiden sollte, wäre die .AfterScroll Variante eine bessere.

Ich bedanke mich für jegliche Hilfe und hoffe das auch dem einem oder anderem ebenfalls geholfen sein wird.

Gruß
Tim
  Mit Zitat antworten Zitat