ＵＲＬに自動でリンク (ID:6950)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 procedure TForm1.Button1Click(Sender: TObject); var s:string; i:integer; begin SetLength(s,26); for i := 1 to 26 do s[i] := Char(i+$40); Label1.Caption := s; end;