NO ENTRA -> if Enum.Text = adoquery1.FieldByName('numero').AsString then

[sakuragi]

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

 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;

todo sale bien

ahora lo hise con el ADO

que quedo asi:

 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;

todo se ve bien

pero no entra en el if sem ehase muy rarro

 if Enum.Text = adoquery1.FieldByName('numero').AsString then

bueno

cual quier ayuda se los agradeseria mucho

saludos

[vtdeleon]

Saludos.

Mira a ver si te funciona asi:

Código Delphi [-]
if (trim(Enum.Text) = trim(adoquery1.FieldByName('numero').AsString)) then

Suerte

[sakuragi]

hola que tal

muchas gracias por tu aporte

si funciono bien

que hase esa funcion que con ella si arroja el resultado que quiero tener que sin ella no?


saludos

[vtdeleon]

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