ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

TColumn : Como acessar o DBGrid?

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
norenberg
Novato
Novato


Registrado: Segunda-Feira, 19 de Julho de 2004
Mensagens: 77

MensagemEnviada: Ter Set 13, 2005 8:55 am    Assunto: TColumn : Como acessar o DBGrid? Responder com Citação

Prezados

Não estou conseguindo responder às mensagens pela Opção "responder" o assunto
"Índice de Forums > Dúvidas > TColumn : Como acessar o DBGrid? > Responder \"
está dando erro : Duplicate entry \'32767\' for key 1
Acho que não sei trabalhar direito neste fórum.

Mas vamos ao que interessa. Continuar o assunto TCOLUMN.

O state é uma propriedade do TDBGridColumns
que por sua vez é propriedade do TBDGrid.

Ou melhor, abaixo descrevo passo a passo, para entender melhor.
(tudo isto porque estou clicando no Title do DBGrid,
procedure TDBGridZebrado.TitleClick(Column: TColumn); )

1º) Fecho a query, assim: Column.Field.DataSet.Close;
2º) Para saber se a query associada ao TDBGrid é do MySql eu faço:
if (Column.Field.DataSet is TZMySqlQuery) then begin
3º)Ai eu pego o conteudo do SQL.Text e altero, assim:
Txt := TZMySqlQuery(Column.Grid.DataSource.DataSet).SQL.Text;
iPos := Pos(\'ORDER BY\',UpperCase(TZMySqlQuery(Column.Grid.DataSource. DataSet).SQL.Text));
TZMySqlQuery(Column.Grid.DataSource.DataSet).SQL.Text :=
Copy(TZMySqlQuery(Column.Grid.DataSource.DataSet).SQL.Text,1,iPos+Cool+
\' \'+CampoOrd+ sOrdem;
end;
4º) Então eu abro novamente: Column.Field.DataSet.Open;

Mas no 2º passo, se o grid não está com as columas persistentes, dá erro de endereçamento de memória.

Por isso é que eu preciso ter acesso ao TDBGrid.

Agradeço a atenção de todos

Até+
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB