Res: [delphi-br] Mensagem
Utilizo SQL Server Atenciosamente, Sérgio E. Santo Depto. Gestão US - US 001 ges...@premiumalimentacao.com.br Premium - Responsabilidade e Garantia na Pratica Diária de Bem Atender 11 - 3378-4501 35 - 3422-9949 11 - 8498-4582 visite nosso site... www.premiumalimentacao.com.br A Premium é uma concessionária moderna e ágil quando o assunto é solução em alimentação coletiva, atuando em todo o interior dos estados de São Paulo e Minas Gerais desde1998 e pronta para atuar em todas as regiões do país, esta preparada para oferecer produtos e serviços com excelência em qualidade nos segmentos da indústria, saúde, comércio e serviços, educação, agro-negócio e outros onde nossas soluções sejam bem vindas. Possuimos um diversificado e flexível portifólio para soluções completas das necessidades dos Clientes e Consumidores. De: Willian Jhonnes L. dos Santos willianjhon...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 13 de Abril de 2010 15:05:00 Assunto: Re: [delphi-br] Mensagem Em 13/04/2010 13:53, Gestão - Premium escreveu: Boa tarde Coloquei uma chave na coluna de CGC em uma cadastro de fornecedores Para nao cadastrar em duplicidade a mesma empresa. Minha duvida a mensagem de erro de chave volta em ingles pelo delphi, teria como eu alterar esta mensagem??? e colocar algo mais simples Atenciosamente, Sérgio E. Santo Sérgio, boa tarde. A mensagem retornada é fornecida pelo banco de dados (aliás, qual você usa?). Basta você capturar a exceção retornada e tratá-la na aplicação usando um bloco try/except. []'s -- - - - - --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolve dor Object/Free Pascal willianjhonnes@ yahoo.com. br - - - - --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 - - - - --- Powered by Slackware Linux 13.0 Kernel 2.6.32.6-i686- core2quad - - - - --- Antes de perguntar: http://www.istf. com.br/perguntas / [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Gleidison,
Não sei se entendi muito bem a sua duvida mas vamos la
Neste evento ai vc pode verificar se o E.Message é problema de foreing key msm
através do POS... se as suas chaves estrangeiras tiverem um padrão de
nomenclaruta tipo FK_Abobrinha/ FK_CHUCHU, vc pode usar o POS e localizar FK_
em E.Message, dai se o retorno da função foi 0 sigifica q é isso msm, dai vc
exibe a msg q vc quer
Seria esta a sua necessidade? eu ñ entendi a parte do Eu coloquei uma mensagem
de teste mas não chega na mensagem
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Gleidison
S. Bertolini
Enviada em: sexta-feira, 11 de agosto de 2006 11:02
Para: Grupo Delphi
Assunto: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Pessoal, estou precisando de tratar erros de FOREIGN KEY. Eu coloquei uma
mensagem de teste mas não chega na mensagem. Queria que se desse o erro
eu mostraria uma mensagem em português, Existe(m) registros vinculados, não é
possível excluir!!!. Alguém tem manha de fazer isso?
procedure TFrmCadBanco.QPadraoDeleteError(DataSet: TDataSet; E: EDatabaseError;
var Action: TDataAction);
begin
inherited;
MessageDlg('Erro:'+ E.Message + '.', mtWarning,[mbOk], 0)
end;
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Bom, eu ñ sei como este componente funciona... mas se tiver uma espécie de
evento click como o dbnavigator tem, vc pode colocar um try except, onde no
except vc trataria o erro... mas acredito q ñ seria o caso, pq acho q o
componente ñ precisa de um comando do tipo DELETE pra deletar, certo?
Bom, boa sorte e desculpe ñ poder ajudar mais
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Gleidison
S. Bertolini
Enviada em: sexta-feira, 11 de agosto de 2006 12:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Moked - Tamara e André Mesquita,
Eu entendi o que vcs falaram, mas eu não uso Query.Delete, eu uso o
dbspeedButton que é linkado com o data source e é do tipo nbDelete. Daí o
erro não passa por esse tratamento que fiz...
Gleidison
- Original Message -
From: Moked - Tamara (Brazil)
To: delphi-br@yahoogrupos.com.br
Sent: Friday, August 11, 2006 12:23 PM
Subject: RES: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Gleidison,
Não sei se entendi muito bem a sua duvida mas vamos la
Neste evento ai vc pode verificar se o E.Message é problema de foreing key
msm através do POS... se as suas chaves estrangeiras tiverem um padrão de
nomenclaruta tipo FK_Abobrinha/ FK_CHUCHU, vc pode usar o POS e localizar FK_
em E.Message, dai se o retorno da função foi 0 sigifica q é isso msm, dai vc
exibe a msg q vc quer
Seria esta a sua necessidade? eu ñ entendi a parte do Eu coloquei uma
mensagem de teste mas não chega na mensagem
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de
Gleidison S. Bertolini
Enviada em: sexta-feira, 11 de agosto de 2006 11:02
Para: Grupo Delphi
Assunto: [delphi-br] Mensagem em Portugues de FOREIGN KEY!
Pessoal, estou precisando de tratar erros de FOREIGN KEY. Eu coloquei uma
mensagem de teste mas não chega na mensagem. Queria que se desse o erro
eu mostraria uma mensagem em português, Existe(m) registros vinculados, não
é possível excluir!!!. Alguém tem manha de fazer isso?
procedure TFrmCadBanco.QPadraoDeleteError(DataSet: TDataSet; E:
EDatabaseError; var Action: TDataAction);
begin
inherited;
MessageDlg('Erro:'+ E.Message + '.', mtWarning,[mbOk], 0)
end;
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem Em Duas Linhas
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/
Grau de Sigilo: Confidencial Reservado Interno Amplo
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação
-
Eu indicaria o messageDlg... vc quebra da msm forma a string, e ela já fica
centralizada...rs..
Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9000:2000
O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo
sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o
comprometimento com os Custo envolvidos!
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter
Alves Chagas Junior
Enviada em: terça-feira, 28 de março de 2006 10:46
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Mensagem Em Duas Linhas
Até onde eu sei, não há como fazer isto. A não ser que você crie sua própria
janela de mensagens ou então entre na Unit Dialogs.pas e customise o
MessageDlg e o ShowMessage
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Cleiton
Enviada em: terça-feira, 28 de março de 2006 09:29
Para: Delhpi
Assunto: [delphi-br] Mensagem Em Duas Linhas
Olá pessoal...
Venho mais uma vez lhes pedir uma pequena ajuda.
Em algumas partes do sistema estou usando message box com a mensagem
quebrada em duas linhas com o seguinte código:
MessageBox (Application.Handle, pchar ('testando' +#13+ 'mensagem'),
'ATENÇÃO', MB_DEFBUTTON2);
No entanto, eu gostaria que essas duas linhas ficassem centralizadas dentro
do message box.
É possível fazer isso? E como poderia fazer?
Desde já, um grande abraço a todos.
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
http://br.ard.yahoo.com/SIG=12f476k8u/M=403524.8192508.9006231.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1143556570/A=3154525/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo! http://br.yahoo.com/info/utos.html .
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem Em Duas Linhas
Até onde eu sei, não há como fazer isto. A não ser que você crie sua própria
janela de mensagens ou então entre na Unit Dialogs.pas e customise o
MessageDlg e o ShowMessage
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Cleiton
Enviada em: terça-feira, 28 de março de 2006 09:29
Para: Delhpi
Assunto: [delphi-br] Mensagem Em Duas Linhas
Olá pessoal...
Venho mais uma vez lhes pedir uma pequena ajuda.
Em algumas partes do sistema estou usando message box com a mensagem
quebrada em duas linhas com o seguinte código:
MessageBox (Application.Handle, pchar ('testando' +#13+ 'mensagem'),
'ATENÇÃO', MB_DEFBUTTON2);
No entanto, eu gostaria que essas duas linhas ficassem centralizadas dentro
do message box.
É possível fazer isso? E como poderia fazer?
Desde já, um grande abraço a todos.
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem para celular
Possível é, tem muita coisa na WEB pra isto, mas somente os Celulares que tiverem habilitação para interagir com a WEB é que poderão receber mensagems. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Murillo Proença Enviada em: segunda-feira, 13 de fevereiro de 2006 10:09 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem para celular Fala aí galera, alguém sabe se é possível, eu fazer com que meu sistema envie uma mensagem para um celular? A operadora é Claro. Grato Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] MENSAGEM DE ERRO. ME AJUDEM!
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Não sei se é exatamente a mesma coisa, mas as vezes algo parecido ocorre quando tem o firebird startado em duas maquinas interligadas aqui. Tamara O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem de erro
Access Violation significa que seu programa tentou acessar um objeto, um ponteiro, uma Thread ou uma área de memória inválidos. Eu sugiro pro pessoal, que quando tiver com problema desta natureza, que poste o código aonde está ocorrendo o erro aqui na lista pra gente dar uma olhada. Access Violation é um tipo de erro que costuma ser dificil de se saber apenas informando a mensagem. Você que que analisar o código. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Marcio Amorim de Araujo Enviada em: quinta-feira, 13 de outubro de 2005 08:38 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem de erro Prioridade: Alta Application Error: Exception EAccesVIolation in module blá, blá, blá... AccesViolation at address blá, blá, blá... in module blá, blá, blá. Read of address blá, blá, blá... Após clicar no OK aparece outra mensagem de erro: Error: Runtime error 216 at 00403316 Algué sabe me dizer o motivo de ocorrer este erro? Grato, Márcio. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem de erro
Márcio, Erros de Violação de Acesso acontecem quando você tenta acessar um objeto já destruído, ou ainda não criado. Filipe -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Marcio Amorim de Araujo Enviada em: quinta-feira, 13 de outubro de 2005 08:38 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem de erro Prioridade: Alta Application Error: Exception EAccesVIolation in module blá, blá, blá... AccesViolation at address blá, blá, blá... in module blá, blá, blá. Read of address blá, blá, blá... Após clicar no OK aparece outra mensagem de erro: Error: Runtime error 216 at 00403316 Algué sabe me dizer o motivo de ocorrer este erro? Grato, Márcio. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem Windows - mudança de data
Tem alguma maneira de pegar a data e hora da net?, tipo web service ou algum outro [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem muito grande - Pedido ao participantes da lista
Felipe, acho que você não entendeu a idéia... Para responder a uma mensagem, é recomendável que as mensagens anteriores sejam mantidas. O que o Luiz queria dizer é para eliminar a parte INÚTIL da mensagem anterior, marcada pela frase FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM , pois tudo o que vem abaixo disso é incluído pelo Yahoo em todas as mensagens do grupo. Pode não parecer, mas quando tem muitas respostas a uma mesma mensagem inicial, o tamanho das mensagens cai bastante. Abraços, Mauricio. _ De: Filipe [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 06 de abril de 2005 14:46 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Mensagem muito grande - Pedido ao participantes da lista Bom cara, eu acho ótimo que NÃO se remova a pergunta para dar a resposta, assim sempre sabemos a q pergunta a resposta está pertinente, ou se ja eh a resposta da resposta Aconselho que vc receba os emails normalmente. - Original Message - From: Luiz Henrique Severo d Oliveira [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 06, 2005 2:26 PM Subject: [delphi-br] Mensagem muito grande - Pedido ao participantes da lista Pessoal, Sem querer ser chato, mas já sendo um pouco... Eu recebo a lista em modo Digest (normamente recebo uns 5 e-mails por dia com as últimas 25 mensagens do grupo), e algumas mensagens estão chegando muito grande, em torno de 200K. Isso acontece porque alguns participantes que respondem mantem respostas inteiras dos outros participantes na sua resposta e também não retiram o texto que o Yahoo coloca (este texto está abaixo da frase FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM ). E além do problema com o tamanho, fica muito chato ler as mensagens com respostas que já foram lidas anteriormente e um monte de texto inútil. Se não for incômodo, por favor, retirem o texto desnecessário e tentem ao máximo reduzir o acompanhamento do assunto com respostas antigas. Obrigado e desculpem se incomodei alguém. Luiz Henrique Severo d Oliveira RPG Soluçoes www.rpgsolucoes.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Res: [delphi-br] Mensagem de erro
Como vc está fazendo para alterar estes dados? Se vc está fazendo, tipo assim: MyTableMyField.AsString := 'minha string'; vc tem que fazer antes: MyTable.Edit; ou MyTable.Insert; ou MyTable.Append; conforme o caso necessário. ---Mensagem original--- De: André Coury Data: 03/30/05 09:23:36 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem de erro Olá pessoal, estou tentando alterar o valor de um campo em uma tabela, mas acontece que está aparecendo a seguinte mensagem de erro: TABLE1:Dataset not in Edit or insert mode Alguém sabe como corrigir este problema? Abraços André L. Coury MSN:[EMAIL PROTECTED] Muriaé-MG Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.8.6 - Release Date: 30/03/2005 . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem para DBGrid
mas eu gostaria que, quando passasse de um linha para outra os botões de inlcuir, alterar e etc voltassem o enabled ao normal... ---Mensagem original--- De: Murilo Cunha (Yahoo) Data: 03/06/05 10:41:58 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Mensagem para DBGrid Catiuscia, Quando vc muda de linha no DBGrid eh dado um POST automatico no banco. Não se preocupe com isto (de não gravar)!!! Se preocupe com o usuario não inserir valores validos nas colunas ou falta de dado ou inserir dado escravo sem o mestre... Isto vai dar bastante trabalho... Insercoes com DBGrid!!! MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) -Mensagem original- De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED] Enviada em: sábado, 5 de março de 2005 09:41 Para: Delphi-Br Assunto: [delphi-br] Mensagem para DBGrid Bom Dia !!! Gostaria de saber como se faz para, por exemplo, se ao incluir ou alterar, alguma linha num dbGrid, e o usuário faz alguma coisa que o cursor vai pra outra linha, sem ter gravado, como faço para gravar antes de sair da linha q está incluindo ou alterando ??? Cati [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. __ NOD32 1.1017 (20050302) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem para DBGrid
Olá, Então, use o evento STATECHANGE do seu datasource pra controlar o estado dos botões: procedure TForm1.DataSource1StateChange(Sender: TObject); begin Case DataSource1.State of dsInactive: begin botaoIncluir.Enabled:=TRUE; botaoDeletar.Enabled:=FALSE; botaoSalvar.Enabled:=FALSE; botaoCancelar.Enabled:=FALSE; botaoPesquisar.Enabled:=TRUE; end; dsInsert: begin botaoIncluir.Enabled:=FALSE; botaoDeletar.Enabled:=FALSE; botaoSalvar.Enabled:=TRUE; botaoCancelar.Enabled:=TRUE; botaoPesquisar.Enabled:=FALSE; end; dsEdit: begin botaoIncluir.Enabled:=FALSE; botaoDeletar.Enabled:=FALSE; botaoSalvar.Enabled:=TRUE; botaoCancelar.Enabled:=TRUE; botaoPesquisar.Enabled:=FALSE; end; dsBrowse: begin botaoIncluir.Enabled:=TRUE; botaoDeletar.Enabled:=TRUE; botaoSalvar.Enabled:=FALSE; botaoCancelar.Enabled:=FALSE; botaoPesquisar.Enabled:=TRUE; end; end; end; Tente e reporte. []'s Alexandre Oliveira Campioni Analista de Sistemas A-Tecnologia e Sistemas de Informacao Ltda. Sao Joaquim da Barra - Sao Paulo - Brasil [EMAIL PROTECTED] -Mensagem original- De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED] Enviada em: segunda-feira, 7 de março de 2005 10:13 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Mensagem para DBGrid mas eu gostaria que, quando passasse de um linha para outra os botões de inlcuir, alterar e etc voltassem o enabled ao normal... ---Mensagem original--- De: Murilo Cunha (Yahoo) Data: 03/06/05 10:41:58 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Mensagem para DBGrid Catiuscia, Quando vc muda de linha no DBGrid eh dado um POST automatico no banco. Não se preocupe com isto (de não gravar)!!! Se preocupe com o usuario não inserir valores validos nas colunas ou falta de dado ou inserir dado escravo sem o mestre... Isto vai dar bastante trabalho... Insercoes com DBGrid!!! MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) -Mensagem original- De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED] Enviada em: sábado, 5 de março de 2005 09:41 Para: Delphi-Br Assunto: [delphi-br] Mensagem para DBGrid Bom Dia !!! Gostaria de saber como se faz para, por exemplo, se ao incluir ou alterar, alguma linha num dbGrid, e o usuário faz alguma coisa que o cursor vai pra outra linha, sem ter gravado, como faço para gravar antes de sair da linha q está incluindo ou alterando ??? Cati [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. __ NOD32 1.1017 (20050302) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O
RES: [delphi-br] Mensagem para DBGrid
Catiuscia, Quando vc muda de linha no DBGrid eh dado um POST automatico no banco. Não se preocupe com isto (de não gravar)!!! Se preocupe com o usuario não inserir valores validos nas colunas ou falta de dado ou inserir dado escravo sem o mestre... Isto vai dar bastante trabalho... Insercoes com DBGrid!!! MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) -Mensagem original- De: Catiúscia A. Barrilli da Cruz [mailto:[EMAIL PROTECTED] Enviada em: sábado, 5 de março de 2005 09:41 Para: Delphi-Br Assunto: [delphi-br] Mensagem para DBGrid Bom Dia !!! Gostaria de saber como se faz para, por exemplo, se ao incluir ou alterar, alguma linha num dbGrid, e o usuário faz alguma coisa que o cursor vai pra outra linha, sem ter gravado, como faço para gravar antes de sair da linha q está incluindo ou alterando ??? Cati [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem de Erro
No site da Borland tem a atualização do MDAC que vc precisa... Gustavo Fujita -Mensagem original- De: Depto de Informatica [mailto:[EMAIL PROTECTED] Enviada em: segunda-feira, 14 de fevereiro de 2005 16:51 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem de Erro Caros colegas, Utilizo Delphi 5, MsAccess e ADO e meus sistemas apresentam o seguinte erro em algumas máquinas: Either BOF or EOF is true, or the current record has been deleted. Request operation requires a current record. Alguém sabe porque está aparecendo esta mensagem de erro ao fechar algumas tabelas ? Obrigado, Luiz Carlos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.7 - Release Date: 10/2/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.7 - Release Date: 10/2/2005 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mensagem de erro Table is Busy
Se a tabela é temporária, cria ela em tempo de execução, alimenta com os dados que vc quer e depois exclui ela. Não serve essa opção pra vc ? -Mensagem original- De: jmourajr2000 [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 27 de janeiro de 2005 15:05 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mensagem de erro Table is Busy Caros amigos boa tarde! Estou com um problema em um aplicativo na hora de apagar todos os registros de uma tabela Paradox(Temporaria). A rotina é simples só faz isso: begin dmDG.tableItens.Close; dmDG.tableItens.Exclusive := True; dmDg.tableItens.EmptyTable; dmDG.tableItens.Exclusive := False; dmDG.tableItens.Open; end; Só que ao executa=la me retorna o erro: Table is Busy Sendo que o aplicativo é monousuario, não tem nenhum outro aplicativo utilizando a tabela, enfim o que pode estar acontecendo? Ps: Até deletar os arquivos pdoxusrs.* / paradox.lck / paradox.net eu deletei. Preciso urgentemente solucionar este pepino. Agradeço imensamente quem puder ajudar. Abraços a todos. José de Moura -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] MENSAGEM
É exatamente isto... Chama-se splash. Faz uma pesquisa sobre DELPHI + SPLASH para obter os detalhes. []s Fabrício Veloso Ramos -Mensagem original- De: Laira Gasparello [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 9 de novembro de 2004 12:37 Para: [EMAIL PROTECTED] Assunto: Re: [delphi-br] MENSAGEM Não sei se é a melhor solução ou recurso... Mas no meu programa criei um form que é criado e demonstrado primeiro e no projeto, a cada criação de form´s ou data modules acrescento uma posição na barra de progresso.. - Original Message - From: info.suporte [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, November 09, 2004 1:24 PM Subject: [delphi-br] MENSAGEM Alguém sabe como faço para que o sistema mostre uma barra de progresso antes do sistema abrir, colocando uma mensagem 'Aguarde o sistema' PAULO FERNANDES [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] MENSAGEM
Eu coloco dentro do meu .DPR assim:
program Sigeco;
uses
Forms,
PRabertura in 'PRabertura.pas' {FRMabertura},
Principal in 'Principal.pas' {FRMprincipal},
PRbiblioteca in 'PRbiblioteca.pas' {FRMbiblioteca},
DMarquivos in 'DMarquivos.pas' {DM1: TDataModule},
.
. meus varios form
.
.
.
PRlogpgto in 'PRlogpgto.pas' {FRMlogPgto},
PRlancaPgto in 'PRlancaPgto.pas' {FRMlancaPgto},
PRatuPrincipal in 'PRatuPrincipal.pas' {FRMatuPrincipal};
{$R *.RES}
begin
Application.Initialize;
// Existe um form pequeno que eu criei com uma progress bar só para iniciar
// a cada criacao de form eu incremento a barra de progresso e dou um
refresh
// funciona direitinho.
FRMabertura := TFRMabertura.Create(Application);
FRMabertura.ProgressBar1.Position := 5;
FRMabertura.Show;
FRMabertura.Update;
Application.Title := 'SIGECO';
FRMabertura.Label1.Caption := 'Carregando módulo Principal ';
FRMabertura.ProgressBar1.Position := 10;
FRMabertura.Update;
Application.CreateForm(TFRMprincipal, FRMprincipal);
//Application.CreateForm(TFRMatuPrincipal, FRMatuPrincipal);
FRMabertura.Label1.Caption := 'Carregando o Gerenciador de Arquivos';
FRMabertura.ProgressBar1.Position := 20;
FRMabertura.Update;
Application.CreateForm(TDM1, DM1);
Application.CreateForm(TDM2, DM2);
Application.CreateForm(TDM3, DM3);
FRMabertura.Label1.Caption := 'Carregando módulo Cadastro de Alunos';
FRMabertura.ProgressBar1.Position := 40;
FRMabertura.Update;
Application.CreateForm(TFRMalunos, FRMalunos);
FRMabertura.Label1.Caption := 'Carregando módulo Alteração de Tabelas';
FRMabertura.ProgressBar1.Position := 45;
FRMabertura.Update;
Application.CreateForm(TFRMatlTabela, FRMatlTabela);
FRMabertura.Label1.Caption := 'Carregando módulo Criação de Tabelas';
FRMabertura.ProgressBar1.Position := 50;
FRMabertura.Update;
Application.CreateForm(TFRMtabela, FRMtabela);
FRMabertura.Label1.Caption := 'Carregando módulo Senhas';
FRMabertura.ProgressBar1.Position := 55;
FRMabertura.Update;
Application.CreateForm(TFRMsenha, FRMsenha);
FRMabertura.Label1.Caption := 'Carregando módulo Relatorios Gerais';
FRMabertura.ProgressBar1.Position := 79;
FRMabertura.Update;
Application.CreateForm(TFRMmontaRelato, FRMmontaRelato);
FRMabertura.Label1.Caption := 'Sistema totalmente carregado. Boa Sorte';
FRMabertura.ProgressBar1.Position := 100;
FRMabertura.Update;
FRMsenha.ShowModal;
FRMsenha.Update;
Application.Run;
end.
-Mensagem original-
De: Laira Gasparello [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 9 de novembro de 2004 12:37
Para: [EMAIL PROTECTED]
Assunto: Re: [delphi-br] MENSAGEM
Não sei se é a melhor solução ou recurso...
Mas no meu programa criei um form que é criado e demonstrado primeiro e no
projeto, a cada criação de form´s ou data modules acrescento uma posição
na barra de progresso..
- Original Message -
From: info.suporte [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, November 09, 2004 1:24 PM
Subject: [delphi-br] MENSAGEM
Alguém sabe como faço para que o sistema mostre uma barra de progresso
antes do sistema abrir, colocando uma mensagem 'Aguarde o sistema'
PAULO FERNANDES
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
