Dados da estrutura do MYSQL

por **Poka** » 26 Fev 2020 09:23

Bom dia

Uso LIBMYSQL.DLL

precisaria pegar o tamanho e as decimais

   FOR i := 1 TO oQuery:FCount()
      aFields[ i ] := oQuery:FieldName( i )   // nome do campo
      aTypes[ i ] := oQuery:FieldType( i )    // tipo de campo 
      aNames[ i ] := oQuery:FieldGet( i )  //   conteudo do campo

      atam[ i ] := oQuery:Fieldsize( i ) //  nao deu certo
                  decimais ????

   NEXT

se alguém puder ajudar agradeço.

Poka

por **JoséQuintas** » 26 Fev 2020 09:40

Isso é complicado.
Tenho um quebra-galho em ADO pra isso.

por **Toledo** » 26 Fev 2020 10:35

Amigo, tente o seguinte:

atam[ i ] := oQuery:FieldLen( i )
aDec[ i ] := oQuery:FieldDec( i )

Abraços

por **Poka** » 26 Fev 2020 14:57

Quintas, Toledo. Obrigado por responder.

Toledo, deu certo. Obrigado

Poka

por **asimoes** » 16 Mar 2020 20:46

Não sei se atende:

       nTipo := cRecordSet:Fields( i ):Type
       nTam  := cRecordSet:Fields( i ):DefinedSize
       nTamN := cRecordSet:Fields( i ):Precision
       nDec  := cRecordSet:Fields( i ):NumericScale

por **Cavalo Marinho** » 27 Set 2020 18:42

Boa noite Poka
Nao consigo pegar a estrutura do banco mysql/mariadb, poderia passar a query que você escreveu como exemplo, estou iniciando no mariadb/mysql e tenho umas dificuldades tecnicas.
Agradeço.

por **JoséQuintas** » 28 Set 2020 11:12

Fica tudo em tabelas.
Só olhar pelo HEIDISQL e vai ver os nomes das tabelas e dos campos, e índices, e etc.
É no banco: information_schema
Dá uma passeada pelas tabelas, pra ver cada uma, e o que pode consultar.

por **Cavalo Marinho** » 28 Set 2020 16:39

Boa tarde
Quntas talvez eu nao tenha me expressado direito, quanto as tabelas pelo heidsql eu sei como utilizar, eu me refiro a obter os tamanhos e tipos dos campos das tabelas pelo aplicativo, pois utilizo o getbox e tenho que definir o tamanho para edição, eu automatizo pegando os tamanhos (isso em Dbf) pq se alterar a tabela ja tenho alterado automaticamente.

por **JoséQuintas** » 28 Set 2020 17:47

Aí está diretamente relacionado com o que usa pra conectar: hbmysql, sqlmix, ADO, etc.
Eu preferi não deixar o browse preso a isso.

por **Poka** » 29 Set 2020 15:30

Boa tarde

Asimoes, vou testar o seu , parece ter alguma coisa a mais.

José Quintas disse

Só olhar pelo HEIDISQL e vai ver os nomes das tabelas e dos campos, e índices, e etc.

Nunca usei, mas eu precisava fazer no sistema tudo integrado. Um médico pediu um sistema à parte e o sistema dele é MYSQL.
Todo dia tem que atualizar a base de dados do paciente.
Deu tudo certo

Cavalo Marinho disse

Nao consigo pegar a estrutura do banco mysql/mariadb, poderia passar a query que você escreveu como exemplo, estou iniciando no mariadb/mysql e tenho umas dificuldades tecnicas.

Peguei os exemplos do mysql que esta em minigui\harbour, fiz umas alterações e funcionou perfeito.
Não uso MYSQL, estou usando Firebird + harbour + minigui extend
Vou criar um executável aqui pra vc testar aí.
Infelizmente não sei se poderei passar essa semana. mas a semana que vem passo sem falta.

Abraço

Poka

por **JoséQuintas** » 30 Set 2020 10:34

Ah.... tem mais opções....
No caso do ADO, algumas LIBs tem ADORDD, que transforma o acesso ao recordset igual a DBF.

Eu preferi de outro jeito.
Apenas pra facilitar o entendimento:
Vamos imaginar que o browse só vai fazer string... aí ele sempre sabe o tamanho certo.
Então, ao invés de passar pro browse os campos diretamente, passe já transformados.
Ao invés do browse fazer data, número e texto, ele pode fazer Dtoc( Data ), Str( numero, 10, 2 ) e texto
Apenas ao invés de definir a coluna como sendo o campo pro browse converter, você já passa convertido do jeito que quiser.
Acaba sendo simples e prático, e atende dbf, array, e qualquer outra coisa, além de acabar dando mais recursos de uso, porque pode ter campos diferentes do que está no browse, por exemplo ter a ID do registro, sem ter que mostrar no browse.

Quem está online