掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Copy関数について (ID:29963)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 (環境:DELPHI6 Personal、XP Pro) とんでもない勘違いをしているような気もするのですが、なぜだか解らないので質問させてください。 新規フォームにエディットボックスを2つ、ラベルを1つ、ボタンを1つ置いて ボタンのOnClickに下記のコードを書きます。 (テストなのでとりあえず、エラーチェックも何もなしですが) procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption := Copy(Edit1.Text, StrToIntDef(Edit2.Text, 0), 1); end; 例えば、Edit1に'ABCDE'と入れて、Edit2に'0'と入れて、ボタンを押すと Labelに'A'と表示されます。 次にEdit2に'1'と入れても、なぜか'A'と表示されます。 '2'を入れれば'B'が表示されます。 元々このような仕様ではないと思うのですが、原因がさっぱりわかりません。 どなたかお分かりになる方、教えてください。 よろしくお願いいたします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.