Mostrar consulta SQL con parámetros

[ethangio]

Buen día a todos y gracias por tomarse el tiempo para leer mi pregunta.

Antes de hacer la pregunta busqué pero no encontré cómo poder ver mi consulta SQL con parámetros.

Tengo esta consulta en código delphi:

Código Delphi [-]
Query.Close;
Query.Clear;
Query,SQL.Add(' INSERT INTO ventas (folio, fecha, clave, producto) ');
Query.SQL.Add(' VALUES (:folio, :fecha, :clave, roducto) ');
Query.ParamByName('folio').AsInteger      := '1'; 
Query.ParamByName('fecha').AsString      := '2021-08-31';
Query.ParamByName('clave').AsString      := 'AB001';
Query.ParamByName('producto').AsString := 'Azúcar';
Query.Prepared := true;
Query.ExecSQL;

Si hago un:

Código Delphi [-]
ShowMessage(Query.SQL.text);

Me muestra la consulta de la siguiente manera:

Código SQL [-]
INSERT INTO ventas (folio, fecha, clave, producto) VALUES (:folio, :fecha, :clave, roducto)

Y yo quisiera ver la consulta así:

Código SQL [-]
INSERT INTO ventas (folio, fecha, clave, producto) VALUES (1, '2021-08-31', 'AB001', 'Azúcar')

Cómo puedo lograr esto ?