Jhonas

se voce colocar o cursor sobre o link, vera no fim da tela ( canto inferior esquerdo ) que o link esta apontando para o proprio tópico. isso aconteceu depois da mudança do forum .... os links foram perdidos somente o autor pode recuperar esses links abraço

existe essa possibilidade sim.... veja nesses links ( alguns com o código fonte ) para voce seguir como exemplo https://www.google.com.br/?gws_rd=ssl#q=controle+de+estoque+delphi abraço

voce pode usar variaveis locais para fazer a soma, e depois jogar os valores nos dbedits para serem salvos na tabela ou pode usar esses exemplos DBEdit5.Text:= FloatToStr(StrToFloat(DBEdit1.Text) + StrtoFloat(DBEdit2.Text) + StrtoFloat(DBEdit3.Text) - StrtoFloat(DBEdit4.Text)); OBS: nesse caso use corretamente as conversões de tipos http://dicassobredelphi.blogspot.com.br/2011/06/dbedit.html abraço

voce não esta usando 2 bancos de dados e sim 2 tabelas até onde voce conseguiu andar no seu código ? veja esses exemplos https://alexandreernesto.wordpress.com/2009/09/12/sistema-de-vendas-em-delphi-por-andre-luiz/ http://www.planetadelphi.com.br/downloading/435 abraço

porque foi escolhido 512 BYTES?? tem como mudar?? Por mais de 30 anos, os dados armazenados em discos rígidos foram formatados em pequenos blocos lógicos chamados setores. O tamanho do setor existente é de 512 bytes. o pequeno setor de 512 bytes consome uma quantidade cada vez menor de espaço na superfície do disco rígido conforme as densidades da área aumentam. Este é um problema no contexto de correção de erros e dos riscos de defeitos de mídia. Por exemplo, os dados em um setor do disco rígido estão consumindo áreas menores, tornando a correção de erros mais desafiadora visto que os defeitos de mídia do mesmo tamanho podem danificar um percentual mais elevado da carga total de dados e, portanto, exigem mais força de correção de erro. Um setor de 512 bytes pode geralmente corrigir um defeito de até 50 bytes de comprimento. Os discos rígidos de hoje estão começando a pressionar os limites da correção de erros com densidades de área recordes. Em consequência, a migração para setores maiores na indústria do disco rígido tornou-se uma necessidade fundamental em relação a conseguir melhorias na correção de erros e alcançar eficiência de formato. voce pode até alterar o valor do setor de um HD com um formatador de baixo nivel, mas um numero de setor maior, implica em maior perda de dados, no caso de erro. abraço

o primeiro link que te passei é exatamente isso ... só que o resultado é colocado dentro de um memo a logica que voce vai seguir é a mesma ... voce só vai precisar fazer as alterações necessarias para o seu uso abraço

exemplo http://www.progtown.com/topic520829-order-by-x1-x2.html abraço

exemplo http://www.devmedia.com.br/trabalhando-com-tipos-json-no-delphi-2010-parte-3/17140 veja outros links sobre isso: https://www.google.com.br/webhp?sourceid=chrome-instant&ion=1&espv=2&ie=UTF-8#q=json+object+to+json+array+delphi https://www.google.com.br/webhp?sourceid=chrome-instant&ion=1&espv=2&ie=UTF-8#q=how+to+convert+json+object+to+json+array https://www.google.com.br/webhp?sourceid=chrome-instant&ion=1&espv=2&ie=UTF-8#q=json%20object%20to%20json%20array abraço

quando clico para minimizar e depois clico para o usuário fazer Loggof já nem aparece a tela de loggof só aparece quando eu não minimizo mas isso está correto .... se voce minimiza a aplicação, a tela de loggof não pode aparecer. ( a não ser que voce queira que ela apareça ... o que não é esteticamente correto ) quando eu minimizo minha aplicação fica um pedacinho do form na área de trabalho. isso tambem está correto, esse pedacinho do form ( os forms que estão minimizados ), deve ficar visivel no canto inferior esquerdo da tela, para que voce possa maximizar novamente a aplicação... ( são os botões de controle da aplicação ) quando até isso, fica invisivel, se voce clicar duas vezes na tela, ele volta a aparecer. OBS: pode fazer perguntas até sanar as suas duvidas ... ok ? abraço

Erro: Não é possível fazer uma janela modal visível esse erro acontece quando voce usa Form.ShowModal ( isso é uma janela Modal ) ou seja, essa janela ( Form ) não permite que voce execute outro comando se ele não for fechado ( Form.Close ). nesse caso voce deve apenas usar Form.Show OBS: o comando que te passei não fecha nenhum form, somente minimiza... então basta maximizar novamente o seu form de Loggof abraço

esse erro indica que voce colocou a procedure antes do IMPLEMENTATION e tem que ser depois dele. abraço

O meu sistema está com o seguinte bug, quando abro ele, e quero por exemplo minimizar acaba ficando visivel a tela de login isso não é Bug, apenas falta de conhecimento na linguagem quando voce minimiza por exemplo, o Menu, que por padrão deverá ser a sua tela principal, voce deve minimizar junto com ele a tela de Login. uma das maneiras de resolver isso, seria : ( isso no form do Menu ) private { Private declarations } procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; depois isso: procedure TFMenu.WMSysCommand(var Msg: TWMSysCommand); begin if (Msg.CmdType = SC_MINIMIZE) then Login.WindowState := wsMinimized; /// coloque aqui o nome do seu form de Login DefaultHandler(Msg); end; OBS: quando voce minimizar o form do Menu, automaticamente o form do Login será minimizado tambem. abraço

isso pode ser erro no registro do windows veja se esses links podem te ajudar http://imdm94.blogspot.com.br/2008/04/como-colocar-sua-aplicao-no-tray.html http://www.devmedia.com.br/systrayicon/654 abraço

baixe a versão correta da dll e depois faça o registro dela no windows http://originaldll.com/file/libpq.dll/31160.html abraço

você tem duas opções: - usar sem aspas: então tudo será automaticamente minúsculas e não diferencia maiúsculas de minúsculas - ou usando aspas tudo passa a ser case sensitive . é recomendado não usar aspas e fazer o PostgreSQL se comportar não diferenciando maiúsculas de minúsculas. isso torna a vida muito mais fácil. alguns exemplos: TEST = test <-- non case sensitive "Test" <> Test <-- first is precise, second one is turned to lower case "Test" = "Test" <-- will work "test" = TEST <-- should work; but you are just lucky. abraço

O que este programa faz é ler linha a linha o ficheiro web e procurar a correspondência. Há alguma otimização possível? ao invés de criar um TStringReader para cada linha do ficheiro web, apenas leia a linha ( lHTTP.Get ) e depois compare com o campo ( Link1 ) da tabela, usando a função POS if pos(linha,procura) > 0 then abraço

sem ter o endereço da pagina, não tem como testar abraço

Qual é o endereço da pagina ?

voce tem o installshield que vem com o delphi no CD de instalação caso não tenha veja os links onde baixar e usar o aplicativo https://www.google.com.br/search?q=installshield&ie=utf-8&oe=utf-8&gws_rd=cr&ei=Y9T2VoaJD8H8wQSamaq4Cg#q=installshield+delphi abraço

tem sim .... da uma olhada nesses links https://www.google.com.br/search?q=encriptar+campo+no+banco+de+dados+delphi&ie=utf-8&oe=utf-8&gws_rd=cr&ei=2O71VpP3JIWWwQT9zpGwDQ abraço

OBS: quando voce monta um sistema em que a senha é colocada dentro de uma tabela, vale lembrar, que, se a senha não for encriptada, a mesma poderá ser descoberta, pela simples visualização da tabela um campo senha nunca deve ser colocado em um dbgrid, somente na janela de login do sistema abraço

exemplo: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); //1) set DBgrid1.DefaultDrawing:=false; //2) put a TDBEdit on DBGrid1 and bind to the field you want; //3) set DBEdit4.Passwordchar='*'; var l:integer; var s:string; begin DbGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State); if Column.FieldName='D1' then begin //MyHidenField if not(gdFixed in State) then begin s:=Column.Field.AsString; for l:=1 to length(s) do s[l]:='*'; //StatusBar1.SimpleText:=s+Format('[%d-%d]',[Rect.Left,REct.Top]); with (Sender as TDBGrid).Canvas do begin //Font.Color:=clRed; TextRect(Rect,Rect.Left,Rect.Top,s); end; end; if (gdFocused in State) then begin DBEdit4.Top :=DBGrid1.Top +Rect.Top; DBEdit4.Left :=DBGrid1.Left +Rect.Left+1; DBEdit4.Width :=Column.Width; // DBEdit4.height:=DBGrid1.Font.Height; end; end; end; abraço

é preciso saber como voce instanciou o objeto se voce colocar o código fica mais facil te ajudar abraço

o seu processador para jogos pesados pode ser sim um gargalo um processador intermediário seria esse http://www.clubedohardware.com.br/imageview.php?image=79127 nesse link voce vai encontrar alguns processadores para jogos (Intel Core i3 ao i7 ) esse ultimo top de linha, mas todos eles tem velocidades acima do seu http://www.tecmundo.com.br/intel/78475-intel-core-i3-i5-i7-tem-melhor-custo-x-beneficio-jogos.htm abraço

se com esse provedor voce quer abranger todos os moradores, não será um simples roteador wireless que vai resolver o problema voce até pode gastar um pouco mais, comprando equipamentos profissionais, mas se tiver uma boa conexão com a internet e dependendo de como quer distribuir o sinal ( cabo ou sem fio ) o retorno pode ser muito bom mas pesquise antes de se aventurar na empreitada, pois existem empresas que já fazem isso https://www.google.com.br/search?q=montar+provedor+em+casa&ie=utf-8&oe=utf-8&gws_rd=cr&ei=HgrqVovBGISewASPpbigCg abraço