Delphi 程式設計/GUI - 元件概述

procedure takethis();
var I: integer;

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