Como realizar multiples UPDATE desde un TStringlist

[ecfisa]

Hola.

Empezado por elmago00

....
Lo que yo hago es extraer los primeros 6 números de todos los registros de la columna id asi:

Podrías simplemente hacer:

Código Delphi [-]
...
begin
  ComboBox1.Items.Clear;
  ZQuery1.Close;
  ZQuery1.SQL.Text := 'SELECT SUBSTRING(ID FROM 1 FOR 6) AS DATO FROM TIPOMAYOR';
  ZQuery1.Open;
  while not ZQuery1.Eof do
  begin
    ComboBox1.Items.Add( ZQuery1.FieldByName( 'DATO' ).AsString );
    ZQuery1.Next;
  end;
  ZQuery1.Close;
  ...

Empezado por elmago00

para actualizar sus valores de acuerdo a sus primeros 6 numeros, que los reconoce como hijos, yo lo hago asi..

Código Delphi [-]
ZQUERY1.SQL.ADD('UPDATE tablamayor Set SALDO='2561150.25' where id='1101010000');

Sería mejor así:

Código Delphi [-]
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text := 'UPDATE TABLAMAYOR SET SALDO = :SALDO WHERE ID = :ID';
  ZQuery1.ParamByName('SALDO').AsCurrency := valor_saldo;
  ZQuery1.ParamByName('ID').AsString      := valor_id;
  ZQuery1.ExecSQL;
...

Empezado por elmago00

...
para saber cuales son sus hijos yo uso la esto

Código Delphi [-]
id regexp '+char(39)+'^'+1101+char(39));

pero debo hacerlo de de la suma de los valores de sus ·hijos",..
puedo hacer uno por uno,pero debo hacerlo automático.
actualizar todos los registros mayores, de acuerdo a los valores de sus hijos, de forma secuencial, uno tras otro.
para no tener que digitar manualmente la cuenta mayor a la que le sumare los valores de sus hijos..

Aqui ya no entiendo el planteo del problema.

La otra duda que me queda es el papel que juega en todo esto TIPOMENOR (o TABLAMENOR ? ) , ya que no aparece en ninguna parte del código.

Saludos