Iterar no TDataGrid

Iterar no TDataGrid Prezados boa tarde, Estou desenvolvendo uma nova funcionalidade no meu sistema, que utiliza um TDataGrid, e preciso iterar neste grid para gravar os dados contidos nele. Pesquisando nos exemplos do Adianti, no livro e no forum não achei um exemplo que mostre como fazer isto. Alguém tentou fazer algo semelhante para mostrar-me?...

Iterar no TDataGrid

Fechado

Carlos Fabiano Gonsalves 02/01/2015 (há 9 anos)

Prezados boa tarde,

Estou desenvolvendo uma nova funcionalidade no meu sistema, que utiliza um TDataGrid, e preciso iterar neste grid para gravar os dados contidos nele.

Pesquisando nos exemplos do Adianti, no livro e no forum não achei um exemplo que mostre como fazer isto.

Alguém tentou fazer algo semelhante para mostrar-me?

Curso completo Meu Negócio Pronto

Use para si, ou transforme em um negócio: Inclui aulas e códigos-fontes
Gestor de conteúdo (SITE) + Loja Virtual (E-Commerce) + Emissor de Notas para infoprodutos

Meu negócio pronto Quero me inscrever agora!

Comentários (6)

Alexandre Evangelista de Souza 02/01/2015 (há 9 anos)

não entendi explica melhor

Carlos Fabiano Gonsalves - AUTOR DO POST 03/01/2015 (há 9 anos)

Bom dia Alexandre,

Tenho um TDatagrid que possui, por exemplo, 10 registros.

Ele foi carregado utilizando o objeto STDClass, ou seja, os dados contido neste Grid não foram carregados por um Model.

O que eu preciso é recuperar as linhas deste grid para gravá-los no banco banco de dados, porém não sei como fazer isso.

Alexandre Evangelista de Souza 03/01/2015 (há 9 anos)

posta o codigo

Rafael Ramos 03/01/2015 (há 9 anos)

Carlos, não sei se é a melhor solução, mas você pode criar um array de objetos. Na medida que for preenchendo cada linha do TDataGrid você incrementa esse array com o objeto atual.

Não sei como está montada essa parte da sua aplicação, mas talvez você precise colocar esse array de objetos em sessão (TSession).

Com esse array de objetos populado, você instancia um Active Record, faz um loop nesse array (foreach) e vai dando "store()" linha a linha do array...

Como disse, não sei se é a melhor opção, acho que funcionaria!

Pablo Dall'Oglio 11/01/2015 (há 9 anos)

Oi Carlos,

Anotei aqui para implementar um getItems() na Datagrid. Acredito que ajudaria neste cenário.

Abraço,
Pablo

Carlos Fabiano Gonsalves - AUTOR DO POST 14/01/2015 (há 9 anos)

Fala Pablo,

Fico feliz por ajudar a melhorar o Adianti.

Enquanto a melhoria não chega, resolvi o meu problema implementando da maneira que o Rafael comentou.

Segue o código para quem precisar.

<?php
class FaturaReceberForm extends TPage
{
private $parcelas;
//CODIGO DA CLASSE
function calcularParcelas()
{
try
{
// open a transaction with database 'sollus'
TTransaction::open('sollus');
$this->parcelas = array();
$object = $this->form->getData('FaturaReceber');
$this->form->validate();
$valortotal = Util::converterNumero($object->valor);
$valor = 0;
$qtdparcelas = (int) $object->qtdparcelas;
$formapagamento = new FormaPagamento($object->formapagamento_id);
$this->datagrid->clear();
for ($n=1; $n<=$qtdparcelas; $n++)
{
// add an regular object to the datagrid
$item = new StdClass;
$item->parcela_id = NULL;
$item->numero = $n;
$item->databaixa = NULL;
$valorparcela = $valortotal / $qtdparcelas;
$valor += Util::truncarValor($valorparcela);
if ($n == $qtdparcelas){
$item->valorparcela = $valorparcela + ($valortotal - $valor);
$item->valorparcela = Util::truncarValor($item->valorparcela);
}else{
$item->valorparcela = Util::truncarValor($valorparcela);
}
$item->valorparcela = Util::converterNumero($item->valorparcela,TRUE,2);
$this->datagrid->addItem($item);
$this->parcelas[] = $item;
TSession::setValue('parcelas',$this->parcelas);
}
$this->notebook->setCurrentPage(1);
$this->form->setData($object);
TTransaction::close();
}
catch (Exception $e) // in case of exception
{
// shows the exception error message
new TMessage('error', 'Error ' . $e->getMessage());
// undo all pending operations
TTransaction::rollback();
}
}
function onSave()
{
try
{
TTransaction::open('sollus');
$object = $this->form->getData('FaturaReceber');
$this->form->setData($object);
$this->form->validate();
$this->parcelas = TSession::getValue('parcelas');
//CÓDIGO DA FUNCTION
$object->addFaturaParcela($this->parcelas);
$object->store();
if ($this->parcelas)
{
foreach ($this->parcelas as $parcela)
{
$faturaparcela = new StdClass;
$faturaparcela->parcela_id = $parcela->parcela_id;
$faturaparcela->numero = $parcela->numero;
$faturaparcela->vencimento = $parcela->vencimento;
$faturaparcela->valorparcela = $parcela->valorparcela;
$faturaparcela->databaixa = $parcela->databaixa;
$this->datagrid->addItem($faturaparcela);
}
}
TSession::setValue('parcelas',array());
new TMessage('info', TAdiantiCoreTranslator::translate('Record saved'));
TTransaction::close();
}
}
catch (Exception $e) // in case of exception
{
// shows the exception error message
new TMessage('error', 'Error ' . $e->getMessage());
// undo all pending operations
TTransaction::rollback();
}
}
function onEdit($param)
{
try
{
if (isset($param['key']))
{
// get the parameter $key
$key=$param['key'];
// open a transaction with database 'sollus'
TTransaction::open('sollus');
// instantiates object Aeroporto
$object = new FaturaReceber($key);
//CODIGO DA FUNCTION
$faturaparcela = $object->get_FaturaParcela();
$this->parcelas = array();
if ($faturaparcela){
foreach($faturaparcela as $parcela){
$objparcela = new StdClass;
$objparcela->parcela_id = $parcela->id;
$objparcela->fatura_id = $parcela->fatura_id;
$objparcela->numero = $parcela->numparcela;
$objparcela->vencimento = TDateSollaris::date2br($parcela->vencimento);
$objparcela->valorparcela = Util::converterNumero($parcela->valor,TRUE);
$objparcela->databaixa = TDateSollaris::date2br($parcela->databaixa);
$this->datagrid->addItem($objparcela);
$this->parcelas[] = $objparcela;
}
TSession::setValue('parcelas',$this->parcelas);
}
//CODIGO DA FUNCTION
// close the transaction
TTransaction::close();
}
else
{
$this->form->clear();
TSession::setValue('parcelas',array());
}
}
catch (Exception $e) // in case of exception
{
// shows the exception error message
new TMessage('error', 'Error ' . $e->getMessage());
// undo all pending operations
TTransaction::rollback();
}
}
}
?>