Iniciante é foda!
Eu consegui configurar (corretamente o database) e ele passou a funcionar
adequadamente usando uma table.
Obrigado,
Áureo
-----MENSAGEM ORIGINAL-----
De: "Áureo" <[EMAIL PROTECTED]>
Enviada em: Qui, 18 Ago 2005 10:34:11
Assunto: Res: Res: Res: [delphi-br] Erro: 'Cannot perform this operation on
closed dataset'.
>Surrute,
>
>Eu fiz a alteração e o problema foi resolvido. Mas usando TABLE eu estou tendo
>problemas, pois não fiz o algoritimo da senha de produção, estou utilizando um
>username de consulta no banco.
>
>Tem como gerar este arquivo usando Query, não tem? Eu vou tentar aqui!
>
>Obrigado,
>
>begin
> NomeArq.Text;
> Endereco := Diretorios.Directory;
> Endereco := Endereco + '\' + NomeArq.Text;
> AssignFile(Arq, Endereco);
> Rewrite(Arq);
> If Not FrmInicio.TableGravar.Active Then FrmInicio.TableGravar.Open;
> FrmInicio.TableGravar.First;
> while not FrmInicio.TableGravar.Eof do
> begin
> write(Arq,
> AjustaStr(FrmInicio.TableGravar.FieldByName('CSCODNIV').AsString, 02));
> writeln(Arq);
> FrmInicio.TableGravar.Next;
> end;
> CloseFile(Arq);
> MessageDLG('Arquivo gerado com sucesso!', mtinformation,[mbok],0);
>end;
>
>-----MENSAGEM ORIGINAL-----
>De: "Surrute - Yahoo!"
>Enviada em: Qui, 18 Ago 2005 09:26:22
>Assunto: Res: Res: [delphi-br] Erro: 'Cannot perform this operation on closed
>dataset'.
>
>>Olhe no código, vc está fechando a tabela ao invés de abrí-la...
>>
>>-------Mensagem original-------
>>
>>De: Áureo
>>Data: 08/18/05 08:36:14
>>Para: Delphi BR
>>Assunto: [delphi-br] Erro: 'Cannot perform this operation on closed dataset'
>>
>>
>>Estou rodando uma geração de arquivo que grava determinada coluna da tabela,
>>mas no meio do processo é apresentada esta mensagem 'Cannot perform this
>>operation on closed dataset'.
>>
>>Já tentei usando uma table e uma query, a mensagem é a mesma.
>>
>>procedure TfrmGravar.BBGravarClick(Sender: TObject);
>>var
>> Endereco: String;
>>begin
>> NomeArq.Text;
>> Endereco := Diretorios.Directory;
>> Endereco := Endereco + '\' + NomeArq.Text;
>> AssignFile(Arq, Endereco);
>> Rewrite(Arq);
>> FrmInicio.tbIntRatingHH.Close; <<<<<<------------------- If
>>Not FrmInicio.tbIntRatingHH.Active Then FrmInicio.tbIntRatingHH.Open;
>> FrmInicio.tbIntRatingHH.First;
>> while not FrmInicio.tbIntRatingHH.Eof do
>> begin
>> write(Arq, AjustaStr(FrmInicio.tbIntRatingHH.FieldByName('CSCODNIV')
>>AsString, 02));
>> writeln(Arq);
>> FrmInicio.tbIntRatingHH.Next;
>> end;
>> CloseFile(Arq);
>> MessageDLG('Arquivo gerado com sucesso!', mtinformation,[mbok],0);
>>end;
>>
>>No iBest, suas horas navegadas valem pontos que podem ser trocados por
>>prêmios. Sem sorteio! Inscreva-se já! www.navegueeganhe.com.br
>>
>>
>>
>>
>>--
>><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>>
>>Para ver as mensagens antigas, acesse:
>> http://br.groups.yahoo.com/group/delphi-br/messages
>>
>>Para falar com o moderador, envie um e-mail para:
>> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>>
>>Links do Yahoo! Grupos
>>
>>
>>
>>
>>
>>
>>
>>
>>[As partes desta mensagem que não continham texto foram removidas]
>>
>>--
>><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>>
>>Para ver as mensagens antigas, acesse:
>> http://br.groups.yahoo.com/group/delphi-br/messages
>>
>>Para falar com o moderador, envie um e-mail para:
>> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>>
>>Links do Yahoo! Grupos
>>
>> Para visitar o site do seu grupo na web, acesse:
>> http://br.groups.yahoo.com/group/delphi-br/
>>
>> Para sair deste grupo, envie um e-mail para:
>> [EMAIL PROTECTED]
>>
>> O uso que você faz do Yahoo! Grupos está sujeito aos:
>> http://br.yahoo.com/info/utos.html
>>
>>
>>
>>
>
>Áureo
>msn: [EMAIL PROTECTED]
>
>No iBest, suas horas navegadas valem pontos que podem ser trocados por
>prêmios. Sem sorteio! Inscreva-se já! www.navegueeganhe.com.br
>
>--
><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
>Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>Links do Yahoo! Grupos
>
> Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>
> Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>
> O uso que você faz do Yahoo! Grupos está sujeito aos:
> http://br.yahoo.com/info/utos.html
>
>
>
>
Áureo
msn: [EMAIL PROTECTED]
No iBest, suas horas navegadas valem pontos que podem ser trocados por prêmios.
Sem sorteio! Inscreva-se já! www.navegueeganhe.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
