Im Formular oder global eine boolsche Variable (z.B. after_open: boolean) deklarieren, die in AfterOpen auf true setzen und in AfterScroll
Delphi-Quellcode:
if after_open then after_open:= false
else begin
//Das was ausgeführt werden soll
end;
schreiben wäre eine Möglichkeit