Error al calcular una factura

[Yensis22]

si tene datos lo que voy a insertar

Si Pero en este from no me esta funcionando ni la inserción de dato ni los cálculos yo que lo estoy molestando mucho pero es que tengo que entrega esto mañana que es un trabajo fina de programación de la unversida y tengo vario día trabando en este proyecto y ese from es que me falto por favor ayúdeme que estoy, ya contra la pare y le agradezco por toda lo que me han ayudado y pos su paciensa con migo.

[[coso]]

hola,

Código Delphi [-]
procedure TFFacturacion.BSeleccionarClick(Sender: TObject);
begin
        FRegistroclient:=TFRegistroclient.Create(self);   
        try    
           FRegistroclient.ShowModal;   
        finally   
           If FRegistroclient.Nom_Cliente <> '' then EdiCliente.Text := FRegistroclient.Nom_Cliente;   
           LabDireccion.Caption:= QuotedStr(FRegistroclient.Direccion);   
           FRegistroclient.Free;   
        end;
end;

esto te dara excepcion la segunda vez q lo uses

PD : si vamos a hablar, por favor, usa una letra normal, no uses ninguna etiqueta para tus escritos, usa etiquetas [ delphi],[ /delphi] para el codigo, y [ quote], [/ quote] para comentarios sobre mensajes anteriores

[[coso]]

otro detalle, te esta llamando continuamente al timer TFSplash.Timer1Timer, aun cuando no hay ningun splash visible

[[coso]]

Antes de poner la sql.text, deberias hacer QFacturacion.Active := false;
usando la opcion uno, los valores reales que transformas a string NO deben ir con el quotedstr.

[[coso]]

antes del execsql, podrias hacer

Código Delphi [-]
showmessage(QFacturacion.SQL.Text)

, y miras si es todo correcto, a ver si es que estas construyendo mal la cadena por alguna variable.

[[coso]]

Bueno creo q el problema q tenias antes era ese, el de poner en quotedstr los valores decimales... desde mi pc no puedo ni insertar facturas ni clientes, estan todas las tablas cerradas, no se si es por el usuario o bien por otra cosa...si tienes alguna duda concreta, exponla q le echamos un vistazo saludos.

[[coso]]

PD: el skin del form principal, precioso creo q lo voy a guardar

[Yensis22]

en la ejecucion

Ya realice eso cambio pero cunado lo ejecuto manda este error (error de sistanxis (falta operador en la expresión de consulta " D?").
en el botón de los cálculos y en el de busqueda que me trael el otro form me lo trae pero no me inserta ningún dato.

[Yensis22]

ya me esta realisando los calculos
muchas gracas por lalucha que les dado con ese codigo

Por otra parte de este mismo from de factura yo tengo un botón busca, que lo que yo quiero que el me realice es que cunado yo lo llame me traiga otro from eso el me lo hace bien, pero que cuando yo le de le de clic a un cliente este me lo inserte en el edit de cliente de la factura esto lo que no me esta haciendo este es el código que tengo es este botón esta variable Nom_Cliente esta de clarada como publica Nom_Cliente: string; en el otro from que se llama FRegistroclient. este es el codigo del boton que me trael en from de del cliete.

Código Delphi [-]
procedure TFFacturacion.BSeleccionarClick(Sender: TObject);
begin
FRegistroclient:=TFRegistroclient.Create(self);
   try
    FRegistroclient.ShowModal;
   finally
   If FRegistroclient.Nom_Cliente <> '' then
   EdiCliente.Text := FRegistroclient.Nom_Cliente;
   LabDireccion.Caption:= QuotedStr(FRegistroclient.Direccion);
   FRegistroclient.Free;
   end;
end;