フサギコの *やさしい* Delphi質問スレ Ver.13
■ このスレッドは過去ログ倉庫に格納されています
0397デフォルトの名無しさん
NGNGprocedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if(Key = #13)then
key := #0;
Edit1.Text := 'Pressed Enter';
end;
ってすると、Backspace2回押してもPressed Enterと表示されます。
thenの後をbeginとend;でくくると正常に動作します。
なぜでしょう?細かくbeginとendをつかったほうがいいのでしょうか?
■ このスレッドは過去ログ倉庫に格納されています