Jhonas

Faça uma pesquisa no forum http://scriptbrasil.com.br/forum/index.php...te=enviar+email abraço

existem outras maneiras de fazer essa operação .... usando o comando insert como voce esta usando seria uma das maneiras mais rapidas entretanto o que pode variar esse tempo de acesso, é o tipo de banco de dados que voce esta usando e o tipo de processador do micro abraço

veja as configurações do Report Layout Options abraço

Ao recuperar grandes conjuntos de dados em uma consulta, pode ocorrer a mensagem de erro "9476: Temporary table resource limit. limite de recursos da tabela temporária Para corrigir isso: Vá ​​em BDE Administrator. Defina o Block Size para = 4096 e Level = 7 abraço

voce não olhou no site ? # Delphi 5 (23.63 MB) # Delphi 6 (23.63 MB) # Delphi 7 (23.63 MB) # Delphi 2005 (8.87 MB) # Delphi 2006 (14.72 MB) # Delphi 2007 (14.72 MB) # Delphi 2009 (12.92 MB) # Delphi 2010 (13.19 MB) # Delphi XE (13.94 MB) # Delphi XE2 (14.99 MB) # Delphi XE3 (16.51 MB) abraço

veja esses links http://www.devmedia.com.br/quick-tips-cria...lphi-2010/16355 http://www.tmssoftware.com/site/advtoolbar.asp abraço

existem no forum posts relacionados a sua duvida ... favor pesquisar http://scriptbrasil.com.br/forum/index.php...te=enviar+email OBS: dependendo da quantidade de arquivos e o tamanho de cada arquivo pode ficar um pocesso muito lento abraço

o programa além de não perder performance, fica com um visual muito mais bonito e profissional eu utilizo skins em meus programas ( delphi 5 e 7 ) OBS: mas tome cuidado ao selecionar uma skin, pois pode ficar desagradavel à visão e incomodar muito o usuario abraço

quem determina a velocidade de escrita ou leitura em um banco de dados é o processador do micro para testar a velocidade de escrita e leitura do seu processador, use o programa chamado Lan Speed Test http://download.cnet.com/LAN-Speed-Test/30...4-10908738.html OBS: faça uma comparação do resultado de seu micro com outros quanto menor o valor, mais rapido é o processador abraço

use um campo comum para poder relacionar a tabela Cargos com a tabela Salario como fazer relacionamento entre tabelas http://pt.scribd.com/doc/58775431/2/Relaci...o-entre-Tabelas abraço

identifique a unit do form no form principal ( Menu ou outro ) OBS: a variavel deverá ter um nome unico para ela ... ou seja, não poderá existir em outro form o mesmo nome de variavel abraço

exemplo: procedure TForm1.DBEdit3Change(Sender: TObject); begin if Query1QUANT.Value < 0 then DBEdit3.Font.Color := clRed else DBEdit3.Font.Color := clBlue; end; abraço

tem o componente alpha skin para o delphi .. instale e depois procure por skins do win 8 metro na net http://rflfn.blogspot.com.br/2012/11/como-...a-skins-no.html abraço

procedure TForm1.Button1Click(Sender: TObject); var valor : real; begin SysLocale.MiddleEast := true; Edit1.BiDiMode := bdRightToLeft; // alinha o valor a direita valor := 5000; Edit1.text := FormatFloat('0.00',valor); CurrencyEdit1.DisplayFormat := '0.00;-0.00'; // aceita valores positivos e negativos CurrencyEdit1.Value := valor end; OBS: no banco de dados use campo tipo float ou double, pois isso independe de como voce vai mostar na tela se voce usar tipo texto vai ter que ficar convertendo o valor para poder calcular abraço

uma das opções que utilizo é o uso do componente Batchmove do delphi http://www.ramosdainformatica.com.br/art_r...s01.php?CDA=756 http://www.planetadelphi.com.br/dica/5116/...ara-o-batchmove outro exemplo http://www.componentace.com/batch-move-delphi.htm outra forma é utilizar a sincronização automatica de banco de dados veja no google http://www.google.com.br/search?q=+resynch...hl=pt&gbv=2 abraço

Basta deixar as opções ( akTop, akLeft, akRight, akBottom ) todos como true abraço

exemplo de leitura de uma string dentro de um TFilestream http://stackoverflow.com/questions/1159763...lestream-delphi abraço

veja se uma de suas funções não está tentando escrever em alguma pasta do sistema ( previlegio de administrador ) após um determinado numero de tentativas, o win 7 considera ataque de virus e pede para desligar o pc para evitar danos maiores abraço

a resolução 800 X 600 é usada apenas para padronizar a tela para outros monitores de video vamos supor que o seu monitor de trabalho esteja com a resolução de 1024 X 768 e que voce considera que essa resolução seja a ideal .... se voce configurar a função ( codigo do programa ) como valores padrão Uses TypInfo; const sw : longint = 1024; sh : longint = 768; procedure TForm1.FormCreate(Sender: TObject); var i , w : integer; begin w := width; // automatico ou pode usar a constante sh Scaled := true; if (Screen.width <> sw) then Scaleby(screen.width,sw); for i := ComponentCount-1 downto 0 do with Components[i] do begin if GetPropInfo(ClassInfo, 'Font') <> nil then Font.Size := (width div w) * font.Size; end; end; ao rodar o programa em um monitor que esteja definido como 1280 X 1024, a resolução automaticamente será de 1024 X 768 ( a que voce definiu no código ) ... então todos os seus forms deverão estar configurados para usar 1024 X 768. isso acontece naqueles monitores onde a largura é quase o dobro da altura veja esse exemplo: observe que se voce usou um monitor de trabalho Formato Fullscreen 4:3 / 5:4 (quadrado), ao utilizar um monitor no Formato Widescreen 16:10 / 16:9 (HD ou Cinema), as bordas dos forms ficarão fora da tela então quando voce usa um monitor que esta dentro do padrão do seu monitor, funciona sem problemas tente essa dica: http://www.planetadelphi.com.br/dica/6803/ajuste-automatico-da-resolu%C3%A7%C3%A3o abraço

voce pode baixar o componente desses links http://www.sourcecodedownloads.com/142047/ http://www.bvbcode.com/code/h2ywcqdo-1656292-down abraço

veja ... leia todo o tópico http://scriptbrasil.com.br/forum/index.php...st&p=528172 abraço

Mensagem erro 3 - Balança fora de calibração ao efetuar a calibração correta do peso o erro não mais aparecerá procedimento para efetuar a calibração de peso na balança OBS: para a aferição da balança utilize um peso de 5 Kg abraço

Uses Registry; procedure TForm1.Button1Click(Sender: TObject); var Reg: Tregistry; S: string; begin Reg:=Tregistry.create; with Reg do begin rootkey := HKEY_CURRENT_USER; If Openkey('Control Panel\Desktop\',false) then s := ReadString('Wallpaper') else showmessage('Registro não encontrado'); closekey; end; showmessage('caminho da imagem = ' + s); // VEJA SE O CAMINHO NO SEU MICRO É ASSIM // Registro HKEY_CURRENT_USER // Control Panel\Desktop // Wallpaper (REG_SZ) end; abraço

tente entrar em contato com o autor desse link http://rafaelgcoelho.blogspot.com.br/2012/...-delphi-xe.html http://eareis.wordpress.com/2010/07/09/pro...-acesso-remoto/ veja tambem esse exemplo http://www.adilson.com.br/download/diversos/chat.zip abraço

Foi mal ... coloquei no lugar errado seria isso abraço