Ver Mensaje Individual
  #13  
Antiguo 28-07-2013
DOS DOS is offline
Miembro
NULL
 
Registrado: jul 2011
Posts: 173
Reputación: 13
DOS Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
O sea, que lo que quieres es que cuando pulses en el botón "Imprimir ficha" se muestre el informe con los datos que has puesto en pantalla para imprimirlo.
¿Y qué problema tienes con ello?, explícalo en detalle.
Lo que se ve en la imagen con el siguiente codigo en el boton imprimir
Código Delphi [-]
procedure TForm6.SpeedButton1Click(Sender: TObject);
var
 Valor:string;
begin
with Form26.Query1 do
  begin
    Valor:=DBEdit1.Text;
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM propietario');
    SQL.Add('WHERE Cod_prop = :PVALOR');
    ParamByName('PVALOR').AsString := Valor;
    Open;
  end;
Form26.QuickRep1.Preview; // Previsualizar los resultados.
end;

me tira el siguiente error "Project1.exe raised exception class EDBEngineError with message 'type mismatch in expression.'. Process stopped..." no se cual es el error o que significa esto.
Responder Con Cita