Du kannst dir übrigens den
VCL-Code angucken
(Strg + Linksklick auf BeginUpdate oder EndUpdate)
Delphi-Quellcode:
procedure TStrings.BeginUpdate;
begin
if FUpdateCount = 0 then SetUpdateState(True);
Inc(FUpdateCount);
end;
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."