Opret objecter dynamisk med Tscrollbox som parent

jeg prøver på at oprette en masse edit's
dynamisk med en TScrollbox som parent.
Jeg vil selvfølgelige gerne have dem
oprettet "pænt" lige under hinanden.
Problemet er det gør de ikke med mindre
man har scrollet til toppen.

Mit spørgsmål er hvordan kan jeg oprette dem
lige under hinanden uden at scrolle til topppen
først. (jeg kan godt scrolle til toppen via
kode, jeg vil helst bare undgå det)

Her er et udsnit af min kode

var
Myedit : Tedit;
begin
myedit := Tedit.Create(self);
myedit.Parent :=  scrollbox1;
myedit.Name := 'myedit' + inttostr(numedit);
myedit.Top := numedit * 22;
myedit.Left := 20;
myedit.Visible := true;
inc(numedit);

end;

Stoney