>>160
ｷﾀ━━(´ⅴ｀)━(　´ⅴ)━(　　´)━(　　)━(´　　)━(ⅴ｀　)━(´ⅴ｀)━━!!!!!
その方法でできました。
感謝感謝！
Val の用法もよくわかりました。

でも、
Edit1.Text := Bunshi[1];
Edit2.Text := Bunbo[1];

if (Edit1.Text1 = '') or (Edit2.Text = '') then
ShowMessage('');

の場合にエラーが出るのが理解できていないのですが、
↑はどうして悪いのですか？
例外と言われてますが、何の例外なんですか？