Delphi - StrinGrid

   
Vista:

StrinGrid

Publicado por Milena (1 intervención) el 26/07/2008 23:08:22
Mira este codigo

procedure ActualizarCant(Signo,Campo,MaxItem:Integer;Cods,Cants:TStrings;Tabla:TTable);
var
i:Integer;
begin
with Tabla do
for i:=1 to MaxItem-1 do
if FindKey([Cods[i]]) then
begin
Edit;
Fields[Campo].AsFloat:=Fields[Campo].AsFloat+Signo*StrToFloat(Cants[i]);
Post;
end;
end;

Y mira este

with dmVentas,Datos do
Begin
Tproductos.Open;
GuardarItems(NumF.Text,RowCount,[Cols[1],Cols[5],Cols[4],Cols[3],Cols[5],Cols[6]],TKardex);
ActualizarCant(1,3,RowCount,Cols[1],Cols[3],TProductos);
MsgInf('Registros Grabados Exitosamente...');
end;

Me funciona bien y me aqctualiza la Cantidad en la Tabla deproductos, pero a demas quiero actualizar otro campo y no me deja o mas bien no se como ponerlo
Estos datos los Cargo en un StringGrid
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:StrinGrid

Publicado por Chrono (15 intervenciones) el 04/08/2008 01:41:06
Hola que tal Milena:

Mira la verdad no entiendo mucho, ¿podrías especificar un poco más?. ¿que campo quisieras actualizar?, ¿de que tipo es? etc.

Saludos
Chrono
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar