Livio Neiva

ola todos!! eu tenho um componente chamado EditNum serve para por casas decimais apos a virgula. ex. 10 --->> 10,00 eu gostaria de ter um componente para porcentagem?? ex. 10 -----> 10% Existe esse componente??? como faço para conseguir?? valeu e muito obrigado??

eu fiz um formulario de cadastro com as conexão DBExpress, e quando eu insiro dados e confirmo, ou seja eu dou o post, aparece a seguinte menssagem de erro!!! projetc siscom.exe raised exception class EdatabaseError whith message 'Data truncated for column 'vltotal' at row 1'. process stopped. Use step or run to continue vltotal é um campo(registro) do meu banco de dados. o que faço para resolver????

eu instalei o MySQL 5 e o semáforo não apareceu na barra de tarefa próximo ao relógio. na vesão mysql o semaforo aparece?? se aparece, por favor da para ensinar como fazer ele aparecer??? valeu obrigado a todos

Tenho a seguinte opnião: Para que correr o risco com uma versão que é sabido possuir vários bugs ? Se sei que existe uma versão mais estável ( confiável ), é justamente essa que quero usar, para evitar futuras dores de cabeça. abraço valeu grande amigo mais uma vez o problema estar resolvido!!!

eu uso o programa FabForce DBDesigner 4 para criar meus bancos de dados em mysql depois eu sicronizo(Transferencia) para mysql50. so que depois que eu instalei MySQL 5.0, não consigo mais fazer a transferencia para mysql50 como faço para resolver??

Use este software para varrer os registros do sistema em busca de entradas inválidas que ficaram das outras instalações http://www.baixaki.com.br/download/Easy-Cleaner.htm OBS: Desinstale o \MySQL Serve 4.1 e depois de limpar os registros, reinstale novamente abraço beleza grande!! eu instalei o MySQL5 e deu certo, so mais essa pergunta, so por curiosidade você me indicou essse programa como drive para solucuinar a conexão com MySQL 4.0.26 OBS: voce tem que fazer o download do dbExpress driver for MySQL 4.0 http://www.sharewareconnection.com/dbexpre...r-for-mysql.htm e observando bem depois, ele deixou uma conexao chamada de Devart MySQL que dava certo fazer a conexão com Mysql 4.0.26, eu gostaria de saber se esses drives ou a versão 4.0.26 não iria me dar problemas no futuro (com bug)ou se drives Devart vão inspirar futuramente. valeu obrigado!!

Tente nesses dois endereços Neste voce tem que selecionar a versão que voce quer http://download.cnet.com/MySQL/3000-10254_4-52753.html Neste existem vários sites que disponibilizam o download da versão MySQL 4.1.10 http://translate.google.com.br/translate_s...k&resnum=11 abraço Valeu jhonas, conseguir baixar!! meu novo problema agora é esse que explico abaixo!!! eu fiz a instalação do MySQL server 4.1.10 quando eu chego na última janela (MySQL server Instance Configuration), que no qual começa o processo configuração prepare confiruation write configuration file (c:\arquivo de programas\MySQL\MySQL Serve 4.1\my.ini) Start Service ---->>>> da erro quando chega nessa etapa Apply security settings menssagem de erro Cannot Create Windows Service for MySQL. Error: 0 como resolvo??

Sequel2.0 Release 4 Interface SQL para Delphi que permite que você desenvolva aplicações baseadas em SQL puro. É rápido, eficiente e acessa direto o ODBC32 do Windows. http://superdownloads.uol.com.br/download/65/sequel/ abraço você é realmente de inpressionar probema resolvido!!! Valeu muuuuito obrigado pela atenção e ajuda!!

estou usando delphi 7.0, e que tipo de informações você precisa para resolver esse problema??? me mande seu email que mando as telas gravada no word para você diagnosticar melhor valeu obrigado

Livio Neiva, de que SEQUEL você está ser referindo?Seria interessante você por um link ou algo que ajude os colegas leitores a localizarem-se sobre o assunto. Se for sobre este Sequel, então o tópico está na sessão errada. Abraços eu pequei essas informações na pasta que o programa ta instalado, infelizmente ta em inglês ------------------------------------------------------------------------------- Package Description =================== Sequel 2.0 SDK Package Package Release 7 Released on April 6, 2002 Package supports both fInstall & Uninstall functions. Contact Information =================== wwww: http://www.rawos.com/odbc/index.html e-mail: rawos@rawos.com pad: http://www.rawos.com/padfiles/sequel.xml ------------------------------------------------------------------------------- Sequel License Agreement 1. RECITALS "SOFTWARE PRODUCT" shall mean all files you have obtained with this file. "REGISTRATION CODE" shall mean a sequence of digits and/or chars that is being accepted by the SOFTWARE PRODUCT as a valid and giving the right to use SOFTWARE PRODUCT to the maximum specified extent. The SOFTWARE PRODUCT will draw this out in way that is described in its reference guide. REGISTRATION CODE may be also referenced as a "LICENSE" within the SOFTWARE PRODUCT. "AUTHORIZED USE" shall mean using performed by an owner of appropriate REGISTRATION CODE. "AUTHOR" shall mean the author of the SOFTWARE PRODUCT and holder of its rights. "ENTERPRISE VERSION" shall mean a special version of SOFTWARE PRODUCT with special features. "DEFAULT BUILD" shall mean the Win32 dynamic-link library realized as the sequel.dll file that is being shipped within the Sequel SDK package. "FULL FUNCTIONALITY" shall mean the functionally of DEFAULT BUILD. "SOURCE CODE FUNCTIONALITY" shall mean the FULL FUNCTIONALITY with modified behavior of all licensing-related functionality. "SOURCE CODE" shall mean all files, which are necessary to build dynamic-link library with SOURCE CODE FUNCTIONALITY. The SOURCE CODE can be compiled with Delphi 5 standard edition. The type library is provided in both forms - binary and source (text). 2. FREE USE The SOFTWARE PRODUCT can be used as freeware - i.e. with the $0.0 price under these conditions: Any software using Sequel must legibly display its use and its origin - http://www.rawos.com/odbc. If being used for testing purposes, it can be tested only one month since its first installation. If being used for educational purposes, any application developed during an educational process and using SOFTWARE PRODUCT can not be distributed without full source of such application. If being used for application development, right to develop software with taken of one computer where SOFTWARE PRODUCT is installed is granted. This right ends with ownership of at least one REGISTRATION CODE for development purposes. The total sum of users of SOFTWARE PRODUCT or applications using SOFTWARE PRODUCT is in this case limited to one. SOFTWARE PRODUCT can be used only for testing purposes or for educational purposes or for development purposes. Disassembling or remitting the SOFTWARE PRODUCT to the process of reverse engineering in any way is prohibited. SOFTWARE PRODUCT still draws out its unregistered status. When not being used for development purposes, the count of computers where SOFTWARE PRODUCT can be deployed is not limited.

Gostaria de saber qual a função desse programa sequel!! gostaria de ler artigos, documentários, apostilas sobre ele ficarei grato se alguém puder me ajudar!!!

estou tentando conectar DBExpress através SQLConnection com Firebird 1.5 Eu crio um SQLConnection e faço todas as alterações cabiveis para se conectar com firebird 1.5 DriveName = interbase Database = d:\siscom\siscom.fdb RoleName = Rolename User_Name = SYSDBA Password = masterkey SQLDialect = 3 e quando eu faço a conexao em conected para true aparece a sequinte menssagem de erro unavailable dataBase Eu não estou com IterBase 6.5 serve instalado. Com os componentes do zeos eu faço as conexões numa boa, com mesmo banco de dados ou om qualquer um. e outros programas que trabalham com ferramentas com firebird se conecta normalmente. como faço para resolver??

Como já lhe passei em outro post, existem bugs no delphi ( que são corrigidos atraves de updates ) que voce vai ficar quebrando a cabeça em vão. use a versão do maysql 4.1.10 que é a que eu uso sem problemas, e se voce estiver usando o delphi 7 tente fazer a atualização usando o Update para o delphi 7 ( passei alguns links no seu outro post ) Veja neste endereço a lista de bugs do mysql com o delphi 7 http://74.125.47.132/search?q=cache:7fvwZa...=clnk&gl=br abraço é verdade!!! dei uma olhada no link, estou até meio envergonhado de falar, mais é jeito........ eu não conseguir baixar o MySQL 4.1.10, seria possivel você mandar o o linck exato so no ponto de fazer o dowloard (por favor) eu instalei o MySQL 4.1.15, e com esse não conseguir fazer a conexão, quando já estava no final, na última tela, para deixar mysql conectado dava erro. seria possivel!! valeu obrigado

como faço para instalar os drives MySQL no meu BDE Administrador??? ou seja quero instalar os drives da MySQL no meu OBDC??? Valeu Obrigado a Todos!!!

ola para todos, Uso o mysql com delphi 6/dbexpress já há um bom tempo e nuca tive problema algum. A aplicação ganha muito em performance e solidez. Quanto ao problema da LIbMysqll.dll é só instalar os pack 1 e 2 do dephi 7. eu li esse comentario acima e gostaria de saber como faço a intalação do pack 1 e 2??

Esse é um erro na biblioteca do Visual C++ programa: dbgheap.c Expressão: _CrtIsValidHeapPointer(pUserData) Depure Afirmação falhou para informação em como seu programa pode causar fracasso de afirmação, veja documentação de C++ visual em afirma OBS: Este pode ser um bug do MySQL ... já que lá não existe um arquivo chamado ' dbgheap.c' em MySQL. Se seu programa não faz referencia a um arquivo chamado dbgheap.c, isto parece um bug do Delphi ou do MySql Eu utilizo a versão ( mysql-4.1.10-win32.zip ) com o delphi sem problemas http://dev.mysql.com/downloads/mysql/4.1.html abraço beleza, homem forte e preciso nas resposta, igual a você não existe!!!! vou fazer o que você ta mim indicando, instalar o mysql-4.1.10, para ver se dar certo mais me tira so essa duvida e se maysql 4.1.10 resolver darei o caso como incerrado!!!! eu isntalei um programa chamado de Devart indicado por um dos links acima, que me deu esses drives para onde eu faço a copia desse arquivo dclcrdbx70.bpl. e o que devo fazer com ele?? para que eu possa compilar CRSQLCONNECTION.PAS, CRDbxDesing.pas, dBXDevartMySql.pas, DriverOption.pas POIS já COPIEI PARA AS SEGUINTES PASTA, PASTA BIN DELPHI 7 E PROJECTS\BPL DO DELPHI 7 em uns dos comentarios que le, vi que teria de acrescentar algumas informações dbxdrivers.ini esse arquivo estar gravado nesse caminho C:\Arquivos de programas\Arquivos comuns\Borland Shared\DBExpress [MySQL40] ---------> pois a minha versão é MySQL 4.0.26 GetDriverFunc=getSQLDriverMYSQL --> gostaria de saber qual o nome que uso para a minha versão, onde posso encontra-lo e como faço para instalar LibraryName=dbexpmys.dll --> gostaria de saber qual nome que eu uso para a minha versão, onde posso encontra-lo e como faço para instalar VendorLib=libmysql.dll HostName=ServerName Database=DBNAME User_Name=user Password=password BlobSize=-1 ErrorResourceFile= LocaleCode=0000 valeu ficarei muito grato pela ajuda

Livio ... algumas sugestões: Download do MySQL 4.0.26 http://www.brothersoft.com/mysql-225767.html http://www.topshareware.com/mysql-4.0.26/downloads/1.htm Apostilas sobre conexão dbexpress usando mysql http://www.delphibr.com.br/artigos/mysql_delphi.php http://www.justsoftwaresolutions.co.uk/del...nd_mysql_5.html http://www.delphi.eti.br/downloads.php?id=4551 outras formas de conexão http://imasters.uol.com.br/artigo/2205 http://www.devmedia.com.br/articles/viewco...mp=6954&hl= Este tem uma explicação muito boa sobre como instalar o mysql http://www.2ei.com.br/BOXWireless/ManualBO...elessBarras.PDF download do LIBMYSQL.DLL ( se não me engano existe uma dll especifica para a versão o mysql que está usando ) http://www.ks-soft.net/download/LIBMYSQL.DLL OBS: voce tem que fazer o download do dbExpress driver for MySQL 4.0 http://www.sharewareconnection.com/dbexpre...r-for-mysql.htm abraço Ola!!! E baixei o libMySQL.dll indicado por você no fórum da scriptbrasil, e copiei para pasta system32, para pasta bin do delphi, (se não copiar para pasta bin do delphi ele não conecta)agora o MySQL conecta, mais quando tentamos desconectar aparece essa mensagem de erro. Informandos tb que já instalei o programa indicado pelo fórum (driver dbexpress com mysql 4.0) nome do arquivo dbxmda.exe debug Assertion field Presss retry to debug applicaton anular repetir ingnorar Se tentar anular ou repetir ou ingnorar, o delphi fecha. eumandei um email com a tela para você da uma olhada

MySQL Eu já copiei LIBMYSQL.DLL para as pastas Windows, sistem, sistem32 e nada de resolver, eu me conecto normal com sqlfront, não sei mais como faço para resolver. e com componentes zeos Com os componentes zeos a conexão feita numa boa. firebird Eu não estou com IterBase 6.5 serve instalado. Com os componentes do zeos eu faço as conexões numa boa. Valeu obrigado pela atenção.

banco de dados MySQL V.4.0.26 Cirei uma conexão com componentes do DBExpress usando SQLconnection, com banco de dados sql, so que quando vou conectar aparece a menssagem de erro abaixo Unable to load LIBMYSQL.DLL Eu já copiei LIBMYSQL.DLL para as pastas Windows, sistem, sistem32 e nada de resolver, eu me conecto normal com sqlfront, não sei mais como faço para resolver. e com componentes zeos Com os componentes zeos a conexão feita numa boa. como faço para resolver???, SO RELEMBRANDO a versão do MYSQL 4.0.26 FIREBIRD 1.5 Cirei uma conexão com componentes do DBExpress usando SQLconnection, com banco de dados do firebird, so que quando vou conectar aparece a menssagem de erro abaixo UNAVAILABLE DATASBASE Eu não estou com IterBase 6.5 serve instalado. Com os componentes do zeos eu faço as conexões numa boa. como faço para resolver???, SO RELEMBRANDO a versão do FIREBIRD 1.5 Valeu obrigado pela atenção. OBRIGADO A TODOS

problema resolvido!!! obrigado a todos

Desculpe, mais sinceramente não percebo onde estar erro!!! Simplificando: cada 3 aspas uma é impressa usando o exemplo que te passei // imprimindo virgula com apostrofes s := 'Imprimindo '+''','''; a saida disso seria ',' veja o seu comando : caracteres estranho no inícios dos dados que eu inseri percebe onde esta o erro ? abraço Desculpe!!! Sinceramente eu não percebo onde estar erro e não estou conseguindo corrigi-lo!!

ola!! fiz um procedimento para alterar no DBGrid e gostaria quando eu clicasse em alterar o curso ficasse piscando dentro do registro(célula) selecionada. Ex. Da mesma forma acontece quando eu pressiono F2, o curso fica piscando dentro da célula. procedure TF_Dptos.BtnAlterarClick(Sender: TObject); begin F_Dados.T_Dpto.Edit; PanTitulo.Caption := 'Cadastro de Departamento - Alterando'; end; gostaria da resposta com base no exemplo acima.

Zuera ... A funcionalidade deste comando é a de mostrar para o usuario ou o programador, o conteudo das variaveis ou como ficara a instrução que ele vai adicionar a SQL F_Dados.Q_Banco.SQL.Add('INSERT INTO BANCO (NOME, EMAIL, CODBANCO, ENDERECO, BAIRRO, CIDADE, ESTADO, CEP, FONE, CELULAR, FAX, GERENTE, AGENCIA, CONTA) VALUES ('); Livio um exemplo bem simples: procedure TForm1.Button1Click(Sender: TObject); var s : string; begin // imprimindo virgula com apostrofes s := 'Imprimindo '+''','''; label1.caption := s; // imprimindo virgula sem apostrofes s := 'Imprimindo '+','; label2.caption := s; end; abraço ola!!! nobre amigo, entendi bem sobre o show menssage, ralmente ele não estar implicando em nada. agora sobre o outro problema, sinceramente não entendi!!! "Outra coisa, eu faço a inserção dos dados normal na tabela, só que quando eu vou visualizar os registros eles estão com uns caracteres estranho no inícios dos dados que eu inseri, tipo assim. ||Rua Benicio Diógenes......(dois palitos pretos e o dados que inserir na tabela)" não conseguir resolver, seria posivel você ser mais direto e me informar onde e como devo corrigir o erro no meu prcedimento!!! valeu você's show's bola!!!

ola todos!!! Ele compilou numa boa, mais na hora que eu testei, ou seja tentei excluir sem nenhum registro selecionado ele deu erro. Outra coisa, se for possível tb fazermos essa correção!!! Nesse mesmo formularios com os mesmo procedimento, eu tenho uma lista de registro, quando eu excluo um registro, os outros desaparecem, e tenho que listar-los todos novamentes, e não quero assim, eu quero excluir um registros e que os outros registros continue listados. Como faço para resolver isso?? Veja a menssagem; Could not convert variant of type (null) into type (Integer) Com essa linha tachada em azul codBanco := F_Dados.Q_Banco.FieldbyName('codigo').Value; procedure TF_Bancos.BtnExcluirClick(Sender: TObject); begin codBanco := F_Dados.Q_Banco.FieldbyName('codigo').Value; if codBanco = 0 then Begin MessageDlg('Nenhum registro foi selecionado para Exclusão!',mtInformation,[mbOK],0); Exit; end; if Application.MessageBox('Deseja Realmente Excluir?','Pergunta do Sistema',mb_YesNo + mb_IconQuestion) = idYes then begin F_Dados.Q_Banco.Active := False; F_Dados.Q_Banco.SQL.Clear; F_Dados.Q_Banco.SQL.Add('DELETE FROM BANCO WHERE CODIGO = '+#39+IntToStr(codbanco)+#39); F_Dados.Q_Banco.ExecSQL; end; end; como faço para resolver?? Valeu obrigado a todos que participam desse fórum!!! procedure TF_Bancos.BtnExcluirClick(Sender: TObject); begin codBanco := F_Dados.Q_Banco.FieldbyName ('Codigo').Value; if codBanco = 0 then begin MessageDlg('Nenhum registro foi selecionado para exclusão! ', mtInformation, [mbOK], 0); exit; end; if Application.MessageBox('Deseja Realmente Excluir?','Pergunta do Sistema',mb_YesNo + mb_IconQuestion) = idYes then begin F_Dados.Q_Banco.Active := False; F_Dados.Q_Banco.SQL.Clear; F_Dados.Q_Banco.SQL.Add('DELETE FROM BANCO WHERE CODIGO = '+#39+IntToStr(codbanco)+#39); F_Dados.Q_Banco.ExecSQL; end; end; Neste caso voce tem que testar a variavel codBanco fora do botão Excluir, para poder desabilita-lo ou não abraço Ele compilou numa boa, mais na hora que eu testei, ou seja tentei excluir sem nenhum registro selecionado ele deu erro. Outra coisa, se for possível tb fazermos essa correção!!! Eu tenho uma lista de registro, quando eu excluo um registro, os outros desaparecem, e tenho que listar-los todos novamentes, e não quero assim, eu quero excluir um registros e que os outros registros continue listados. Como faço para resolver isso?? Veja a menssagem; Could not convert variant of type (null) into type (Integer) Com essa linha tachada em azul codBanco := F_Dados.Q_Banco.FieldbyName('codigo').Value; procedure TF_Bancos.BtnExcluirClick(Sender: TObject); begin codBanco := F_Dados.Q_Banco.FieldbyName('codigo').Value; if codBanco = 0 then Begin MessageDlg('Nenhum registro foi selecionado para Exclusão!',mtInformation,[mbOK],0); Exit; end; if Application.MessageBox('Deseja Realmente Excluir?','Pergunta do Sistema',mb_YesNo + mb_IconQuestion) = idYes then begin F_Dados.Q_Banco.Active := False; F_Dados.Q_Banco.SQL.Clear; F_Dados.Q_Banco.SQL.Add('DELETE FROM BANCO WHERE CODIGO = '+#39+IntToStr(codbanco)+#39); F_Dados.Q_Banco.ExecSQL; end; end; como faço para resolver?? Valeu obrigado a todos que participam desse fórum!!!

Pro favor nobre amigo!! pode me mande um exemplo como faço para deixa inativo, mais se for possivel, um exemplo, baseado no meus procedimentos que postei acima. valeu obrigado!!! Olá amigo, bom dia. Você está "recebendo" o registro que está querendo deletar em algum Edit, DBEdit, alguma coisa? Abraço. eu tenho um formulario que estar feito em Edits, outro que estar sendo feito em DBdits e outro que estar sendo feito no Proprio DBgrid. Seria possivel você me mandar um exmplo para cada um??? valeu obrigado pela atenção!!!