Re: [delphi-br] IDSMTP

2007-01-03 Por tôpico Alex - Yahoo
  O meu servidor é da Locaweb, será que tem como??

  - Original Message - 
  From: Andre Veloso de Mesquita 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 02, 2007 5:40 PM
  Subject: Re: [delphi-br] IDSMTP


  depende da configuração do seu servidor.

  - Original Message - 
  From: Alex - Yahoo [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, January 02, 2007 5:35 PM
  Subject: [delphi-br] IDSMTP

  Sei que parece meio paranóica a idéia mas é possivel eu usar o meu smtp para 
  enviar um e-mail mas para o remetente ir outro e-mail?

  Alex

  [As partes desta mensagem que não continham texto foram removidas]

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Agência de Turismo

2007-01-03 Por tôpico Walter Chagas (Yahoo)
Você já tentou ir a uma agência de turismo ou entrar em contato com 
uma para obter estas informações? É assim que se forma um analista de 
sistemas. Ir ao cliente e levantar os requisitos necessários do 
negócio dele.


[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]


--- Em delphi-br@yahoogrupos.com.br, brunojosem [EMAIL PROTECTED] 
escreveu

 Olá galera!
 Estou no final do meu curso e preciso entregar algum projeto.
 Decidi fazer um programa, em Delphi, de uma Agência de Turismos, só 
 que estou sem idéias dos requisitos necessários. Alguém tem alguma 
 idéia? Ou algum modelo só pra eu tirar uma idéia?
 Obrigado.





Re: [delphi-br] IDSMTP

2007-01-03 Por tôpico Desenvolvimento \(Anderson\)
olha, todos os servidores hoje em dia (pelo menos a maioria) oferecem recurso 
de redirecionamento de emails.
Tipo assim: se você configurar, todos os emails que chegam podem ser enviados 
para outro email.
Se você tiver um dominio assim: BLABLABLA.COM.BR, e o servidor tiver uma conta 
PEGA TUDO, se vc enviar [EMAIL PROTECTED], vai ser enviado para essa conta.

resumo: veja as configurações do email q vc está enviando (não o q ta 
recebendo!!!) e veja se tem algo assim.
Outra opção seria vc experimentar enviar um email pra outro endereço!!!


  - Original Message - 
  From: Alex - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 7:38 AM
  Subject: Re: [delphi-br] IDSMTP


  O meu servidor é da Locaweb, será que tem como??

  - Original Message - 
  From: Andre Veloso de Mesquita 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 02, 2007 5:40 PM
  Subject: Re: [delphi-br] IDSMTP

  depende da configuração do seu servidor.

  - Original Message - 
  From: Alex - Yahoo [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, January 02, 2007 5:35 PM
  Subject: [delphi-br] IDSMTP

  Sei que parece meio paranóica a idéia mas é possivel eu usar o meu smtp para 
  enviar um e-mail mas para o remetente ir outro e-mail?

  Alex

  [As partes desta mensagem que não continham texto foram removidas]

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  [As partes desta mensagem que não continham texto foram removidas]



   

  __ Informação do NOD32 IMON 1952 (20070102) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Internal Error L3169

2007-01-03 Por tôpico Sandro
Bom dia,
Alguém já se deparou com a situação onde ao tentar compilar o projeto é exibida 
a mensagem: Internal error: l3169
É gerado um .exe mas quando este é executado é o windows da a mensagem que não 
é uma aplicação win32.
O que faço para corrigir este problema?

Sandro

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Firebird e Delphi

2007-01-03 Por tôpico Jose Henrique
Olá amigo, talvez isso possa te ajudar !

vai lá no Delphi onde tem a query com o MAX e troca a sentenca por
esta aki e o result continuará sendo o proximo numero que vc terá
disponivel ! boa sorte qq duvida retorne ! 

sentenca:
---
select first 1 gen_id(Nome_Generator, 1) from Qualquer_Tabela;
 /\  /\ Incremento
 uso first pra so rodar o Gen_id uma unica vez
---


Boa Sorte !!!



--- Em delphi-br@yahoogrupos.com.br, andersonfurtilhobr3
[EMAIL PROTECTED] escreveu

 Olá amigos da Lista!!!
 
 Tenho um Generetor criado com o nome GEN_ENTIDADE, ligado a um Trigger 
 chamado ENTIDADE_BI.
 
 
 Como eu faço pra usar o mardito no Delphi?
 
 Alguém teria algum exemplo pra me enviar, pois já tentei de várias
forma e 
 ainda nada. Eu estava usando uma Query separada e dando um Select
Max + 1, 
 mas como tem os Generetor no FireBird gostaria de testa-los.
 
 Se alguém tiver um exemplo e puder me enviar ou me passar qualquer dica 
 ficarei agradecido.
 
 
 Um Forte abraço a todos
 Anderson Furtilho
 
 ___
 Busca Yahoo!
 O serviço de busca mais completo da Internet. O que você pensar o
Yahoo! encontra.
 http://br.busca.yahoo.com/





Re: [delphi-br] Re: Firebird e Delphi

2007-01-03 Por tôpico Henrique Netzka \(Vetor Sistemas\)
Na mesma linha, tem uma tabela que só tem um registro e não precisa usar o 
FIRST:

SELECT
  GEN_ID(Nome_DO_Gerador, 1)
FROM
  RDB$Database

Abraços
Henrique

  - Original Message - 
  From: Jose Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 9:07 AM
  Subject: [delphi-br] Re: Firebird e Delphi


  Olá amigo, talvez isso possa te ajudar !

  vai lá no Delphi onde tem a query com o MAX e troca a sentenca por
  esta aki e o result continuará sendo o proximo numero que vc terá
  disponivel ! boa sorte qq duvida retorne ! 

  sentenca:
  ---
  select first 1 gen_id(Nome_Generator, 1) from Qualquer_Tabela;
  /\ /\ Incremento 
  uso first pra so rodar o Gen_id uma unica vez
  ---

  Boa Sorte !!!

  --- Em delphi-br@yahoogrupos.com.br, andersonfurtilhobr3
  [EMAIL PROTECTED] escreveu
  
   Olá amigos da Lista!!!
   
   Tenho um Generetor criado com o nome GEN_ENTIDADE, ligado a um Trigger 
   chamado ENTIDADE_BI.
   
   
   Como eu faço pra usar o mardito no Delphi?
   
   Alguém teria algum exemplo pra me enviar, pois já tentei de várias
  forma e 
   ainda nada. Eu estava usando uma Query separada e dando um Select
  Max + 1, 
   mas como tem os Generetor no FireBird gostaria de testa-los.
   
   Se alguém tiver um exemplo e puder me enviar ou me passar qualquer dica 
   ficarei agradecido.
   
   
   Um Forte abraço a todos
   Anderson Furtilho
   
   __
   Busca Yahoo!
   O serviço de busca mais completo da Internet. O que você pensar o
  Yahoo! encontra.
   http://br.busca.yahoo.com/
  



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Internal Error L3169

2007-01-03 Por tôpico Walter Chagas (Yahoo)
Sandro,

Esse tipo de erro é um erro interno no Delphi (Não sei te dizer se é 
um bug), mas quando ocorre aqui, eu tenho que fechar o Delphi, apagar 
todas as .dcu e o executável do projeto, abrir o Delphi de novo e dar 
um build All no projeto. Aí para de dar isto.

Uma coisa que já notei aqui, é que este erro se manifesta depois de 
várias compilações e recompilações no projeto aberto. Parece estar 
relacionado com alguma coisa de alocação de memória

[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]

--- Em delphi-br@yahoogrupos.com.br, Sandro [EMAIL PROTECTED] 
escreveu

 Bom dia,
 Alguém já se deparou com a situação onde ao tentar compilar o 
projeto é exibida a mensagem: Internal error: l3169
 É gerado um .exe mas quando este é executado é o windows da a 
mensagem que não é uma aplicação win32.
 O que faço para corrigir este problema?
 
 Sandro
 
 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] Firebird e Delphi

2007-01-03 Por tôpico Bruno Lichot
Salve Ana

No meu link de downloads tem uma apostila de desenvolvimento 
client/server, usando Delphi e FireBird.
Pega ela lá que com certeza pode lhe ser mto util.

link: http://cc.codegear.com/Author.aspx?ID=795118

Abração

Bruno Lichot

Ana Amélia Souza Pereira escreveu:
 Olá TODOS,

 Fiz um sisteminha em delphi e estava usando com o banco Interbase, mas o
 banco deu pau.
 Montei outro banco só que em Firebird, mas agora o delphi não está
 funcionando com ele, quando vou fazer a ligação aparece banco invalido.

 Será que alguém pode me ajudar?

 Ana


 [As partes desta mensagem que não continham texto foram removidas]



 __ Informação do NOD32 IMON 1954 (20070103) __

 Esta mensagem foi verificada pelo NOD32 sistema antivírus
 http://www.eset.com.br


   

-- 
--
[]´s
Bruno Lichot



[delphi-br] Inicializar com o Windows

2007-01-03 Por tôpico willer
Olá pessoal, estou desenvolvendo um sistema que vai rodar em um Servidor de 
Automação, ficarão ligados a ela vários dispositovos externos. E gostaria de 
saber como faço para colocar no Registro do Windows o meu programa de forma que 
ele inicializasse automaticamente a cada vez que o windows fosse carregado. No 
servidor roda o Windows XP Professional SP2.

Agradeço desde já.

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Inicializar com o Windows

2007-01-03 Por tôpico Shimon Cesar de Souza Soares
Acho que isso pode te ajudar:
 
uses registry;

var reg:TRegIniFile;


procedure TForm1.FormCreate(Sender: TObject);


var


s,s2:string;


begin


Reg:=TRegIniFile.Create('LloydSoft');


{HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run}


S:=ExtractFileDir(Application.ExeName);


S2:=ExtractFileName(Application.ExeName);


S:=S+'\'+S2;


reg.RootKey:=HKEY_USERS;


reg.Openkey ('\.DEFAULT\Software\Microsoft\Windows\CurrentVersion',false);


reg.WriteString('Run', 'Logo', s);


button1.click;


end; 


 

Shimon César de S. Soares
[EMAIL PROTECTED]
Departamento de TI
HDL da Amazônia Ind.Elet. Ltda.
www.hdl.com.br

 




De: delphi-br@yahoogrupos.com.br em nome de willer
Enviada: qua 03/01/07 09:37
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Inicializar com o Windows



Olá pessoal, estou desenvolvendo um sistema que vai rodar em um Servidor de 
Automação, ficarão ligados a ela vários dispositovos externos. E gostaria de 
saber como faço para colocar no Registro do Windows o meu programa de forma que 
ele inicializasse automaticamente a cada vez que o windows fosse carregado. No 
servidor roda o Windows XP Professional SP2.

Agradeço desde já.

[As partes desta mensagem que não continham texto foram removidas]



 


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Inicializar com o Windows

2007-01-03 Por tôpico willer
Valeu pela ajuda. Era o que eu precisava.
E como removo o registro?

  - Original Message - 
  From: Shimon Cesar de Souza Soares 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 10:41 AM
  Subject: RES: [delphi-br] Inicializar com o Windows


  Acho que isso pode te ajudar:

  uses registry;

  var reg:TRegIniFile;

  procedure TForm1.FormCreate(Sender: TObject);

  var

  s,s2:string;

  begin

  Reg:=TRegIniFile.Create('LloydSoft');

  {HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run}

  S:=ExtractFileDir(Application.ExeName);

  S2:=ExtractFileName(Application.ExeName);

  S:=S+'\'+S2;

  reg.RootKey:=HKEY_USERS;

  reg.Openkey ('\.DEFAULT\Software\Microsoft\Windows\CurrentVersion',false);

  reg.WriteString('Run', 'Logo', s);

  button1.click;

  end; 

  Shimon César de S. Soares
  [EMAIL PROTECTED]
  Departamento de TI
  HDL da Amazônia Ind.Elet. Ltda.
  www.hdl.com.br

  

  De: delphi-br@yahoogrupos.com.br em nome de willer
  Enviada: qua 03/01/07 09:37
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Inicializar com o Windows

  Olá pessoal, estou desenvolvendo um sistema que vai rodar em um Servidor de 
Automação, ficarão ligados a ela vários dispositovos externos. E gostaria de 
saber como faço para colocar no Registro do Windows o meu programa de forma que 
ele inicializasse automaticamente a cada vez que o windows fosse carregado. No 
servidor roda o Windows XP Professional SP2.

  Agradeço desde já.

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



   

  __ Informação do NOD32 IMON 1954 (20070103) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Update do delphi 7

2007-01-03 Por tôpico Uni-K Antonio Carlos
Olá pessoal,

Estou lendo uma arquivo texto e inserindo numa tabela firebird, acontece 
que quando o arquivo é grande dá falta de memória, acho que pode ser algum 
patch de atualização do delphi, alguem teria isto para me manda ?

Desde já agradeço a atenção e,

Feliz Ano Novo,

Ps. Estou usando o ibx com o compoente TIBQuery, passo o SQL para ele e 
depois passo os parametros com parambyname e ExecSql

Antonio Carlos
Tel. 11 5585-2624
www.unik-info.com.br
[EMAIL PROTECTED]

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Update do delphi 7

2007-01-03 Por tôpico Bruno Lichot
Salve

Realmente atualizar o delphi ajuda bastante,

como vc esta inserindo os dados ou atualizando atraves de componentes ou 
atraves de comando sql montados dinamicamente?

eu aconselho terminantemente atraves de comandos sql, q e mto mais rapido..

ja fiz operações com mais de 3 gigas de tamanho desta forma e foi td 
beleza.. a unica diferença é q utilizei dbexpress ao inves de ibx

abraços

Bruno Lichot


Uni-K Antonio Carlos escreveu:
 Olá pessoal,

 Estou lendo uma arquivo texto e inserindo numa tabela firebird, acontece 
 que quando o arquivo é grande dá falta de memória, acho que pode ser algum 
 patch de atualização do delphi, alguem teria isto para me manda ?

 Desde já agradeço a atenção e,

 Feliz Ano Novo,

 Ps. Estou usando o ibx com o compoente TIBQuery, passo o SQL para ele e 
 depois passo os parametros com parambyname e ExecSql

 Antonio Carlos
 Tel. 11 5585-2624
 www.unik-info.com.br
 [EMAIL PROTECTED]

 [As partes desta mensagem que não continham texto foram removidas]



 __ Informação do NOD32 IMON 1954 (20070103) __

 Esta mensagem foi verificada pelo NOD32 sistema antivírus
 http://www.eset.com.br


   

-- 
--
[]´s
Bruno Lichot



[delphi-br] Duvida no DBComboBox?

2007-01-03 Por tôpico Leonardo Anselmo
Pessoal,

  Tenho um dbcombobox na minha aplicacao que mostra dois valores F e J, 
F para (Pessoa Fisica) e J (Pessoa Juridica), sendo que no banco de dados e 
gravado somente o F ou o J, mais quero que apareça no dbcombobox como FISICA e 
JURIDICA, entao como devo fazer isso?.

Desde ja Agradeco

Leonardo Anselmo

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Coisa de louco!!!! (Delphi com ASP.NET)

2007-01-03 Por tôpico Murillo Proença
Fala aí pessoal, tudo blz?

Me deparei com um erro mais louco que eu.
É o seguinte, tenho um site desenvolvido em Delphi 2006 com ASP.NET,
utilizando BDP para conexão ao Oracle 10g. Acontece que de tempos em
tempos, do nada, ao carregar a página que acessa o Oracle dá um erro
Não conectado ao oracle. Isso sem ter feito nada, sem atualização,
sem reiniciar servidor de aplicação, sem reiniciar servidor de banco,
absolutamente do nada. 
O que eu estava fazendo para resulver, era apenas pegar a DLL da minha
máquina e substituir no servidor de aplicação que tudo voltava ao normal. 
Bom, o mais interessante é que descobri agora que, se eu pego a DLL
que está no servidor, dou um CTRL C + CTRL V, excluo a DLL original e
renomeio a copiada, também volta a funcionar.
Alguém tem alguma idéia do que pode estar acontecendo?

Abraço

Murillo Proença



Res: [delphi-br] Duvida no DBComboBox?

2007-01-03 Por tôpico Andre Luis Silveria
Use assim:
Na tabela no evento OngetText do campo coloque:
   if Sender.AsString = 'D' then
  Text := 'Débito'
   else
   if Sender.AsString = 'C' then
  Text := 'Crédito';

Na tabela no evento OnSetText coloque:
   if  Text = 'Débito' then
 Sender.AsString = 'D' 
 

   else

   if  Text = 'Crédito' then

  Sender.AsString := 'C';

Ou então usar os dbComboBox da JEDI
  
 GYNCOWBOY 

 André Luis da Silveira


- Mensagem original 
De: Leonardo Anselmo [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 3 de Janeiro de 2007 13:37:56
Assunto: [delphi-br] Duvida no DBComboBox?









  



Pessoal,



Tenho um dbcombobox na minha aplicacao que mostra dois valores F e J, F para 
(Pessoa Fisica) e J (Pessoa Juridica), sendo que no banco de dados e gravado 
somente o F ou o J, mais quero que apareça no dbcombobox como FISICA e 
JURIDICA, entao como devo fazer isso?.



Desde ja Agradeco



Leonardo Anselmo



[As partes desta mensagem que não continham texto foram removidas]






  







!--

#ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;
}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;
}
#ygrp-vitnav{
padding-top:10px;
font-family:Verdana;
font-size:77%;
margin:0;
}
#ygrp-vitnav a{
padding:0 1px;
}
#ygrp-actbar{
clear:both;
margin:25px 0;
white-space:nowrap;
color:#666;
text-align:right;
}
#ygrp-actbar .left{
float:left;
white-space:nowrap;
}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;
font-size:77%;
padding:15px 0;
}
#ygrp-ft{
font-family:verdana;
font-size:77%;
border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;
}

#ygrp-vital{
background-color:#e0ecee;
margin-bottom:20px;
padding:2px 0 8px 8px;
}
#ygrp-vital #vithd{
font-size:77%;
font-family:Verdana;
font-weight:bold;
color:#333;
text-transform:uppercase;
}
#ygrp-vital ul{
padding:0;
margin:2px 0;
}
#ygrp-vital ul li{
list-style-type:none;
clear:both;
border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;
color:#ff7900;
float:right;
width:2em;
text-align:right;
padding-right:.5em;
}
#ygrp-vital ul li .cat{
font-weight:bold;
}
#ygrp-vital a {
text-decoration:none;
}

#ygrp-vital a:hover{
text-decoration:underline;
}

#ygrp-sponsor #hd{
color:#999;
font-size:77%;
}
#ygrp-sponsor #ov{
padding:6px 13px;
background-color:#e0ecee;
margin-bottom:20px;
}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;
margin:0;
}
#ygrp-sponsor #ov li{
list-style-type:square;
padding:6px 0;
font-size:77%;
}
#ygrp-sponsor #ov li a{
text-decoration:none;
font-size:130%;
}
#ygrp-sponsor #nc {
background-color:#eee;
margin-bottom:20px;
padding:0 8px;
}
#ygrp-sponsor .ad{
padding:8px 0;
}
#ygrp-sponsor .ad #hd1{
font-family:Arial;
font-weight:bold;
color:#628c2a;
font-size:100%;
line-height:122%;
}
#ygrp-sponsor .ad a{
text-decoration:none;
}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;
}
#ygrp-sponsor .ad p{
margin:0;
}
o {font-size:0;}
.MsoNormal {
margin:0 0 0 0;
}
#ygrp-text tt{
font-size:120%;
}
blockquote{margin:0 0 0 4px;}
.replbq {margin:4;}
--







__
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Duvida no DBComboBox?

2007-01-03 Por tôpico Murillo Proença
if (Query.FieldByName('pessoa').AsString = 'F') then
  DbCombo.ItemIndex:= 0
else
  DbCombo.ItemIndex:= 1;

--- Em delphi-br@yahoogrupos.com.br, Leonardo Anselmo [EMAIL PROTECTED]
escreveu

 Pessoal,
 
   Tenho um dbcombobox na minha aplicacao que mostra dois
valores F e J, F para (Pessoa Fisica) e J (Pessoa Juridica), sendo que
no banco de dados e gravado somente o F ou o J, mais quero que apareça
no dbcombobox como FISICA e JURIDICA, entao como devo fazer isso?.
 
 Desde ja Agradeco
 
 Leonardo Anselmo
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: Sequencial no oracle

2007-01-03 Por tôpico Cleiton
Oi Murillo, tudo bom?

Deu certinho a trigger que você sugeriu que eu criasse. Brigadão hein.

T+
  - Original Message - 
  From: Murillo Proença 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 21, 2006 10:26 AM
  Subject: [delphi-br] Re: Sequencial no oracle


  Crie uma trigger assim:

  CREATE OR REPLACE TRIGGER TRG_TAB1_INS
  BEFORE INSERT
  ON TAB1 FOR EACH ROW
  BEGIN
  SELECT
  TAB1_SEQ.NEXTVAL
  INTO
  :NEW.CAMPO1
  FROM
  DUAL;
  END;

  Murillo Proença

  --- Em delphi-br@yahoogrupos.com.br, Cleiton [EMAIL PROTECTED] escreveu
  
   Oi Pessoal...
   
   Estou com um probleminha e não sei como resolver. Pode ser que não 
  tem como fazer o que quero, mas de repente pode ser que seja coisa 
  simples.
   
   O que acontece é o seguinte:
   
   Criei uma tabela no banco (TAB1) com um campo do tipo number 
  (CAMPO1) e criei um sequencial para esse campo chamado TAB1_SEQ.
   
   Como eu faço para inserir dados nessa tabela pelo delphi mandando 
  executar o sequencial para esse campo?
   
   Estou usando Oracle, Delphi 7 e Zeos.
   -- 
   Esta mensagem foi verificada pelo sistema de antivírus e
   acredita-se estar livre de perigo.
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
  



   
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Duvida no DBComboBox?

2007-01-03 Por tôpico Rodrigo Kopke Lopes
Meu caro, aconselho-te a utilizar o WWDBComboBox do InfoPower, que vc configura 
aquilo que aparece no Display e os Values que são enviados para as colunas da 
tabela.
[]´s
Rodrigo Kopke

Leonardo Anselmo [EMAIL PROTECTED] escreveu:  
Pessoal,
 
 Tenho um dbcombobox na minha aplicacao que mostra dois valores F e J, F para 
(Pessoa Fisica) e J (Pessoa Juridica), sendo que no banco de dados e gravado 
somente o F ou o J, mais quero que apareça no dbcombobox como FISICA e 
JURIDICA, entao como devo fazer isso?.
 
 Desde ja Agradeco
 
 Leonardo Anselmo
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
   

 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Um programa para executar varias SQL's

2007-01-03 Por tôpico Weber Luvisa
Olá, preciso criar uma rotina para executar varios SCript dentro de um
arquivo texto no meu aplicativo delphi, uso Zeos, porem quando vou
executar pelo Zeos da erro nos arquivos ele passa apenaso  primeiro e
os após ; não executa.. agradeço se alguem tiver alguma idéia de como
fazer o mesmo!



[delphi-br] Autenticação de Usuários

2007-01-03 Por tôpico Thiago Luiz Daniel
Pessoal,

Estou criando um projeto,gerenciamento de transações bancárias,acontece 
que eu gostaria que para acessá-lo os usuários tivessem que se 
autenticar digitando um nome de usuario e uma senha que será validado 
em uma tabela de um banco MYSQL.Nesta tabela eu tenho os campos nome de 
usuario,senha.Alguem pode me dar uma sugestao.Uso ADO,ODBC.

Obrigado,

Thiago.





RE: [delphi-br] Coisa de louco!!!! (Delphi com ASP.NET)

2007-01-03 Por tôpico Zote
Provalmente esta perdendo a conexao com o banco de dados por timeout.

Dai quando você atualiza (copia) os assemblies da pagina novamente o IIS
recicla o processo iniciando novamente o seu site.

 

O que você pode fazer é:

1)  Aumentar o timeout da conexão. (Mas pode não resolver).

2)  Quando for fazer algo no banco, verificar se o erro é de não
conectado, caso positivo, tente conectar e repita a operação. Mas cuidado
para não entrar num loop infinito.

 

Com certeza existem outras formas, mas não lembrei de nenhuma outra.

 

Abraço

--

José Henrique (Zote)

Bludata Software

 

From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Murillo Proença
Sent: quarta-feira, 3 de janeiro de 2007 14:41
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Coisa de louco (Delphi com ASP.NET)

 

Fala aí pessoal, tudo blz?

Me deparei com um erro mais louco que eu.
É o seguinte, tenho um site desenvolvido em Delphi 2006 com ASP.NET,
utilizando BDP para conexão ao Oracle 10g. Acontece que de tempos em
tempos, do nada, ao carregar a página que acessa o Oracle dá um erro
Não conectado ao oracle. Isso sem ter feito nada, sem atualização,
sem reiniciar servidor de aplicação, sem reiniciar servidor de banco,
absolutamente do nada. 
O que eu estava fazendo para resulver, era apenas pegar a DLL da minha
máquina e substituir no servidor de aplicação que tudo voltava ao normal. 
Bom, o mais interessante é que descobri agora que, se eu pego a DLL
que está no servidor, dou um CTRL C + CTRL V, excluo a DLL original e
renomeio a copiada, também volta a funcionar.
Alguém tem alguma idéia do que pode estar acontecendo?

Abraço

Murillo Proença

 



[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Um programa para executar varias SQL's

2007-01-03 Por tôpico Marcelo Hoepfner \(SI\)
Voce podia ler todos os arquivos pra um memo, e depois pega o conteúdo do memo 
e executar...

 

Eu uso ado, e no ado tem um adocommand que executa varias instruções sql.

 

No zeus deve ter algum componente parecido.

 

Marcelo Hoepfner

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Weber 
Luvisa
Enviada em: quarta-feira, 3 de janeiro de 2007 17:16
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Um programa para executar varias SQL's

 

Olá, preciso criar uma rotina para executar varios SCript dentro de um
arquivo texto no meu aplicativo delphi, uso Zeos, porem quando vou
executar pelo Zeos da erro nos arquivos ele passa apenaso primeiro e
os após ; não executa.. agradeço se alguem tiver alguma idéia de como
fazer o mesmo!

 



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Um programa para executar varias SQL's

2007-01-03 Por tôpico Alessandro DUARTE de Moraes
Bem, esses tempos precisei de algo parecido. Daí fiz o seguinte:

- carreguei o arquivo SQL dentro de uma string (primeiro carreguei dentro de um 
TStringList e depois atribui a propriedade Text para a string)
- como ao final de cada SQL tem um ;, eu ia pegando os pedaços da SQL e 
executando uma por vez.


procedure ExecutaSQLs(NomeDoArquivo: string);
var
   ListaTmp : TStringList;
   StringTmp, Sql : String;
   k : Integer;
begin
   ListaTmp := TStringList.create;
   ListaTmp.LoadFromFile(NomeDoArquivo);
   StringTmp := ListaTmp.Text;
   ListaTmp.Free;

   while (StringTmp'') do begin
  k := Pos(';',StringTmp);
  if (k0) then begin
 Sql := Copy(StringTmp,1,k);
 StringTmp := Copy(StringTmp,k+1,Length(StringTmp)-k);
  end else begin
 Sql := StringTmp;
 StringTmp := '';
  end;

  // Executa o comando SQL contido na variável Sql

   end
end;

Espero que te ajude.
[]'s




  - Original Message - 
  From: Weber Luvisa 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 4:16 PM
  Subject: [delphi-br] Um programa para executar varias SQL's


  Olá, preciso criar uma rotina para executar varios SCript dentro de um
  arquivo texto no meu aplicativo delphi, uso Zeos, porem quando vou
  executar pelo Zeos da erro nos arquivos ele passa apenaso primeiro e
  os após ; não executa.. agradeço se alguem tiver alguma idéia de como
  fazer o mesmo!



   
  -- 
  E-mail Seguro Vetorial.net 

  Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, 
  encaminhe para [EMAIL PROTECTED] 

  Chave de Identificação: 54568,459c02a8786101307572673 


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Carregar dll dinamicamente

2007-01-03 Por tôpico Alisson Yahoo
Pessoal,

Estou desenvolvendo um sistema com módulos dividido em dlls. Cada dll tem uma 
função que abre o form principal, e é chamada em um item de menu. Gostaria de 
criar os itens dinamicamente para chamar cada dll, mas é preciso declarar a 
procedure de cada dll do seguinte modo:

procedure NomeProcedure; external 'NomeDll.dll';

Desse modo teria que declarar todas as dlls e não conseguiria chamar as dlls 
que estivem com os nomes gravados em um banco, por exemplo. Alguém tem alguma 
solução?

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Re: Agência de Turismo

2007-01-03 Por tôpico Julio Cesar
walter, vc ja viu sistema de agencias? tem umas opcoes de busca como se fossem 
comandos no autocad... sao codigos com caracteres coringas, eh mto cheio de 
recursos



Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
Nao ha saber mais ou saber menos, ha saberes diferentes (Paulo Freire)

  - Original Message - 
  From: Walter Chagas (Yahoo) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 03, 2007 9:48 AM
  Subject: [delphi-br] Re: Agência de Turismo


  Você já tentou ir a uma agência de turismo ou entrar em contato com 
  uma para obter estas informações? É assim que se forma um analista de 
  sistemas. Ir ao cliente e levantar os requisitos necessários do 
  negócio dele.

  []s

  Walter Alves Chagas Junior
  Belo Horizonte - MG - Brazil
  [EMAIL PROTECTED]
  http://www.geocities.com/SiliconValley/Bay/1058
  MSN: [EMAIL PROTECTED]

  --- Em delphi-br@yahoogrupos.com.br, brunojosem [EMAIL PROTECTED] 
  escreveu
  
   Olá galera!
   Estou no final do meu curso e preciso entregar algum projeto.
   Decidi fazer um programa, em Delphi, de uma Agência de Turismos, só 
   que estou sem idéias dos requisitos necessários. Alguém tem alguma 
   idéia? Ou algum modelo só pra eu tirar uma idéia?
   Obrigado.
  



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Backup

2007-01-03 Por tôpico Régis Júlio Bender
Boa Noite, 

estou tentando implantar no meu sistema um backup, mãs não sei nem por onde 
começar.
Alguem pode me ajudar?

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Emissão de nota fiscal

2007-01-03 Por tôpico Régis Júlio Bender
Boa noite, 

estou com um problema na impressao de notas fiscais com umas quantidade de 
produtos superior a suportada.
Por exemplo, na nota fiscal cabem 12 itens, mas existem 20 para serem 
impressos. Ele deverá jogar em duas notas com o mesmo número. 
Sei que existe uma propriedade chamada 'force new page' ou algo parecido, mas 
não sei aonde.
alguém pode  me ajudar???

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Carregar dll dinamicamente

2007-01-03 Por tôpico mrbar2000
Usar DLL pura para fazer esquema de plugin na aplicação tem alguns
problemas, problemas estes que podem ser resolvidos usando BPL, mas
estes ultimos tambem trazem algumas desvantagens.

Estes 2 artigos trazem um esquema bem eficiente de plugins:

http://isfd.kaju74.de/index.php?id=36,26,0,0,1,0
http://isfd.kaju74.de/index.php?id=36,28,0,0,1,0



[delphi-br] Re: Autenticação de Usuários

2007-01-03 Por tôpico higorrg
Ao iniciar o seu sistema apresente uma tela que solicite usuario e 
senha. Quando o usuario clicar em ok faça uma consulta no seu banco 
de dados onde o campo login seja igual ao digitado, abra e compare o 
campo senha com o campo digitado, desde que a consulta retorne algum 
registro, pois se nao retornar entao eh pq o usuario eh invalido.


Existem mil maneiras de se cria uma tela de login,..., invente uma ;)

Abraço 
Higor Granzoto

--- Em delphi-br@yahoogrupos.com.br, Thiago Luiz Daniel 
[EMAIL PROTECTED] escreveu

 Pessoal,
 
 Estou criando um projeto,gerenciamento de transações 
bancárias,acontece 
 que eu gostaria que para acessá-lo os usuários tivessem que se 
 autenticar digitando um nome de usuario e uma senha que será 
validado 
 em uma tabela de um banco MYSQL.Nesta tabela eu tenho os campos 
nome de 
 usuario,senha.Alguem pode me dar uma sugestao.Uso ADO,ODBC.
 
 Obrigado,
 
 Thiago.