Jhonas

seu post no outro forum 'ClientDataSet: Cannot perform thid operation on a closed dataset' ClientDataSet: Não é possível executar a operação em um conjunto de dados fechado ". O erro além de informar que voce esta fechando a tabela, voce não deve usar o locate dentro de um DBEdit, visto que ele já esta linkado a um registro de sua tabela mas se realmente quer usar assim, tente: procedure Tfrmconsultar.btnconsultarClick(Sender: TObject); begin DM.ADOQuerySql.Open; DM.ClientDataSet.close; DM.ADOQuerySQL.SQL.CLEAR; DM.ADOQuerySQL.SQL.ADD('select codigo, filial, ip, nomepc, placamae, modelo, processador, placavideo, hd, placasom, memoria, placarede, sistemaop, soquete, setor from componentes_filiais where filial like :filial'); DM.ADOQuerySQL.Parameters.ParamByName('filial').Value:= combobox.text; DM.ClientDataSet.Open; end; Procedure Tfrmalterar.DBEdit1Change(Sender: TObject); begin DM.ClientDataSet.First; DM.ClientDataSet.Locate('codigo', DBedit1.text, [loCaseInsensitive, loPartialKey]); end; Abraço

esse erro é causado por falha no registro do windows use o ccleaner para limpar os registros e registre novamente a dll Para registrar uma dll, copie a dll que você quer registrar para C:Windows\System32, após isso , clique em Iniciar , executar , digite o comando cmd e dê enter , após isso será exibida a tela de prompt do DOS, então digite o comando regsvr32 e dê enter. Ex: regsvr32 ssleay32.dll , após isso será exibido uma mensagem de sucesso. abraço

deve ser isso que voce esta querendo http://www.cooperati.com.br/wordpress/2010...-google-chrome/ http://www.tecmundo.com.br/tutorial/19153-...-navegador-.htm abraço

Quando eu executo o código o simplesmente fecha onde está o código ?

exemplo de como acessar o twitter http://www.devmedia.com.br/twittando-com-o...l-parte-1/19968 abraço

veja essa dicas http://office.microsoft.com/pt-br/publishe...A001218940.aspx abraço

voce quer fazer exatamente o que ?

tenho 100.000 registros a serem carregados num tclientdataset! eu tenho uma tabela com 160.000 e consigo carregar todos os 160.000 no dbgrid em apenas 2 segundos usando indices na tabela ( usando o TTable ) while CDS.GetNextPacket > 0 do begin label1.Text := IntToStr( CDS.RecordCount ); Update; Application.ProcessMessages; end; o uso da clausula Update sozinha fara a atualização de todos os seus registros, a cada vez que o contador do while for ativado ... o ideal é usar um filtro atraves da clausula Where exemplo UPDATE ATABLE SET anruf_bis=<Time> WHERE ID=<ID Value> outra coisa que não é necessaria, é atualizar os todos registros o tempo todo .... mas somente quando houver alguma alteração nos registros exemplo procedure TForm1.Button1Click(Sender: TObject); begin ClientDataSet1.Insert; ClientDataSet1.FieldByName('anruf_von').AsDateTime := time; ClientDataSet1.Post; ClientDataSet1.ApplyUpdates(0); // aplica o applyUpdates no button2. end; procedure TForm1.Button2Click(Sender: TObject); begin ClientDataSet1.edit; ClientDataSet1.FieldByName('anruf_bis').AsDateTime := time; ClientDataSet1.Post; showmessage(intToStr(ClientDataSet1.ChangeCount)); // retorna 1 if ClientDataSet1.ChangeCount > 0 then ClientDataSet1.applyUpdates(0); end; caso não queira tentar outra abordagem no seu codigo declare uma variavel publica cancelar : Boolean; no seu codigo faça a mudança while CDS.GetNextPacket > 0 do begin label1.Text := IntToStr( CDS.RecordCount ); Update; Application.ProcessMessages; if Cancelar then begin //MessageDlg('Processo foi Interrompido! ', mtInformation, [mbOK], 0); Break; { Sai do loop } exit; end; end; em um botão coloque procedure TForm1.Button3Click(Sender: TObject); begin cancelar := true; end; abraço

o código esta parecendo que, ao fazer a conexão entre 2 micros ( ips ) é disparado um loop ( de 1 a 10 milhoes ) para testar a velocidade da transmissão dos dados. abraço

coloque o codigo que voce usa no tclientdataset obs : o fato de voce usar um contador num tlabel torna o processamento mais lento abraço

verifique a configuração do windows relativo a formatação da data veja no painel de controle > Opções regionais e de idiomas se o formato for d/m/aa vai acontecer esse erro o formato tem que ser dd/mm/aaaa abraço

voce imprime direto ao atraves do quick report ?

como voce esta usando ?

veja a lista de proxys gratis para o Brasil Brazil free proxy 200.175.61.178 3128 HTTPS None Santa Catarina Florianopolis 201.86.128.8 3128 HTTP None Distrito Federal Brasilia 187.86.20.250 80 HTTPS None Bahia Licinio De Almeida 186.200.12.5 80 HTTPS Anonymous Rio de Janeiro Nova Iguacu 189.74.20.92 8080 HTTP None Mato Grosso do Sul Campo Grande 189.31.143.218 80 HTTP None Rondonia Ariquemes 201.16.244.186 3128 HTTP None Minas Gerais Itamogi 186.208.72.199 80 HTTPS Anonymous 187.7.209.186 8080 HTTPS None Goias Goiania 201.22.184.4 8080 HTTPS None Distrito Federal Brasilia 187.48.61.32 3128 HTTPS None são Paulo são Paulo 186.201.216.234 3128 HTTPS None são Paulo são Paulo 187.95.38.71 3128 HTTPS None Rio de Janeiro Bom Jardim 201.12.129.59 3128 HTTPS None Rio Grande do Norte Parelhas 186.250.2.15 3128 HTTP None 189.115.161.19 3128 HTTPS None Pernambuco Recife 200.251.200.1 8080 HTTP Anonymous Minas Gerais Belo Horizonte 186.215.147.12 3128 HTTPS None Rio Grande do Sul Porto Alegre 187.72.161.226 3128 HTTP None Minas Gerais Mariana 187.58.130.57 8080 HTTP Anonymous Rio de Janeiro são Joao De Meriti 189.3.148.162 3128 HTTP None Minas Gerais Joao Monlevade 189.127.165.233 3128 HTTPS None Para Juruti 189.108.29.186 3126 HTTP None são Paulo Itaquaquecetuba 201.3.63.101 8080 HTTPS None Distrito Federal Brasilia 189.1.177.65 8081 HTTP None são Paulo Limeira 187.62.226.214 3128 HTTPS None Rio de Janeiro Niteroi 201.76.212.250 8080 HTTPS None Rio de Janeiro Rio De Janeiro 189.10.247.178 3128 HTTPS None Rio Grande do Sul Carazinho 187.84.226.147 8000 HTTPS None 200.181.30.37 8080 HTTP None 201.48.212.166 8080 HTTPS None Minas Gerais Guaxupe 201.22.7.190 80 HTTPS High Anonymous Parana Curitiba 200.155.37.241 3128 HTTP None Parana Cambe 177.12.192.43 8080 HTTP Anonymous 187.84.240.138 8080 HTTPS None Minas Gerais Abaete 186.225.34.62 8080 HTTP None 187.72.224.193 3128 HTTPS None Minas Gerais Frutal 200.216.185.16 3128 HTTPS None Espirito Santo Serra 200.165.107.34 80 HTTP High Anonymous Amazonas Manaus 189.75.241.23 8080 HTTP None Parana Curitiba 189.7.33.118 8080 HTTP None são Paulo são Jose Do Rio Preto 189.31.65.83 3128 HTTPS None 189.114.111.18 3128 HTTP None Rio Grande do Sul Pelotas 187.6.85.33 8080 HTTPS None Acre Rio Branco 200.159.255.80 3124 HTTP High Anonymous Rio de Janeiro Nova Friburgo 189.84.31.50 3128 HTTPS None Rio de Janeiro Rio De Janeiro 187.111.223.10 8080 HTTPS None são Paulo Santo Antonio De Posse 189.84.31.50 3127 HTTPS None Rio de Janeiro Rio De Janeiro 187.115.156.139 8080 HTTPS None Rio de Janeiro Rio De Janeiro 200.201.188.115 3128 HTTPS None Rio de Janeiro Rio De Janeiro 187.45.85.162 3128 HTTP None Paraiba Campina Grande 200.198.117.211 8080 HTTPS None Rio de Janeiro Rio De Janeiro 189.23.119.226 3128 HTTP None Distrito Federal Brasilia 189.72.230.165 8080 HTTP None Goias Goiania 187.115.2.7 8080 HTTPS None Rio de Janeiro Rio De Janeiro 187.35.144.173 8080 HTTPS None são Paulo são Paulo 187.6.49.84 3127 HTTPS None Rio de Janeiro Rio De Janeiro 186.215.209.229 3128 HTTPS None Rio de Janeiro Nova Iguacu 200.202.215.155 3128 HTTPS None 189.11.196.218 3128 HTTP None Distrito Federal Brasilia 187.115.162.6 3128 HTTPS None Paraiba Joao Pessoa 201.41.83.188 3128 HTTP Anonymous 201.22.130.226 8080 HTTP None Rio Grande do Sul Santa Maria 187.6.242.68 8080 HTTPS None Santa Catarina Nova Xavantina 189.89.208.147 3128 HTTPS None Minas Gerais Lavras 189.111.112.219 8080 HTTP None são Paulo Osasco 187.66.84.48 3128 HTTP None são Paulo são Carlos 187.76.192.186 3128 HTTPS None Minas Gerais Varginha 200.201.188.116 3128 HTTPS None Rio de Janeiro Rio De Janeiro 201.88.254.242 3128 HTTP None Pando Cobija 189.121.108.140 3128 HTTPS None são Paulo são Paulo 200.175.157.242 3128 HTTPS None 201.75.113.129 8080 HTTP None Amazonas Manaus 187.4.104.99 8080 HTTP None Goias Goiania 187.84.240.134 8080 HTTPS None Minas Gerais Abaete 187.17.22.6 3128 HTTPS None Parana Chopinzinho 187.115.52.40 3128 HTTPS None Santa Catarina são Jose 201.75.6.142 3128 HTTPS None Amazonas Manaus 187.115.193.56 3128 HTTPS None Minas Gerais Belo Horizonte 200.159.255.80 3127 HTTP High Anonymous Rio de Janeiro Nova Friburgo 187.48.137.194 8080 HTTPS None Bahia Bom Jesus Da Lapa 187.6.55.28 8080 HTTP None 189.127.165.209 3128 HTTPS None Para Juruti 189.111.237.64 3128 HTTP None são Paulo são Paulo 189.127.47.229 3128 HTTPS None Ceara Pacajus 201.33.10.27 8080 HTTPS None 189.108.155.120 3128 HTTPS None são Paulo Nova Granada 200.175.157.251 3128 HTTPS None 187.108.40.234 3128 HTTPS None são Paulo são Paulo 187.29.55.129 8080 HTTPS None Paraiba Joao Pessoa 187.4.128.10 3128 HTTP None Santa Catarina Camboriu 189.17.0.35 8000 HTTP None 200.131.50.10 8080 HTTP Anonymous Minas Gerais Juiz De Fora 200.181.109.20 80 HTTP None Goias Goiania 187.16.249.134 3128 HTTPS None Rio de Janeiro Nova Friburgo 189.108.182.203 3128 HTTPS None são Paulo são Paulo 187.45.213.158 3128 HTTPS None são Paulo são Paulo 189.45.36.38 3128 HTTPS None Rio Grande do Sul Capao Da Canoa 189.122.50.110 3128 HTTPS None Rio de Janeiro Rio De Janeiro 201.88.254.242 80 HTTP None Pando Cobija 189.74.20.92 8080 HTTP None Mato Grosso do Sul Campo Grande 187.6.85.33 8080 HTTPS None Acre Rio Branco 189.111.112.219 8080 HTTP None são Paulo Osasco 189.72.230.165 8080 HTTP None Goias Goiania 200.201.188.115 3128 HTTPS None Rio de Janeiro Rio De Janeiro 187.29.55.129 8080 HTTPS None Paraiba Joao Pessoa 187.115.156.139 8080 HTTPS None Rio de Janeiro Rio De Janeiro 201.76.212.250 8080 HTTPS None Rio de Janeiro Rio De Janeiro 189.84.31.50 3128 HTTPS None Rio de Janeiro Rio De Janeiro 189.31.143.218 80 HTTP None Rondonia Ariquemes 200.165.107.34 80 HTTP High Anonymous Amazonas Manaus 187.6.242.68 8080 HTTPS None Santa Catarina Nova Xavantina 186.201.216.234 3128 HTTPS None são Paulo são Paulo 186.201.109.10 3128 HTTPS None são Paulo são Paulo 187.17.22.6 3128 HTTPS None Parana Chopinzinho 189.17.58.194 3128 HTTP None 200.201.188.114 3128 HTTPS None Rio de Janeiro Rio De Janeiro 201.22.130.226 8080 HTTP None Rio Grande do Sul Santa Maria 189.10.247.178 3128 HTTPS None Rio Grande do Sul Carazinho 187.45.85.162 3128 HTTP None Paraiba Campina Grande 201.48.212.166 8080 HTTPS None Minas Gerais Guaxupe 200.251.200.1 8080 HTTP Anonymous Minas Gerais Belo Horizonte 200.198.117.211 8080 HTTPS None Rio de Janeiro Rio De Janeiro 187.84.240.134 8080 HTTPS None Minas Gerais Abaete 200.201.188.116 3128 HTTPS None Rio de Janeiro Rio De Janeiro 201.33.10.27 8080 HTTPS None abraço

200.175.61.178 3128 HTTPS None Santa Catarina Florianopolis abraço

não sei se voce gosta de ler, mas veja http://luizjrcfox.sites.uol.com.br/irc1.htm exemplo funcional em perl http://www.forum-invaders.com.br/vb/showth...poca-do-spykids ======================================================= O erro esta na criação da conexão $sock = IO::Socket::INET->new(PeerAddr =>$server, PeerPort =>$port, Proto => 'tcp'); Uma simples conexão Perl IRC Client o exemplo abaixo tambem funciona http://oreilly.com/pub/h/1964#code abraço

voce esta testanto se o DBEditIdade.Text é letra ou numero ? o codigo abaixo vai te ajudar a entender melhor ... veja que se voce quer testar o conteudo do campo, como sendo numeros ( idade < 18 ) então voce deve limitar a digitação a somente aceitar numeros exemplo: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in['0'..'9',Chr(8),',']) then Key:= #0; end; procedure TForm1.Edit1Exit(Sender: TObject); var Code, I : Integer; begin Val(Edit1.Text,Code,I); if Code > 0 then showmessage('numero') else showmessage('letra'); end; outro exemplo procedure TForm1.Edit1Exit(Sender: TObject); var Code, I : Integer; begin Val(Edit1.Text,Code,I); if Code > 0 then begin if (Edit1.Text < '18') then //Verifica se o campo "Responsavel" foi preenchido begin Messagedlg('O campo "Responsável" deve ser preenchido!', mtInformation, [mbOk], 0); Edit1.SetFocus; end; end; end; abraço

Já tentou usar componentes de discagem do fax/modem ( dialer ) ? http://www.codigofonte.net/scripts/delphi/...cao/1188_dialer http://www.torry.net/pages.php?id=201 OBS: já olhei o link que voce indicou, e não é algo simples de fazer ... Preciso de um discador que faça ligações automáticas usando o Dialer.exe do Win XP voce pode usar o comando winexec para executar esse programa pelo delphi abraço

Quando eu clico em sair no frmmenu o frmlogin ainda está lá em execução. assim que fechar o frmmenu, deve tambem fechar o frmlogin frmlogin.close; abraço

um exemplo http://www.devmedia.com.br/utilizando-tela-de-login/470 abraço

veja se isso te ajuda... caso não vejo outra solução http://www.delphibr.com.br/artigos/modem.htm OBS: Não encontrou nada no forum que te ajude ? http://scriptbrasil.com.br/forum/index.php...ghlite=discador abraço

te enviei meu email por MP abraço

voce esta querendo fazer um programa estilo TeamViewer ? http://www.teamviewer.com/pt/download/windows.aspx abraço

voce quer que um form abra sobre o form Menu ou dentro do form Menu ? se for sobre outro form ( que é o padrão ) todos os outros forms abrirão sobre o form do Menu sem problemas ... ao fechar esse form o form menu sempre ficara visivel para o usuario escolher outro mas se quiser dentro, terá que usar o MDI ... faça uma pesquisa no forum http://scriptbrasil.com.br/forum/index.php?showforum=21 http://scriptbrasil.com.br/forum/index.php...ghlite=form+mdi abraço

não entendi muito bem, mas veja se é isso http://www.youtube.com/watch?v=92YRKNSZLoA abraço