Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 27-07-2007
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.740
Poder: 26
ContraVeneno Va por buen camino
Si hay un método mejor, utilizar parámetros.
Si utilizaras parámetros no tendrías que hacer eso truquitos para guardar decimales.

Y tambien podrías ahorrarte la variable SQLText.

Ejemplo:

Código Delphi [-]
With AdoQuery1 do begin
 If Active then Close;
 SQL.Clear;
 SQL.Add('INSERT INTO Proyectos (Descripcion, Importe)');
 SQL.Add('VALUES (:Descripcion, :Importe)');
 Parameters.ParamByName('Descripcion').AsString := Edit2.Text;
 Parameters.paramByName('Importe').AsCurrency := CurrencyEdit1.AsCurrency;
 Try
  ExecSQL;
 Except on E:EDBEngineError do begin
   If E.ErrorCode = 902 then  //902 es solo como ejemplo
     showmessgae('error 902'+' en:'+SQL.Text');
  end; //Except
 end; //Try
end; //with
__________________

Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
insertar o modificar un registro completo a otro osvrom SQL 10 23-01-2013 20:10:14
Como insertar, eliminar y modificar en c#? danytorres .NET 2 09-05-2006 22:29:47
lentitud al Modificar/Insertar kukinn Conexión con bases de datos 3 23-03-2004 09:37:57
Problema el insertar/modificar registro ing_alsaac Conexión con bases de datos 0 29-02-2004 09:18:15
ejemplo para insertar,modificar con tdataset marcelofabiani Firebird e Interbase 1 03-06-2003 18:44:06


La franja horaria es GMT +2. Ahora son las 18:16:34.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi