begin
ShowMessage('釣りですか?')
end;