FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
NO ENTRA -> if Enum.Text = adoquery1.FieldByName('numero').AsString then
hola que tal
no eh podido hayar el problema por que no me entra a un if. esta es la cuestion hise esta pequeña consulta con el componete zeos Código:
if key = 13 then begin zquery1.SQL.Clear; zquery1.SQL.Add('select * from clientes where numero='+quotedstr(enum.Text)+''); zquery1.Active:=true; if enum.Text = zquery1.FieldByName('numero').AsString then begin enom.Text := zquery1.FieldByName('nombre').AsString; EDir.text:=zquery1.fieldbyname('direccion').asstring; bcancelar.SetFocus; beliminar.Enabled:=true; bmodificar.Enabled:=true; end else begin enom.SetFocus; bguardar.Enabled:=true; end; end; ahora lo hise con el ADO que quedo asi: Código:
if key = 13 then begin adoquery1.SQL.Clear; adoquery1.SQL.Add('select * from clientes where numero='+quotedstr(enum.Text)+''); adoquery1.Active:=true; if Enum.Text = adoquery1.FieldByName('numero').AsString then begin enom.Text := adoquery1.FieldByName('nombre').AsString; EDir.text:=adoquery1.fieldbyname('direccion').asstring; bcancelar.SetFocus; beliminar.Enabled:=true; bmodificar.Enabled:=true; end else begin enom.SetFocus; bguardar.Enabled:=true; end; pero no entra en el if sem ehase muy rarro Código:
if Enum.Text = adoquery1.FieldByName('numero').AsString then cual quier ayuda se los agradeseria mucho saludos |
#2
|
||||
|
||||
Saludos.
Mira a ver si te funciona asi: Suerte
__________________
Van Troi De León (Not) Guía, Code vB:=Delphi-SQL, ¿Cómo? Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto! |
#4
|
||||
|
||||
Saludos
Elimina los espacion entre los extremos de un STRING. Ej: Convierte=> " Espacios en String " en "Espacio en String". Si te fijas, en la 1ra hay espacios al principio y al final. Usado TRIM() estos espacios se eliminan
__________________
Van Troi De León (Not) Guía, Code vB:=Delphi-SQL, ¿Cómo? Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto! |
|
|
|