Delphi Programming/The GUI - Component overview

procedure takethis();
var I: integer;

begin
for I := 1 to 10 
  print(I);
end;