Finds a parameter with the specified name.
function ParamByName(const Value: string): TDAParam;
Use the ParamByName method to find a parameter with the specified name. If no parameter with the specified name found, an exception is raised.
VirtualSQL.Execute;
Edit1.Text := VirtualSQL.ParamsByName('Contact').AsString;