[実行]ボタンクリック時(ButtonのOnClickイベント)に次のようにコードを追加して変更します。 SQL文で指定したパラメータ名の「:」以降をParamByName句で使用します。
procedure TForm1.Button1Click(Sender: TObject); begin //Queryを閉じる Query1.Close; //パラメータ設定 Query1.ParamByName('PARAMSTATE').AsString := Edit1.Text; //Queryを開く Query1.Open; end;