[delphi-br] Foto
Alguiem sabe que medidas uso no image para fotos scanneadas em 3cm x 4cm? No image estou usando o Stretch True e coloquei em um Panel, qual será o tamanho desse panel H = 200 W =150 Será que são essas medidas? 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 * 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
[delphi-br] Medidas
Alguém sabe me dizer qual é a unidade de medida padrão que o delphi usa em seus componentes. É milimetro ou centimetros. Preciso ter uma medida para as fotos 3x4 não ficarem ruins. 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 * 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
[delphi-br] Paradox X percentual
Tenho a seguinte tabela; Tabela: regra.DB CDREGRA String 3 DESCRICAO String 40 PERCENTUAL Inteiro de 32 bits 0 VAL_LIMITE Dinheiro 0 DTINI_RETENCAO Data 0 DTFIM_RETENCAO Data 0 TP_RETENCAO String 1 DTINI_VALIDADE Data 0 DTFIM_VALIDADE Data 0 Gostaria de saber se se o percentual deve ser inteiro? Na hora de gravar ele não está gravando quebrado e sim inteiro, como faço para que 4.65% grave 4.65 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 * 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
Re: [delphi-br] Ano
// procedure TForm1.Button1Click(Sender: TObject); // coloque no seu evento var Ano : Integer; cData : String; begin cData := DatetoStr(Date()); // substitua Date() pela sua data da tabela cData := Copy(cData,7,4); Ano := StrtoInt(cData); // Label1.caption := inttoStr(Ano);; end; COMO faço para calcular Ano e a cData. Exemplo: ano: 2005 cData: 1950 Label1.caption: 55 [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
[delphi-br] Ano
Como extrair o ANO de uma data no usando delphi 5 com paradox. Não é em SQL. PAULO [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
[delphi-br] ESTÁGIO
Estágio para Porto Alegre. - 8 horas; - Nível técnico; - Salário acima de 1.000,00; - Conhecimentos em ASP Enviar Currículos para: [EMAIL PROTECTED] [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
[delphi-br] Image
Pessoal, estou tendo um problema muito sério com image. Na aplicação foi inserido um modulo para inserir fotografia. Só que quando vou colocar as fotos ficam deformadas, habilitei a opção Strech para qualquer tipo de tamanho. Como eu faço para padronizar o tamanho do image para cada foto. 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 * 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
[delphi-br] [OFF TOPIC] Duvida
Pessoal, desde que não saia do foco que é delphi, mas sempre é bom compartilhar informações de pessoas que estão em outros estados. Alguém ouviu, leu em jornais, revistas ou viu na televisão um assunto sobre o NÃO PAGAMENTO das assinaturas mensais das operadoras de telefone fixo, que será proibido. [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
Re: [delphi-br] [OFF TOPIC] Duvida
Em uma lista onde tantas cabeças pensam diferente sempre tem um que se acha. 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 * 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
Re: [delphi-br] [OFF TOPIC] Duvida
Walter perder tempo ou perder dinheiro? O que mais vale pra ti? Deves ir atras do teus ideais, é gente assim que o nosso país não precisa. Desculpa pela minha pergunta, mesmo sendo OFF Peço perdão pela pergunta 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 * 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
[delphi-br] Excluindo ou limpando
Alguém sabe alguma rotina para exclui ou limpar um arquivo JPEG de uma tabela paradox? 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 * 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
[delphi-br] Excluindo Imagem JPEG da tabela Paradox
Alguém sabe como faço para Excluir Imagem JPEG da tabela Paradox [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
Re: [delphi-br] Somente letras e teclas especiais
Cristiano, esse código eu tenho, o que eu não tenho é a opção que permite somente letras e caracteres especiais. 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 * 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
[delphi-br] Somente letras e teclas especiais
Como faço para que um edit possa ser digitado somente letras e teclas especiais, NÃO pode ser digitado números? [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
[delphi-br] Hora do programador
Pessoal, vou começar um projeto free lancer e não tenho a menor idéia de quanto custa a hora do programador. Por favor me deêm um auxilio. 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 * 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
[delphi-br] Erro ao criar relatório
Bom dia a todos, estou criando um relatório no Quickreport com Delphi 5, tentando colocar um JPEG no relatório, está gerando os seguinte erro [Error] URel_Irmas.pas(1306): Incompatible types: 'TImage' and 'TQRImage' Alguem pode me ajudar? PAULO FENANDES [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
[delphi-br] Valor total do DBGRID
Como faço para mostras quantos registros tem em um DBGrid, estou usando Query para pesquisa falta colocar o total de registros da pesquisa, pode ser um label. Alguém sabe como faço isso? PAULO FERNANDES PORTO ALEGRE/RS [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
[delphi-br] Tabela x Word
Alguém já gerou dados de uma tabela paradox em um documento Word? 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 * 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
Re: [delphi-br] Tabela x Word
Cláudio, desculpas. Mas mandei a msg errada, é assim, como eu faço para passar os dados de uma tabela paradox para Word [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
[delphi-br] Tabelas
Alguém sabe eu faço para criar em tempo de execução uma variável que mostre o caminho do path no BDE. Uso DataModulo e Table. Quando rodo a aplicação e abre as tabelas mostrar através de um LABEL qual o caminho no DBE que está buscando. O que está acontecendo, a aplicação está rodando se as tabelas, se for renomear a pasta tabelas a plicação roda normalmente, alguem já passou por isso? [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
[delphi-br] Delphi 5 + Paradox em rede + Windows 2003
Gostaria de saber se alguém desenvolveu algum sistema em delphi 5 com paradox e roda em rede com o Windows 2003 Server. Está acontecendo o seguinte: Quando um usuários se conecta no terminal server para utilizar o sistema os próximos usuários não podem acessar o sistema. Na aplicação existe uma tela de usuário e senha, sempre diz que a senha está invalida. Por favor me ajudem. 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 * 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
[delphi-br] Session
Alguém usa ou já usou o componente Session em rede. Está havendo um problema que não consegui descobrir o mistério. Na empresa temos um Terminal Server. Está rodando uma aplicação desenvolvida em Delphi 5 com paradox e se um dos usuários entrar no sistema o restante não consegue entrar diz que a senha do sistema é invalida, os usuários conseguem se logar no servidor mas no programa não. No servidor existe uma pasta D:\APPS\ICMWIN e as subastas que é o programa e no Componente Session deixo a propriedade NetDir em branco e PrivateDir coloco D:\APPS\ICMWIN\PRIV. O que está faltando? Alguem já passou por este problema? PAULO FERNANDES PORTO ALEGRE/RS [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
Re: [delphi-br] Configurar BDE/Paradox em rede com winxp e win98
Me passa teu e-mail que te envio um material sobre paradox em rede. PAULO FERNANDES PORTO ALEGRE / RS [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
Re: [delphi-br] Configurar BDE/Paradox em rede com winxp e win98
Quando fores usar Win 98 e Win XP, coloca o WinXP como servidor e as estações com Win 98. [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
Re: [delphi-br] Contagem
Emerson, vou explicar o que fiz. Quero gerar um relatório no Quickreport na seguinte forma SOBRENOME + ',' + NOME, até aí tudo bem já entendido. existe duas coisas que não entendi no seu código: Nome2 := NomeSobrenome := Copy(Nome, 1, 8) + Sobrenome; e Copy(Nome, 1, 8) porque até a 8ª posição Para seu exemplo da certo: Suponhamos que o campo Nome tenha Natanael Santos e o campo sobrenome Santos. A quantidade de caracteres em nome é 15 e em sobrenome é 6, então 15 - 6 = 9. Dai fica Nome = Natanael + Santos. Agora com nome com 10 caracteres ficariam os dois ultimos caracteres de fora. Peço desculpas por encomoda-lo, mas preciso dessa ajuda. Muito obrigado. PAULO FERNANDES - Original Message - From: Emerson Moreno To: delphi-br@yahoogrupos.com.br Sent: Monday, July 04, 2005 4:55 PM Subject: Re: [delphi-br] Contagem Sim meu amigo eu sei, veja o exemplo abaixo. Var Nome, Sobrenome, Nome2, NomeSobrenome : String; Sobra : Integer; Begin sobra := 0; Nome := Trim(EdtNome.text); Sobrenome := Trim(EdtSobrenome.text); Sobra := Length(Nome) - Length(Sobrenome); Nome2 := NomeSobrenome := Copy(Nome, 1, 8) + Sobrenome; end; Como ficara a rotina acima. Suponhamos que o campo Nome tenha Natanael Santos e o campo sobrenome Santos. A quantidade de caracteres em nome é 15 e em sobrenome é 6, então 15 - 6 = 9. Dai fica Nome = Natanael + Santos. Pense direito que da certo. Espero ter ajudado. Em 04/07/05, Info Desenvolvimento[EMAIL PROTECTED] escreveu: pensei nisso mais vai variar demais usando o copy. NOME tem tamanho 40, só que tem nome que usa 28 posições SOBRENOME Tamanho 15, e sobrenome que usa 12 posições. São 3 mil registros. [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 Termos do Serviço do Yahoo!. -- []'s Emerson Moreno O grande sábio aprende por ensinar! -- 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 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
Re: [delphi-br] Contagem
Desculpa não escrevi o que fiz.
No meu SQL criei um campo calculado
No evento CalcFields da minha Query coloquei o código que ficou assim;
procedure TFichaIndivSobrenm.SQL_FICHAINDIVCalcFields(DataSet: TDataSet);
Var
Nome, Sobrenome, Nome2, NomeSobrenome : String;
Sobra : Integer;
Begin
sobra := 0;
Nome := Trim(SQL_FICHAINDIV.FieldByName('NMCIVIL').AsString);
Sobrenome := Trim(SQL_FICHAINDIV.FieldByName('SOBRENOME').AsString);
Sobra := Length(Nome) - Length(Sobrenome);
//Nome2 := Não entendi esse cara
NomeSobrenome := Sobrenome + ', '+Copy(Nome, 1, 8);
SQL_FICHAINDIV.FIELDBYNAME('SOBRENM').ASSTRING := NomeSobrenome;
end;
Gerando relatório
Nome da pessoa: Benedita Lourdes de Andrade
Sobrenome: ANDRADE
Está saindo assim: ANDRADE, Benedita L
Faltou : ourdes de
Como deve sair: ANDRADE, Benedita Lourdes de
[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
[delphi-br] Skype
Emerson Moreno Tu usa skype? meu usuário eh: pc.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 * 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
Re: [delphi-br] Contagem
Caso resolvido Depois de olhar, olhar e olhar vi onde está o erro. Muito obrigado.. 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 * 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
Re: [delphi-br] Table1/Table2
Cria um form com dois DBGrids, seta as propriedades do DbGrid com suas
respectivas tabelas
No botão coloca esse código.
Uso esse procedimento para passar dados de uma tabela para outra.
// Button
procedure TFCopia.BitBtn1Click(Sender: TObject);
var
x: Integer;
begin
Table2.First;
While not Table2.EOF do
begin
Table1.Append;
for x:= 0 to Table2.FieldCount -1 do
begin
Table1.Fields[x].AsString:= Table2.Fields[x].AsString;
end;
Table1.Post;
Table2.Next;
end;
ShowMessage('Terminado!'+ #13+
'Dados importados com sucesso!'+ #13+ 'OK!!! ;)');
end;
[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
Re: [delphi-br] Off-Topic - Windows Terminal Server roda Win32
Aqui na empresa usamos terminal server com Windows 2003 e aplicações rodando em Delphi com paradox, assim como o colega falou deves ter cuidado quantos as configurações do BDE Admin. [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
[delphi-br] Contagem
Alguém sabe como faço para contar quantos caracteres foi usado em um campo. Exemplo: Tenho um campo chamado NOME que tem 40 caracteres só que quando o usuários preencheu usou somente 32 caracteres. Como faço para saber ? 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 * 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
Re: [delphi-br] Contagem
Emerson Moreno O que pretendo fazer. Tenho dois campos NOME e SOBRENOME. No campo NOME foi preenchido Paulo César Fernandes No campo SOBRENOME foi preenchido FERNANDES Para eu eliminar o Fernandes do NOME vou calcular quantos caracteres tem o NOME e quantos caracteres tem o SOBRENOME. Mas pensando bem não vai dar, porque tanto o nome como sobrenome vão variar. 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 * 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
Re: [delphi-br] Contagem
como eu faço isso? [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
Re: [delphi-br] Contagem
pensei nisso mais vai variar demais usando o copy. NOME tem tamanho 40, só que tem nome que usa 28 posições SOBRENOME Tamanho 15, e sobrenome que usa 12 posições. São 3 mil registros. [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
[delphi-br] NOME + SOBRENOME
A/C
MacFly
BOM DIA!!!
A um tempo atras, escrevi pedido um auxilio sobre como eu gero em um relatório
no Quickreport o NOME + SOBRENOME que deve sair assim no relatório.
Paulo César Fernandes é o campos Nome
FERNANDES é o campo Sobrenome
No relatório deve sair assim: FERNANDES
Uso tabela paradox 7 com delphi 5, tu havia me dito que nunca trabalhou com
paradox pois tinha me dado uma sugestão para gerar direto nos SQL e a consulta
não suportou, depois me deu uma noca opção usar um campo calculado no evento
oncalcfields, usei esse recurso que que não gera continua gerando somente o
sobrenome.
Oq ue eu fiz.
NO evento OnCalcFields da minha Query o seguinte código
procedure TRel_Irma.SQL_IRMACalcFields(DataSet: TDataSet);
VAR
CampocalcNome: String;
begin
CampocalcNome:= SQL_IRMA.FIELDBYNAME('SOBRENOME').ASSTRING + ', ' +
SQL_IRMA.FIELDBYNAME('NMCIVIL').ASSTRING;
QRDBText1.Caption:= CampocalcNome; // onde será gerado a consulta
end;
Onde estou errando?
PAULO FERNANDES
PORTO ALEGRE/RS
[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
Re: [delphi-br] NOME + SOBRENOME
Caro amigo Giovanni, na minha query não tem essa propriedade Calculated, existe
o AutoCalcFields e está True.
está gerando o seguinte erro:
[Error] UnRel_Irma.pas(298): Undeclared identifier: 'CampocalcNome'
- Original Message -
From: Giovanni Cupertino
To: delphi-br@yahoogrupos.com.br
Sent: Friday, July 01, 2005 10:12 AM
Subject: Re: [delphi-br] NOME + SOBRENOME
O erro está aqui
VAR
CampocalcNome: String;
begin
vc não precisa criar uma variavel
e sim criar um campo calculado na sua tabela ou query MARCANDO calculated ok
o resto será igual
- Original Message -
From: Info Desenvolvimento [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, July 01, 2005 9:11 AM
Subject: [delphi-br] NOME + SOBRENOME
A/C
MacFly
BOM DIA!!!
A um tempo atras, escrevi pedido um auxilio sobre como eu gero em um
relatório no Quickreport o NOME + SOBRENOME que deve sair assim no relatório.
Paulo César Fernandes é o campos Nome
FERNANDES é o campo Sobrenome
No relatório deve sair assim: FERNANDES
Uso tabela paradox 7 com delphi 5, tu havia me dito que nunca trabalhou com
paradox pois tinha me dado uma sugestão para gerar direto nos SQL e a consulta
não suportou, depois me deu uma noca opção usar um campo calculado no evento
oncalcfields, usei esse recurso que que não gera continua gerando somente o
sobrenome.
Oq ue eu fiz.
NO evento OnCalcFields da minha Query o seguinte código
procedure TRel_Irma.SQL_IRMACalcFields(DataSet: TDataSet);
VAR
CampocalcNome: String;
begin
CampocalcNome:= SQL_IRMA.FIELDBYNAME('SOBRENOME').ASSTRING + ', ' +
SQL_IRMA.FIELDBYNAME('NMCIVIL').ASSTRING;
QRDBText1.Caption:= CampocalcNome; // onde será gerado a consulta
end;
Onde estou errando?
PAULO FERNANDES
PORTO ALEGRE/RS
[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
Esta mensagem foi verificada pelo E-mail Protegido Terra.
Scan engine: McAfee VirusScan / Atualizado em 30/06/2005 / Versão: 4.4.00 -
Dat 4525
Proteja o seu e-mail Terra: http://mail.terra.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
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
[delphi-br] list box em CHECK BOC
Como eu faço para listar um campo de uma tabela e checar com várias opções ou somente duas ou somente uma. Se tiver outra opção, tudo bem. 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 * 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
[delphi-br] Sobrenome+nome
Alguém sabe como eu faço para mostrar em um relatório do Quickreport o seguinte relatório; Na tabela tem o campo sobrenome. Paulo Cesar Fernandes (Nome + Sobrenome) Fernandes, Paulo César (Sobrenome + Nome) Obrigado PC [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
Re: [delphi-br] Sobrenome+nome
Também uso paradox e gerou a seguinte mensagem de erro: Raised Exception Class EBDEEngineError With Message Capabilitty not supported PC [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
[delphi-br] Ajuda
Pessoal, estou muito confuso quando ao meu caso. Quero fazer um form onde eu GRAVO, EDITO E EXCLUI as fotos dos funcionarios da empresa em uma tabela Funcionario.DB (Paradox) usando delphi 5 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 * 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
[delphi-br] Inserir arquivo JPG e JPEG
Pessoal ainda tenho algumas duvidas referente a como inserir arquivos JPG ou JPEG no Delphi 5 com Paradox. O que já fiz. Criei uma tabela coms os seguintes campos, somente para teste. CAMPO TIPO TAMANHO NOME A (String) 30 ENDERECO A (String) 20 FOTO G (Graphic) 1 DATA D (Data) Abri um Form: Não sei o devo programar nesees botões. BOTÃO GRAVAR: EDITAR: EXCLUIR: INSERIR FIGURA: Alguem pode me ajudar. [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
[delphi-br] Inserir arquivo JPG e JPEG
Pessoal, segue em anexo a minha grande duvida referente a como devo Gravar, Editar e Excluir fotos em um cadastro de funcionários usando delphi 5 com tabela Paradox (DBE). Agradeço pela ajuda. 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 * 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
[delphi-br] Inserir arquivo JPG e JPEG
Pessoal, segue em anexo a minha grande duvida referente a como devo Gravar, Editar e Excluir fotos em um cadastro de funcionários usando delphi 5 com tabela Paradox (DBE). Agradeço pela ajuda. 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 * 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
Re: [delphi-br] Inserir arquivo JPG e JPEG
A lista aceita arquivos em anexo? (arquivo no word.) [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
[delphi-br] Primeira Letra maiuscula
Pessoal alguém sabe qual o comando no delphi que substitui a Primeira letra de Minúscula para maiúscula. Exemplo: ana carolina da silva, sobstituit para Ana Carolina da Silva PAULO FERNANDES PORTO ALEGRE/RS [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
Re: [delphi-br] Inserir fotografia
Então tenho que criar uma pasta dentro da minha aplicação com as fotos dos funcionários e toda vez que eu for gravar buscar a foto desta pasta. Mas uma pergunta. Se eu fizer o form e criar um botão de busca para as fotos, por exemplo. Entrou um funcionário novo vou scanear a foto e salvar na pasta do sistema depois eu alimento os dados do novo funcionário e no momento de inserir sua foto clico no botão e busco a foto e gravo, como eu faço isso? Que componentes usar do delphi? PAULO FERNANDES PORTO ALEGRE/RS [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
Re: [delphi-br] Inserir fotografia
Está dando esse erro:
[Error] UFoto.pas(41): Incompatible types: 'String' and 'PChar'
SEU CÓDIGO:
Paulo,
eu faço o seguinte:
var xorigem,xdestino:string;
begin
OpenPictureDialog1.InitialDir:='';
OpenPictureDialog1.Filename:='';
if OpenPictureDialog1.execute then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.Filename);
xorigem:=OpenPictureDialog1.filename;
xdestino:= application.ExeName;
xdestino:=
extractfilepath(xdestino)+'imagens\'+extractfilename(OpenPictureDialog1.File
name);
If not FileExists(xdestino) then
LINHA 41...copyfile(xorigem,xdestino);
destino:= 'imagens\'+extractfilename(OpenPictureDialog1.Filename);
xdestino:= PATH PARA GRAVAR...
PARA CARREGAR
xdestino:= application.ExeName;
xdestino:=
extractfilepath(xdestino)+DM1.SqlQuery1.fieldbyname('pathpapelparede').AsStr
ing;
FcheckCtrl.Image1.Picture.LoadFromFile(xdestino);
Espero ter ajudado,
qualquer duvida,
Otavio
Cidreira/RS
[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
[delphi-br] Converter
Como converto Pchar para String [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
[delphi-br] Relatórios no Word
BOM DIA A TODOS Alguém já gerou algum relatório no Word usando Delphi 5 com Paradox? 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 * 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
[delphi-br] Sobrenome
Pessoal, por acaso alguém já fez um relatório no Quickreport (Delphi5 + Paradox) como no exemplo abaixo: (Estilo bibliografia de livros.) CAMPOS DA TABELA: NOME - SOBRENOME Paulo César Fernandes - FERNANDES RELATÓRIO: FERNANDES, Paulo César [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
[delphi-br] Relatório
Alguém já gerou m relatório no Quickreport, usando delphi 5 e Tabelas paradox, da maneira abaixo descrito? TABELA: SOBRENOME NOME BAPTTISTEL Antonia Bapttistel BRONDANI Domenica Matilde Brondani COELHO HELENA SOUZA COELHO COSTA Adely Duarte da Costa GONTIJO Geralda Alves Gontijo GURTNER Thereza Gurtner LIMA Maria de Jesus Ferreira Lima OLIVEIRA SEVERINA MARIA DE OLIVEIRA ROSSI Ignez Rocha Rossi SACHET Joanna Sachet SAVARIS Fiorinda Maria Savaris SCOPEL TERESA SCOPEL SILVA ANA MARIA DA SILVA SILVA MARIA IGNEZ DA SILVA SILVA OZANA GOMES SILVA SOUZA Therezinha Ma. da Conceição de Souza TONINI Gema Tonini TONIOLO Maria Elisabetha Toniolo VANSATTO THEREZA MARIA VANSATTO VOLPATO Ignez Volpato RELATÓRIO: BAPTTISTEL,Antonia BRONDANI,Domenica Matilde COELHO, HELENA SOUZA COSTA,Adely Duarte da GONTIJO,Geralda Alves GURTNER,Thereza LIMA,Maria de Jesus Ferreira OLIVEIRA,SEVERINA MARIA DE ROSSI,Ignez Rocha SACHET,Joanna SAVARIS,Fiorinda Maria SCOPE,TERESA SILVA,ANA MARIA DA SILVA,MARIA IGNEZ DA SILVA,OZANA GOMES SOUZA,Therezinha Ma. da Conceição de TONINI,Gema TONIOLO,Maria Elisabetha VANSATTO,THEREZA MARIA VOLPATO,Ignez [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
[delphi-br] Inserir fotografia
Alguém sabe como eu faço para inserir fotografia no delphi 5 com paradox. O que eu já fiz foi inserir um campo na minha tabela chamado foto tipo Graphic, mas quero inserir um código no meu form de cadastro, um botão e esse botão irá inserir a foto do funcionário. PAULO FERNANDES PORTO ALEGRE/RS [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
[delphi-br] Onde está o erro?
Bom dia a todos. [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
[delphi-br] Mover form
Qual o comando que não permite a movimentação do form com o Mouse. Para o usuário não ficar mexendo no formulario de cadastro, por exelplo. PAULO FERNANDES PORTO ALEGRE/RS [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
[delphi-br] locate com chave composta
Como faço para dar um locate com chave composta 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 * 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
[delphi-br] Msg + Campo tabela
Em uma outra ocisião o Dimas Fernando me respondeu uma questão referente
aoseguinte problema:
Uma mensagem do delphi que me mostrasse campos de uma tabela.
Abaixo segue o exemplo dado por ele.
Application.MessageBox( PansiChar( ' Este aluno pertence a: ' +
tabela.fieldbyname('nome_campo').AsString),
'Aviso', mb_iconExclamation);
A minha duvida é a seguinte?
Se eu quiser colocar dois campos da mesma tabela o q tenho que fazer?
Meu exemplo:
//Aviso ao usuário dos valores de Retenção e Base
Application.MessageBox(PansiChar('Valor da Retenção:' +
floattostr(DataModulo.TMOVIMENTO.FieldByName('VALOR_RETENCAO').AsCurrency +
PansiChar('Valor da Base: ' +
floattostr(DataModulo.TMOVIMENTO.FieldByName('BASE_RETENCAO').AsCurrency)),
'Aviso', mb_iconExclamation);
ERRO:
[Error] UMovimento.pas(231): Incompatible types
PAULO FERNANDES
PORTO ALEGRE/RS
[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
[delphi-br] Onde está o erro
Pessoal é um locate com 3 campos de chaves primárias
Mensagem de ERRO?Erro creating variant array
V := VarArrayCreate([0,1,2], varOleStr); DataModulo.TREGRA.First;
While not DataModulo.TREGRA.Eof do
begin
V[0]:= DataModulo.TUSUARIO.FieldByName('CDOBRA').AsString;
V[1]:= DataModulo.TREGRA.FieldByName('CDREGRA').AsString;
V[2]:= DataModulo.TFORNEC.FieldByName('CDFORNEC').AsString;
If(DataModulo.TMOVIMENTO.Locate('CDOBRA;CDREGRA;CDFORNEC', V,[]))then
Onde está o erro no código acima
[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
Re: [delphi-br] Auto-Incremento
Pessoal, visto que criei uma bela discussão, peço a todos minhas desculpas e também fico satisfeito em contar com brilhantes programadores. Quando ha discussões é porque existe mais de uma solução para o mesmo caso. Ferramenta que uso: Delphi 5 Banco de dados: Paradox 7 O que acontecia: Quando fosse editar um registro em uma tabela em vez de editar ele estava acrescentando um novo registro. Explico: No form de cadastro das minhas regras tenho um botão que pesquisa os registros para serem editados ou excluídos, quando eu faço a pesquisa e acho o registro que foi digitado errado, por exemplo PAULLO FERNANDES e o usuário queria arrumar o erro o que acontecia, fazia a pesquisa encontrava o registro errado e trazia os dados para tela ao clicar no botão de edição habilitava todos os campos e arrumava para PAULO CESAR FERNANDES e mandava gravar, o que acontecia? Abriu um novo registro com PAULO CESAR FERNANDES e o q eu queria arrumar continuava alí na tabela. Conclusão: Analisando todas as respostas resolvi criar o campo como string e incrementei o código automaticamente, ou seja o usuário não poderá mudar o código. Obrigado pela atenção de todos. PAULO CESAR FERNANDES PORTO ALEGRE / RS [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
[delphi-br] Auto-Incremento
Alguém pode me responder quais as vantagens e as desvantagens em se trabalhar com Auto-Incremento? 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 * 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
Re: [delphi-br] Auto-Incremento
Eduardo, o meu problema é que quando vou editar um código já existente em vez de ele editar ele cria um novo campo. Porque isso? [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
Re: [delphi-br] Auto-Incremento
Sr.Rubem Rocha, como faço para editar um registro já existente. No meu botão edita eu mando a tabela editar e no meu botão Gravar coloco para gravar os dados da tabela, então ele acrescenta um novo registro igual ao q pedi para editar e com as alterações. Na verdade eu quero editar os valores na tabela e não criar um novo campo. [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
[delphi-br]
A/C Eduardo [EMAIL PROTECTED] Assunto: Formatar??? Como vc carrega este grid, é uma query ??? Minha Query: SELECT DISTINCT DESCRICAO, PERCENTUAL, VAL_LIMITE, DTINI_RETENCAO, DTFIM_RETENCAO, TP_RETENCAO, DTINI_VALIDADE, DTFIM_VALIDADE FROM REGRA WHERE DESCRICAO LIKE UPPER(:pDESCRICAO) ORDER BY DESCRICAO Se for passa a query q t explico. Agora s for Table eu não tenho nem ideia de como aparecer o '%', mas o valor é só vc forcar o tipo como asfloat e nao ascurr. [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
[delphi-br] Porcentagem
Pessoal.
Como faço para formatar um campo inteiro para o formato de percentual com duas
casa após a virgula.
Segue abaixo o exemplo:
Edit1(Onde vou digitar o valor) Se eu digitar 2 qauero que grave na tabela 0.2%
A tabela é paradox com o campo PERCENTUAL inteiro.
Meu código.
DataModulo.TREGRA.FieldByName('PERCENTUAL').AsInteger:=
strtoint(EPERC.Text)/100;
[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
[delphi-br] Auto-Incremento
Possuo uma tabela que o campo é auto-incremento. Como faço para que sejam
gravados registros nesta tabela
Estou mandando gravar, mas não está gravando, está gravando por cima
Exemplo no meu botão gravar, onde está o erro?
if(Application.MessageBox
('Confirma a Gravação dos dados?',
'CONFIRMAÇÃO',mb_IconQuestion+mb_YESNO)=idyes)then
BEGIN
LStatus.Visible:= True;
LSTATUS.Caption:= 'Inclusão de Registro!';
DataModulo.TREGRA.Open;
DataModulo.TREGRA.Edit;
DataModulo.TREGRA.FieldByName('CDREGRA').Value:=
DataModulo.TREGRA.FieldByName('CDREGRA').Value + 1;
DataModulo.TREGRA.FieldByName('DESCRICAO').Value:= EDESCRICAO.Text;
DataModulo.TREGRA.FieldByName('PERCENTUAL').Value:= EPERC.Text;
DataModulo.TREGRA.FieldByName('VAL_LIMITE').Value:= ELIMITE.Text;
DataModulo.TREGRA.FieldByName('DTINI_RETENCAO').AsDateTime:=
strtodate(EINICIO.Text);
DataModulo.TREGRA.FieldByName('DTFIM_RETENCAO').AsDateTime:=
strtodate(EINICIO.Text);
IF RGRETENCAO.ItemIndex = 0 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:= 's';//Semanal
IF RGRETENCAO.ItemIndex = 1 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:= 'q';//Quinzenal
IF RGRETENCAO.ItemIndex = 2 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:= 'm';//Mensal
IF RGRETENCAO.ItemIndex = 3 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:=
't';//Trimestral
IF RGRETENCAO.ItemIndex = 4 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:=
'e';//Semestral
IF RGRETENCAO.ItemIndex = 5 THEN
DataModulo.TREGRA.FieldByName('TP_RETENCAO').AsString:= 'a';//Anual
DataModulo.TREGRA.FieldByName('DTINI_VALIDADE').AsDateTime:=
strtodate(EINIVALID.Text);
DataModulo.TREGRA.FieldByName('DTFIM_VALIDADE').AsDateTime:=
strtodate(EFIMVALID.Text);
DataModulo.TREGRA.Post;
ShowMessage('Operação realizada com sucesso!');
LStatus.Visible:= False;
EDESCRICAO.Clear;
EPERC.Clear;
ELIMITE.Clear;
EINICIO.Clear;
EFIM.Clear;
EINIVALID.Clear;
EFIMVALID.Clear;
EDESCRICAO.Enabled:= False;
EPERC.Enabled:= False;
ELIMITE.Enabled:= False;
EINICIO.Enabled:= False;
EFIM.Enabled:= False;
EINIVALID.Enabled:= False;
EFIMVALID.Enabled:= False;
BitGrava.Enabled:= False;
BitEdita.Enabled:=False;
BitCancela.Enabled:=False;
BitDeleta.Enabled:= False;
RGRETENCAO.ItemIndex:= -1;
RGRETENCAO.SetFocus;
END;
[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
[delphi-br] Novo registro em uma tabela
Pessoal! Nunca usei o autoincremento em uma tabela Paradox. Tenho um botão gravar e quero inserir os dados na tabela. Como eu faço para gravar esses dados na tabela automaticamente. O que está acontecendo? Insiro os dados no form e está gravando sempre o ultimo registro que eu inseri, e automaticmanete vai inserindo os nr, mas só tem um registro na tabela, sempre o ultimo. O que faço? 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 * 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
[delphi-br] Data + dias
Possuo uma tabela no paradox7 com os seguintes campos: DTINICIOEDIT1.TEXTRECEBE A DATA DO DIA DTFIM EDIT2.TEXT* DTINI_VALID EDIT3.TEXTRECEBE A DATA DO DIA DTFIM_VALID EDIT4.TEXT* Gostaria de saber como eu faço para que esse edit2 e 3 recebam datas abaixo relacionadas: CRIEI UM RADIOGROUP COM AS SEGUINTES OPÇÕES: EDIT:= Data de Hoje mais 7 dias (Semanal) EDIT:= Data de Hoje mais 15 dias (Quinzenal) EDIT:= Data de Hoje mais 30 dias (Mensal) EDIT:= Data de Hoje mais 90 dias (Trimestral) EDIT:= Data de Hoje mais 180 dias (Semestral) EDIT:= Data de Hoje mais 365 dias (Anual) PAULO FERNANDES PORTO ALEGRE- RS [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
Re: [delphi-br] Data + dias
Eduardo RC Neto muito obrigado funcionou perfeitamente.
PAULO FERNANDES
PORTO ALEGRE - RS
- Original Message -
From: Eduardo RC Neto
To: delphi-br@yahoogrupos.com.br
Sent: Monday, May 02, 2005 3:10 PM
Subject: Res: [delphi-br] Data + dias
Faz assim:
case radiogroup1.itemindex of
0 : edit1.text := FormatDateTime('dd/mm/' ,now + 7);
1 : edit1.text := FormatDateTime('dd/mm/' ,now + 15);
2 : edit1.text := FormatDateTime('dd/mm/' ,now + 30);
3 : edit1.text := FormatDateTime('dd/mm/' ,now + 90);
4 : edit1.text := FormatDateTime('dd/mm/' ,now + 180);
5 : edit1.text := FormatDateTime('dd/mm/' ,now + 365);
end;
Abraços,
Eduardo RC Neto
Desenvolvimento de Sistemas
---
Archive ISP - Rio de Janeiro - RJ
[EMAIL PROTECTED]
www.archive.com.br
MSN: [EMAIL PROTECTED]
ICQ: 64-674-105
---Mensagem original---
De: Info Desenvolvimento
Data: 05/02/05 15:05:58
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Data + dias
Possuo uma tabela no paradox7 com os seguintes campos:
DTINICIOEDIT1.TEXTRECEBE A DATA DO DIA
DTFIM EDIT2.TEXT*
DTINI_VALID EDIT3.TEXTRECEBE A DATA DO DIA
DTFIM_VALID EDIT4.TEXT*
Gostaria de saber como eu faço para que esse edit2 e 3 recebam datas abaixo
relacionadas:
CRIEI UM RADIOGROUP COM AS SEGUINTES OPÇÕES:
EDIT:= Data de Hoje mais 7 dias (Semanal)
EDIT:= Data de Hoje mais 15 dias (Quinzenal)
EDIT:= Data de Hoje mais 30 dias (Mensal)
EDIT:= Data de Hoje mais 90 dias (Trimestral)
EDIT:= Data de Hoje mais 180 dias (Semestral)
EDIT:= Data de Hoje mais 365 dias (Anual)
PAULO FERNANDES
PORTO ALEGRE- RS
[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:
PUBLICIDADE
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!.
[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:
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
[delphi-br] Porcetagem
Alguém já formatou um edit.Text no formato de porcentagem? Pode usar o CurrencyEdit do RX Lib? Como se faz isso. [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
[delphi-br] Data + dias
Como eu faço para acrescentar dias em uma data Exemplo: Data de Hoje mais 7 dias (Semanal) Data de Hoje mais 15 dias (Quinzenal) Data de Hoje mais 30 dias (Mensal) depois trimestral, semestral e anual [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
Re: [delphi-br] Data + dias
Esqueci de dizer que eu quero alimentar essa data em um edit. Tem uma data inicia, que será o data do dia e uma data final que será ou semanal, quinzenal, mensal, trimestral, semestral e anual. Exemplo 28/05/2005 que é hoje + 7 dias = 04/05/2005 28/05/2005 que é hoje + 15 dias = 12/05/2005 28/05/2005 que é hoje + 30 dias = 27/05/2005 e assim sucessivamente. [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
[delphi-br] CNPJ e CPF
Como Calcular Digito Verificador de CNPJ e CPF [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
[delphi-br] Minimizar forms
Pessoal como faço para minimizar dois forms ao mesmo tempo. O principal e o de usuário e senha. [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
[delphi-br] PageControl
Alguém já usou o PageControl? Gostaria de saber qual o evento que us para habilitar ou desabilitar os TabSheet? [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
Re: [delphi-br] Mala direta
Mas é necessário usar algum componente? Tipo de etiqueta e etc... PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] qrlprev
Alguém já programou o qrlprev.dfm.(QuickReport) Colocando novos botões, separador, Glyph e programção do botão que adicionou? 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 * 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
[delphi-br] Mala direta
Alguém já fez arquivo de mala direta? Como faz isso? PAULO FERNANDES PORTO ALEGRE RS [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
Re: [delphi-br] Skype
Faz de conta que não perguntei nada. Assunto encerrado. Obrigado pela compreensão de todos. PAULO FERNANDES PORTO ALEGRE RS [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
Re: [delphi-br] qrmemo
Débora, tu usa tabelas paradox? 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 * 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
Re: [delphi-br] qrmemo
No teu relatório tu usa DBText, para mostrar os dados do campo memo? [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
Re: [delphi-br] qrmemo
em meu relatórios que uso memo, estou usando o QRDBText setado para o campo e na propriedade WordWrap eu passo para true, fazendo com que o campo memo apareça todos, outra coisa é que eu coloco o AutoSize = False e uso todo o espaço do relatório. Será que é isso que tu deseja? PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] Skype
Na lista alguem usa skype, se sim qual o Usuário. PAULO FERNANDES PORTO ALEGRE RS [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
Re: [delphi-br] Skype
Algum problema em perguntar se os participantes da lista usam SKYPE? [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
[delphi-br] Quickreport
Pessoal, como faço para desabilitar os botões minimizar, restaurar e maximar de um relatório. Em forms normais sem relatório o Border Icons funciona PAULO FERNANDES PORTO ALEGRE RS [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
Re: [delphi-br] Quickreport
Valeu Caverinha, só mais uma pergunta. É neste mesmo arquivo que se traduz os botões do Quickreport? [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
Re: [delphi-br] Quickreport
Caverinha, tem um programa aqui na empresa feito em delphi e colocaram um botão para enviar e-mail e e outro botão para transformar o relatório em Word, tu sabes como se faz isso? PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] Novos botões no Quicreport
Alguém sabe como eu faço para criar novos buttons no Quickreport, um para enviar e-mail e outro para Transformar o relatório em arquivo do Word. Alaguem já fez isso? PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] Novos botões no Quicreport
Como colocar os botões eu ja descobri, agora quer saber como faço para programar os botões [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
Re: [delphi-br] BDE - Versão 5.2
Adriano, com a apostila que te passei por e-mail este seu problema será solucionado. Esta mensagem se da porque seu LOCAL SHARE está falso. Coloque para True. PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] Fazendo Logoff
Como faço´para fazer o logoff do meu sistema (Troca de usuário) [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
[delphi-br] Dúvida
Pessoal, estou usando delphi 5 e quer usar essa função, erro
function IDADEATUAL(BirthDate: TDateTime; ReferenceDate: TDateTime = 0):
Integer;
begin
if ReferenceDate = 0 then
Result := Trunc(YearSpan(Date,
DataModulo.IRMA.FieldByName('DTNASC').AsDateTime))
else
Result := Trunc(YearSpan(ReferenceDate,
DataModulo.IRMA.FieldByName('DTNASC').AsDateTime));
end;
ERRO: [Error] URel_FxEtaria.pas(141): Undeclared identifier: 'YearSpan'
[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
[delphi-br] Urgente
Pessoal. Tenho na minha máquina o Delphi 5, mas fiz um upgrade para o Delphi 7 só que começou a gerar alguns erros e desinstalei os dois e reinstalei somente o Delphi 5. Agora o que está acontecendo é que em vez de estar o ícone do delphi 5 nas minhas aplicações está o ícone do delphi 7. Já passei limpador de registro (RegClean) além do mais esse programa apaga todos os registros antigos. Deletei todas as pastas que o delphi cria. O que devo fazer novamente? PAULO [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
[delphi-br] Excluindo forms da aplicação
Pessoal Gostaria de saber como devo proveder quando excluio um form da aplicação e os .pas, .dcu e etc. Exclui um for que não estoumais usando-o e não compilou o programa. Essa exlusão é feita manualmente ou tem algum macete? PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] Conversão data
Quando estou fazendo um passo a passo no delphi (F7) o delphi gera uns códigos para a data alguem sabe como faço para converter os códigos da data para data? [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
Re: [delphi-br] Conversão data
Mas na hora em que o sistema está fazendo o Break Point, tem como ver qual a data? Tipo o RUN - Avaluate/Modify que nos da o código que estou navegando. [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
[delphi-br] idade atual
Pessoal, estouu usando uma função que eu peguei das 800 Dicas e Truques delphi,
só que quando gero o relatório tem uma pessoa que está com 71 anos está saindo
no bloco do 70 anos, Mas se troco a data do windows em 9 dias ela saí no bloco
dos 71 anos. Abaixo segue a função.
Alguem pode me ajudar? Uso Delphi 7 com Paradox. Tem algum erro?
A FUNÇÃO
{$R *.DFM}
// função idade atual
function IdadeAtual(Nasc : TDate; DTATUAL : TDate): Integer;
Var AuxIdade, Meses : String;
MesesFloat, DiasFloat : Real;
IdadeInc, IdadeReal : Integer;
begin
AuxIdade := Format('%0.2f', [(DTATUAL- Nasc) / 365.6]);
Meses := FloatToStr(Frac(StrToFloat(AuxIdade)));
if AuxIdade = '0' then
begin
Result := 0;
Exit;
end;
if Meses[1] = '-' then
begin
Meses := FloatToStr(StrToFloat(Meses) * -1);
end;
Delete(Meses, 1, 2);
if Length(Meses) = 1 then
begin
Meses := Meses + '0';
end;
if (Meses '0') And (Meses '') then
begin
MesesFloat := Round(((365.6 * StrToInt(Meses)) / 100) / 30.47)
end else
begin
MesesFloat := 0;
end;
if MesesFloat 12 then
begin
IdadeReal := Trunc(StrToFloat(AuxIdade)); // + MesesFloat;
end else
begin
IdadeInc := Trunc(StrToFloat(AuxIdade));
Inc(IdadeInc);
IdadeReal := IdadeInc;
end;
Result := IdadeReal;
end;
[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
Re: [delphi-br] função
RUBEM ROCHA. Já está funcionando, a pessoa foi para o seu bloco (71-80 anos), cara não sei nem como te agradecer, cheguei a ficar emocionado, muito obrigado mesmo. MUITO OBRIGADO PAULO FERNANDES PORTO ALEGRE RS [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
Re: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Já tive esse tipo de problema. Esta dizendo que o arquivos .LCK, arquivos de lock é muito grande, feralmente isso acontece quando o relatório é muito grande. O que eu fiz: Criei duas pastas NET e PRIV junto ao sistema e configurei o NET DIR Para a pasta NET e inclui um componente chamado SESSION e configurei ele apontando para a pasta PRIV. PAULO FERNANDES PORTO ALEGRE RS [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
[delphi-br] função
como faço para usar essa função? function YearSpan(const ANow, AThen: TDateTime): Double; [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
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Exemplo: Se tu tens o teu sistema em um servidor configura o teu BDE para que o NET DIR setado para o pasta NET e assim respectivamente para as maquinas cliente, vais ter de mapear as unidade para o servidor. Agora se tens dois sistemas usando o BDE deves setar os dois para o mesmo NET DIR, ou sejaonde está sendo criado o arquivo chamado Pdoxusrs.net e o PATH para seus respectivos ALIAS. Quanto a pasta PRIV, faça que eu fiz aqui. Acrescenta um componente chamado Session1 e na propriedade PrivateDir tu direciona o caminho da pasta PRIV. Coloca o active para falso e quando começar a rodar o sistema tu passa active para true, e quando fechar retorna active para falso. Coloquei componente Session na minha tela principal, onde os usuários fazem login do sistema. PAULO FERNANDES PORTO ALEGRE RS [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
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
só mais uma coisinha não esquece de configurar o teu LOCAL SHARE para true, assim as modificações de hora e data do arquivo Pdoxusrs.net são atualizadas. [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
