Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-04-2004
Avatar de miguel_fr
miguel_fr miguel_fr is offline
Miembro
 
Registrado: mar 2004
Ubicación: Santiago del estero, Capital
Posts: 73
Poder: 21
miguel_fr Va por buen camino
Post Ayuda para el uso de TQuery

hola espero me puedan dar una mano
Estoy comensando a programar en Sql y necesito un poco de ayuda.

Tengo un procedimiento que recibe y almacena un String en mi BD, yo necesitaria realizar un control de "no existencia" de dicho String en la Tabla para asi poder almacenarlo y no se como realizar esto.
Usando Ttable realizaba lo siguiente

Código:
{para controlar que no se repita}
with tabla1 do
 Begin
  first;
  while Not EOF do
   Begin
	if (Texto_a_ingresar = tabla1.fieldbyname('Mi_Campo').asstring) then
	 Begin
	  Application.MessageBox('ya existe el texto','Error'
	  ,MB_DEFBUTTON1);
	  exit; {salia}
	 end;
	 next;
   end;
 end;
{si llegaba aqui era porque no existia}
 tabla1.insert; // Ponia la tabla en modo insertar...
 tabla1.fieldbyname('Mi_Campo').asstring:=Texto_a_ingresar;
 tabla1.post; {guarda}
yo tengo entendido que todo eso se puede achicar muchisimo en Sql, me podrian dar una mano?
Responder Con Cita
 



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


La franja horaria es GMT +2. Ahora son las 06:17:28.


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