Ayuda con sql para descontar articulo.

[[Caral]]

Hola
Lepe, me puedes explicar que es un campo persistente?
No entiendo el concepto?
Es cuando el campo esta en el query y no se modifica?
Perdon por la pregunta de novato, pero si no la hago no aprendo.
El resto esta genial, impresionas Maestro.
Saludos

[Petolansa]

Gracias tanto como a Caral como a Lepe, realmente da gusto haya personas como Uds con la predisposicion para ayudar a la gente que le gusta aprender este lenguaje. Yo las ganas de ayudar las tengo pero me faltan los conocimientos todavia. Pero ni bien pueda sin dudas estar ayudando.

En este momento me da un error en otra parte del codigo, asi que ni bien termine eso, me meto de lleno con esto y por supuesto avisare como me fue.

Gente, muy agradecido.

[[Lepe]]

Cuando le das doble clic a un TTable, aparece la ventana editor de campos, botón derecho y Add All Fields.

A eso se le llama campos persistentes porque en tu Form aparece:

Código Delphi [-]

Type TForm1 = Class(TForm)

  query1NombreCliente :TStringField;

Al crear la ventana, se crea ese campo como si se tratara de un panel, un edit, etc.

Al usar FieldbyName esto es lo que ocurre:

Código Delphi [-]
function TFields.FieldByName(const FieldName: WideString): TField;
begin
  Result := FindField(FieldName);
  if Result = nil then DatabaseErrorFmt(SFieldNotFound, [FieldName], DataSet);
end;

Y aquí está la madre del borrego:

function TFields.FindField(const FieldName: WideString): TField;
var
  I: Integer;
begin
  for I := 0 to FList.Count - 1 do  Un bucle por todos los campos que tiene la tabla
  begin
    Result := FList.Items[i];
    if WideCompareText(Result.FFieldName, FieldName) = 0 then Exit;
  end;
  Result := nil;
end;

Si tu tabla tiene 10 campos, al usar FieldByName:
- En el mejor de los casos, lo encuentras al primer intento de ese bucle.
- En el peor de los casos, tendrás que dar 10 vueltas en ese bucle For

Al usar campos persistentes, tienes ese campo como si fuera un panel o un Edit, no hay que realizar bucle alguno.

En el caso que nos ocupa, nosotros tenemos otro bucle más:
while not frmfactura.MDtemporal.Eof do

si tenemos 20 registros en la tabla, 10 campos, usamos 2 veces fieldbyname dentro de nuestro bucle:
-En el peor de los casos, 390 ciclos
-En el mejor de los casos: 60 ciclos

Usando campos persistentes: 20 ciclos

No hay que meterse en paranoias , pero si tenemos los campos persistentes, es preferible usarlos .

Petolansa: Si no entiendes algo de ese código usa la tecla F1, es la única forma de aprender, si aún así tienes dudas, avisa.


Saludos

[[eduarcol]]

Empezado por Caral

Hola
Lepe, me puedes explicar que es un campo persistente?
No entiendo el concepto?
Es cuando el campo esta en el query y no se modifica?
Perdon por la pregunta de novato, pero si no la hago no aprendo.
El resto esta genial, impresionas Maestro.
Saludos

es cuando agregas los campos en el field editor del query.

[[Caral]]

Hola
Me imaginaba que era eso, pero como tenéis nombres raros para todo, pues no sabia este.
Gracias Maestros, como aprendo aquí, da gusto.
Saludos