Source position: lazglib2.pas line 2889
procedure TGSList.foreach(
list: PGSList;
func: TGFunc;
user_data: gpointer
);