Jhonas

exemplo: procedure TForm1.Button1Click(Sender: TObject); begin if MessageDlg('Deseja efetuar o Backup dos Arquivos ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin // end; end; abre a janela com o foco no botão < Yes > abraço

acabei de passar para voce Vá em Project > Options > Version Info > e clique em Include version information in project abraço

Experimente sem esse comando synchronize(frmLstLogRecepArq .Gauge1.Refresh); // <-- Quando faz a atualização do Gauge a aplicação trava abraço

Voce pode incluir as informações de versões de seu aplicativo pelo proprio delphi Vá em Project > Options > Version Info > e clique em Include version information in project ============================================ Outra função http://delphi.about.com/cs/adptips2001/a/bltip0701_4.htm ============================================ Componente rpVersionInfo http://www.esanu.name/delphi/Win%20API/Ver...n%20Delphi.html abraço

Na verdade não é mais facil e nem mais rapido ... existe uma maneira, pois os dados exibidos em um dbgrid, ficam temporariamente alocados em uma posição de memoria especifica durante a sua execução. Neste caso, voce teria que procurar essa posição de memoria, fazer a leitura e jogar os dados para uma tabela ou outro lugar. É algo demorado de se fazer ... então boa sorte... abraço

Procure não fazer referencia à palavra Senha ou Password em seu programa, ficaria facil descobrir Faça uma pesquisa no forum sobre o assunto http://scriptbrasil.com.br/forum/index.php...ite=login+senha http://scriptbrasil.com.br/forum/index.php...;highlite=senha abraço

veja esse link http://positivov25.wordpress.com/2007/04/2...bios-se-rebela/ abraço

veja esses links ... utilize os componentes de acesso ao banco de dados Oracle http://www.ramosdainformatica.com.br/art_r...es01.php?CDA=77 http://www.baixaja.com.br/downloads/Window...nents_2513.html http://ziggi.uol.com.br/downloads/oracle-d...components-odac http://imasters.com.br/artigo/2130/delphi/..._dados_via_ado/ abraço

esse programa foi feito em que linguagem ?? e o banco de dados qual é ?? abraço

'VAZAO * 4.403, '+ substitua o valor por 'VAZAO * 4403.00 '+ abraço

Amigo ... me desculpe, mas ainda não pude ver isso para voce, estou terminando um software para um cliente, e os testes de validação tomam muito tempo enquanto isso tente pesquisar outras fontes .. ok ? abraço

Já li em algum post, algo parecido, mas não me lembro em qual faça uma pesquisa no forum para ver se encontra abraço

Faça um teste: coloque somente um componente ClientDataSet, um DataSource e um DBGrid .. faça a ligação entre eles e teste esse comando procedure TForm1.Button1Click(Sender: TObject); begin ClientDataSet1.LoadFromFile('c:\teste.xml'); end; o dbgrid deverá mostrar os registros do XML ou pode tentar usar um componente proprio para isso o XMLTransformProvider1 e o XMLTransformClient1 exemplo de uso: http://edn.embarcadero.com/article/37321 http://www.marcocantu.com/code/md6htm/MapTable.htm abraço

Só para esclarecer .... voce quer um programa feito em delphi para trabalhar em uma rede interna ou uma pagina web para ser acessada pela internet ? guardar os dados em um site, siginifica usar o banco de dados do próprio servidor ( MYSQL ou outro banco nativo do servidor) se a idéia é usar a internet , teria que ser em linguagem delphi for php ... seria isso que voce está querendo ? abraço

Eu prefiro criar um campo a mais na tabela onde ficara o gauge... esteticamente fica mais apresentavel então seguindo esse raciocinio : 1 - acrescente um campo na sua tabela com o nome de gauge do tipo string com 20 posições 2 - coloque um componente Panel e dentro dele coloque um componente Gauge, ajustando o seu tamanho dentro do Panel ... O panel é necessário, pois o gauge ficaria atras do dbgrid e não seria mostrado 3 - defina o tamanho do Panel para que se ajuste ao tamanho do campo da celula do dbgrid ( campo gauge ) 3 - coloque no evento OnDrawCell do DBGrid o codigo abaixo: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); var DrawState: Integer; DrawRect: TRect; begin if (gdFocused in State) then begin if (Column.Field.FieldName = 'GAUGE') then begin Panel1.Left := Rect.Left + DBGrid1.Left + 2; Panel1.Top := Rect.Top + DBGrid1.top + 2; Panel1.Width := Rect.Right - Rect.Left; Panel1.Height := Rect.Bottom - Rect.Top; Panel1.Visible := True; end end else begin if (Column.Field.FieldName = 'GAUGE') then begin DrawRect:=Rect; InflateRect(DrawRect,-1,-1); DBGrid1.Canvas.FillRect(Rect); DrawFrameControl(DBGrid1.Canvas.Handle, DrawRect, DFC_BUTTON, DrawState); end; end; end; OBS: ao clicar em uma linha de registro, o gauge aparecerá nessa linha ... o resto é só adaptar abraço

De forma simples seria procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode; const AWorkCount: Integer); begin Gauge1.Progress := AWorkCount; Gauge1.Refresh; // comandos end; procedure TForm1.IdFTP1WorkBegin(Sender: TObject; AWorkMode: TWorkMode; const AWorkCountMax: Integer); begin Gauge1.MaxValue := AWorkCountMax; // comandos end; OBS: o componente Gauge deve ficar fora do DBgrid abraço

Se voce está trabalhando com banco de dados e se for o BDE, verifique se o erro é de Kernel ... e se for provavelmente houve falha de conexão com o banco de dados voce deve explicitar melhor o erro ... isso pode ocorrer por vários problemas abraço

Olhe na pasta Demo tem um exemplo ExemploRLBoleto.dpr abraço

Material completo http://www.produsys.com.br/download/rlboleto/ abraço

Adicionado opção de layout em forma de carnê na versão do RLBoleto 1.15 http://www.produsys.com.br/download/rlbole...LBoleto_115.zip exemplo: abraço

O projeto contem um componente ( TAdvSmoothExpanderPanel ) do pacote TMS Smooth Controls Pack-Delphi que não esta instalado em seu micro ... voce pode pedir esse componente de quem voce comprou http://www.soft82.com/version/download/win...i-2005-3-2-0-0/ abraço

Fça uma pesquisa no forum ... posts relacionados http://scriptbrasil.com.br/forum/index.php...hlite=TRegistry abraço

Faça uma busca no forum ... vai encontrar posts relacionados http://scriptbrasil.com.br/forum/index.php...te=olecontainer abraço

Os 2 IFs onde voce testa o 'TIPO_CADASTRO' e 'OBG_CPF' deveriam estar dentro do while abraço

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