-
Total de itens
9.657 -
Registro em
Tudo que Jhonas postou
-
(Resolvido) CONEXAO MYSLQ E FIREBIRD COM DBEXPRESS
pergunta respondeu ao Livio Neiva de Jhonas em Delphi, Kylix
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 -
Desativar a Composição de area trabalho no delphi
pergunta respondeu ao evandromarson de Jhonas em Delphi, Kylix
Acho que não tem nada desse tipo, mas voce pode abrir as configurações do Painel de Controle e alterar as configurações WinExec('RunDLL32.exe Shell32.DLL, Control_RunDLL Desk.cpl', SW_Show); //Os outros itens do Painel de Controle podem ser acessados mudando-se o nome do arquivo .cpl, exemplo: Modem.cpl, Netcpl.cpl. abraço -
Voce vai encontrar tudo o que é preciso nestes endereços: http://www.delphibr.com.br/artigos/param_rave.php http://www.delphibr.com.br/artigos/listarave.php http://www.delphimais.com/modules/PDdownlo...id=4&lid=19 http://www.delphi.eti.br/downloads.php?id=3811 http://www.forumweb.com.br/foruns/index.ph...ost&id=2298 http://www.softplatz.com/software/rave-report-tutorial/ http://www.scribd.com/doc/4941622/rave-report-no-delphi http://www.nevrona.com/files/rave5.pdf abraço
-
Se quizer visualizar, apenas inclua um DBImage (palheta Data Controls) e configure o Datasource e DataField corretamente, fazendo isso a imagem irá aparecer. Para pegar o conteúdo do campo e gravar em disco e supondo que ID seja a chave primaria da tabela: var Arquivo:String; // código Dataset.First; while not Dataset.Eof do begin Arquivo := Dataset.FieldByName('ID').AsString+'.BMP'; TBlobField(Dataset.FieldByName('IMAGEM')).SaveToFile(Arquivo); Dataset.Next; end; abraço
-
Veja como a falta de informação prejudica .... agora é que voce está informando como foi definido o seu campo e nem informou qual é o banco de dados que voce utiliza. É importante fixar que o campo TIMESTAMP é formado por data e hora e o TIMESTAMP é internamente uma espécie de FLOAT, onde a parte inteira é a data e a parte decimal representa as horas. portanto if datademini.Date = strtodate('00/00/0000') then estaria incorreto veja as principais diferenças entre DATE, TIME e TIMESTAMP http://edn.embarcadero.com/article/33724 abraço
-
Mario .. neste endereço vai encontrar vários programas prontos com o código fonte ... entre eles vai encontrar um programa de Agenda http://www.apostilar.com.br/apostilas.php?...3&subcat=60 abraço
-
O componente RxGif faz parte do pacote RxLIB .. voce tem que procurar o arquivo RXGIF.dcu e colocar uma cópia desse arquivo dentro da pasta LIB do Delphi ( caso encontre mais erros como esse, copie todas as dcus para a pasta LIB do delphi ) abraço
-
Do jeito que fez esta correto, não terá problemas em executar outros programas que utilizam um dos dois bancos, no entanto deve ter cuidado ao instalar um aplicativo que tambem instale o interbase ou firebird, pois ele pode sobrebor a configuração atual. abraço
-
Algumas dicas então: http://www.delphi.eti.br/ver_artigo.php?id=41 http://delphidicas.blogspot.com/2007/03/gr...ns-em-dlls.html http://www.babooforum.com.br/forum/Gravar-...hi-t685291.html http://forum.devmedia.com.br/viewtopic.php?t=17918 http://www.forumweb.com.br/foruns/index.php?showtopic=62970 como gerar com imagens uma dll Essa dica usou um bmp mas pode ser adaptada pra jpg, gif, etc ... Via Delphi : - Crie um arquivo de recursos (.RES) contendo os Bitmaps. Use o Image Editor do Delphi para criar este arquivo. Salve-o com o nome BMPS.RES na pasta onde será salvo o projeto do Delphi; - Crie um novo projeto no Delphi; - Remova todos os forms do projeto; - Salve este projeto com o nome DLLBmp.dpr; - Abra o arquivo de projeto (DLLBmp.dpr) e altere para ficar somente com as linhas abaixo: {$R BMPS.RES} library DLLBmp; end. - Compile o projeto (Ctrl+F9). Será criado o arquivo DLLBmp.DLL. - Feche o projeto atual e crie um novo projeto; - Salve-o na mesma pasta que salvou o anterior, mas com outro nome qualquer; - Coloque no form um Edit e um Button; - No evento OnClick do Button coloque o código abaixo: procedure TForm1.Button1Click(Sender: TObject); var Bmp: TBitmap; HandleDLL: THandle; begin { Carrega a DLL } HandleDLL := LoadLibrary('DLLBmp.DLL'); if HandleDLL = 0 then ShowMessage('Não foi possível carregar DLLBmp.DLL') else try Bmp := TBitmap.Create; try Bmp.Handle := LoadBitmap(HandleDLL, PChar(Edit1.Text)); if Bmp.Handle = 0 then ShowMessage('Não foi possível carregar o Bitmap.') else { Pinta o Bitmap no form } Canvas.Draw(0, 0, Bmp); finally Bmp.Free; end; finally { Libera a DLL } FreeLibrary(HandleDLL); end; end; === Para testar === - Execute este projeto; - Digite no Edit1 o nome que foi dado ao Bitmap no arquivo de recursos (.RES); - Clique no botão. O bitmap deverá ser pintado no form. Veja todos antes de tirar a sua conclusão abraço
-
Interbase e firebird utilizam a mesma porta 3050 para comunicação, por isso o conflito quando voce tem o interbase e instala o firebird. Os dois podem ser usados sem problemas desde que o micro tenha um bom processador e bastante memória... ou seja um Servidor de Dados e não um micro comum. caso contrário irá perceber perda de performance nos aplicativos ( lentidão entre as transações ) , pricipalmente em arquivos com mais de 50 mil registros. abraço
-
verifique o Charset do banco de dados. ( use win1252 ) abraço
-
(Resolvido) Diferença delphi 7 para delphi 2007
pergunta respondeu ao nicolasbraz de Jhonas em Delphi, Kylix
Copie todas as .dcus para a pasta LIB do Delphi abraço -
estava distraido mesmo ... voce poderia usar if datademini.Date = strtodate('00/00/0000') then ou if datademini.Date is null then ou ainda if datademini.AsString = ' / / ' then abraço
-
provavelmente ocorreu corrupção de arquivo.... tente com este http://www.freewarebb.com/UNetbootin-323-file6931.html abraço
-
Aparentemente não estou vendo erro algum no código que voce postou... ou o erro pode estar em outro lugar .... tente usar o debugger do delphi para achar onde está o erro (operação invalida com ponto flutuante ) pode ser um calculo, ou uma conversão de string para numero verifique com calma todo o seu código abraço
-
Desculpe não é PageReader ( digitado errado e tambem não é isso ... foi distração minha ) Adicione o componente Band, clique em BandStyle e marque as opções Body Header, First (1) e New age (P) Veja mais detalhes sobre regiões e bandas no Rave Report http://www.delphibr.com.br/artigos/listarave.php http://www.scribd.com/doc/4941622/rave-report-no-delphi http://www.devmedia.com.br/curso/relatorios/Demo-02.pdf http://edn.embarcadero.com/article/31916 http://edn.embarcadero.com/article/30331 abraço
-
O unico lugar que poderia dar esse erro ( operação invalida com ponto flutuante ) seria nesta linha de código dmdados.SqlConFuncionario.ParamByName('cpf').AsString:='%'+EditCpf.Text+'%'; voce esta colocando mascara no cpf ? tipo 123.432.456-90 ? como voce definiu este campo no banco de dados ? string com mascara ? verifique abraço
-
Tente assim Query.SQL.Clear; query.SQL.add('SELECT MAX( CAST(N_REGISTRO AS INTEGER)) FROM Membros'); query.ExecSQL; n_registro.text := inttostr(Query.Fields[0].AsInteger); abraço
-
Bom... primeiro preciso de mais informações: qual a versão do seu delphi ? banco de dados ? O erro tem que ser aquele que aparece extamente na sua tela seja mais amplo nas informações para ficar mais facil ajudar abraço
-
Isto significa que todos os codecs estão instalados e funcionando, a reprodução do som neste caso fica por conta da configuração dos auto-falantes e outras configurações no dispositivo de som Va em Iniciar > Configurações > Painel de Controle > Sons e Dispositivos de Aúdio > Procure na paleta de Audio > Reprodução do Som ( escolha o dispositivo padrão do micro ) Veja tambem Gravação do Som e Reprodução de Música MIDI Um dos dispositivos existentes fará o som ser tocado no alto-falante abraço
-
Alterar o fundo do ambiente de trabalho (padrão de fundo) Aplicável a todas as edições do Windows Vista O fundo do ambiente de trabalho (também denominado padrão de fundo) pode ser uma imagem digital de uma coleção pessoal ou um dos fundos fornecidos com o Windows. Também pode seleccionar uma cor para o fundo do ambiente de trabalho ou utilizar uma cor para a moldura da imagem de fundo. O Windows inclui muitas escolhas de fundos para o ambiente de trabalho Alterar o fundo do ambiente de trabalho 1. Abrir o Fundo do ambiente de trabalho clicando no botão Iniciar, clicando em Painel de Controle, clicando em Aspecto e Personalização, clicando em Personalização e, em seguida, clicando em Fundo do ambiente de trabalho. 2. Clique na imagem ou cor que pretende definir como fundo do ambiente de trabalho. Se a imagem que pretende utilizar não estiver na lista das imagens de fundo do ambiente de trabalho, clique na seta para baixo da Localização da imagem para ver outras categorias ou clique em Procurar para procurar a imagem no computador. Quando encontrar a imagem pretendida, faça duplo clique na mesma. Esta imagem será definida como fundo do ambiente de trabalho e será apresentada na lista de fundos de ambiente de trabalho. Procurar imagens noutras localizações no computador 3. Em Como deve a imagem ser posicionada, escolha se pretende ajustar a imagem à largura da tela, dispor em mosaico ou centrá-la na tela e clique em OK. Nota: Se escolher centrar a imagem como fundo do ambiente de trabalho, também pode escolher uma cor de fundo para a moldura da imagem. Em Como deve a imagem ser posicionada, clique em Alterar a cor de fundo, clique numa cor e, em seguida, clique em OK. Pode definir qualquer imagem armazenada no computador (ou uma imagem que esteja actualmente a visualizar) como fundo do ambiente de trabalho clicando com o botão direito do rato na imagem e, em seguida, clicando em Definir como Fundo do Ambiente de Trabalho. Clique com o botão direito do mouse para definir a imagem como fundo do ambiente de trabalho abraço
-
Veja estes https://www.scriptbrasil.com.br/script/python/Forca.zip http://www.vivaolinux.com.br/scripts/downl...jogodaforca.zip https://www.scriptbrasil.com/uy/codigos/python/juegos-python/ https://www.scriptbrasil.com.br/download/codigo/7171/ http://www.programadoresdejogos.com/forum/...pic.php?p=63855 Jogos em 2D e 3D em python http://infomoz.net/modules/news/article.php?storyid=263 http://www.vivaolinux.com.br/artigo/Python...-Mundo?pagina=2 Já que gosta de jogos, veja tambem http://unidev.com.br/busca.asp?Busca=game&...1&cmdOk.y=1 abraço
-
use uma banda chamada PageReader no lugar da de title, assim ela aparecerá em todas as suas paginas abraço
-
Sim ... e voce pode fazer uma comparação com o códico abaixo if you pull out the basic script code being executed in subprocess: if 1: import sys, os, time, threading # a thread, which waits for the main program to terminate def joiningfunc(mainthread): mainthread.join() print('end of thread') if 1: main_thread = threading.current_thread() def worker(): childpid = os.fork() if childpid != 0: os.waitpid(childpid, 0) sys.exit(0) t = threading.Thread(target=joiningfunc, args=(main_thread,)) print('starting worker') t.start() print('joining worker') t.join() # Should not block: main_thread is already stopped w = threading.Thread(target=worker) w.start() abraço
-
Acho que se voce deletar os campos do ClientDataSet e adiciona-los novamente, não precisará deletar os edits abraço