Exemplo de como faer uma varredura nos registros selecionados:
procedure TForm1.btnDoSumClick(Sender: TObject);
var
i: Integer;
sum : Single;
begin
if DBGrid1.SelectedRows.Count > 0 then
begin
sum := 0;
with DBGrid1.DataSource.DataSet do
begin
for i := 0 to DBGrid1.SelectedRows.Count-1 do
begin
//é aqui que vc processa o registro
GotoBookmark(Pointer(DBGrid1.SelectedRows.Items[i]));
sum:= sum + FieldByName('Size').AsFloat;
end;
end;
//exibe num label o resultado da soma
edSizeSum.Text := FloatToStr(sum);
end
end;
Sds,
Fabiano
11/05/2010 11:29, Richardson Freddo escreveu:
>
>
>
> Pessoal.
>
> Tenho um DBGRID na tela com registros.. então o usuário vai selecionar
> alguns registros aleatoriamente..
> (MultiSectc) ..
>
> Agora é o seguinte.. eu quero pegar esses registros q ele selecionou e
> trabalhar com eles..
>
> tipo assim
>
> sao boletos emitidos.. e agora, quero gerar os arquivos de remessa
> desses boletos.. ja tenho a rotina para gerar o arquivo .. so quer
> saber como fazer para ele gerar o arquivo de remessa para os boletos
> que ele selecionou no dbgrid.. entenderam?
>
> Valeww
> Richardson Marcelo Freddo.
> msn: freddodp...@hotmail.com <mailto:freddodpvat%40hotmail.com>
> Skype: r.freddo
> Rondonópolis/MT
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
[As partes desta mensagem que não continham texto foram removidas]
