[delphi-br] [OFF TOPIC] Chance unica

2005-05-04 Por tôpico Anderson Daniel 


  <http://statics.orolix.com.br/images/mensagens/header_laranja_convite.gif>




  <http://statics.orolix.com.br/images/pix.gif> 


Parabéns!
Você acaba de ser convidado por Anderson Daniel para participar da Orolix.

A Orolix é um provedor de acesso GRATUITO que PAGA para você navegar na
Internet.
Como?
Basta você utilizar o discador Orolix!
Você pode ganhar mais de R$ 60,00 por mês sem colocar a mão no bolso!

Não perca tempo e cadastre-se agora!
Cadastrando-se como convidado, a Orolix te paga em Dobro.
Para garantir a qualidade do serviço, a Orolix terá apenas 250.000 usuários!

Você não pode ficar de fora dessa!


Fiquei sabendo dessa boiada e não podia deixar você de fora!
É uma oportunidade maravilhosa de navegar pela internet e ganhar dinheiro. É
muito simples, basta você utilizar o discador Orolix e pronto! Quanto mais
você navega mais ganha! Depois é só transferir o dinheiro para sua conta
bancária.


Clique no endereço abaixo, faça seu cadastro e comece a ganhar em dobro!
http://www.orolix.com.br/registro/?codcupom=0067782571157379

Se preferir, acesse http://www.orolix.com.br/registro/
e digite o código: 0067782571157379

Caso não possa efetuar o cadastro agora, anote esse código.
O cadastro pode ser feito a partir de qualquer computador.

Não perca nem mais um segundo. Com a OROLIX, tempo é dinheiro!

Abraços,
Equipe OROLIX

  <http://statics.orolix.com.br/images/pix.gif> 


 

  <http://statics.orolix.com.br/images/mensagens/footer.gif> 

 

 


  --

No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.11.3 - Release Date: 03/05/2005


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



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Torpedo como fazer?

2005-03-03 Por tôpico Anderson Daniel 

Gostaria de saber se tem algum jeito de fazer minha aplicação enviar um
torpedo para um celular

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.5.7 - Release Date: 1/3/2005


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] registro do windows

2005-02-28 Por tôpico Anderson Daniel 

Falae pessoal,
 
Estuo fazendo uma aplicação que configura o outlook express diretamente pelo
registro do windows
bem até ai tudo normal... mais o meu problema e o seguinte, estou tendo
dificuldades no algoritimo e/ou no comando a utilizar para criar a chave
caso ja esteja uma conta criada e configurada
 
se alguem quizer testar na sua maquina basta por 3 Buttons e 4 edits
Aguardo reposta.
 
 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, registry,  Menus;
 
type
  TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
Edit1: TEdit;
Label2: TLabel;
Edit2: TEdit;
Label3: TLabel;
Edit3: TEdit;
Edit4: TEdit;
Label4: TLabel;
Button2: TButton;
Button3: TButton;
MainMenu1: TMainMenu;
Arquivo1: TMenuItem;
Sair1: TMenuItem;
N1: TMenuItem;
N2: TMenuItem;
AboutBox1: TMenuItem;
Ajuda1: TMenuItem;
AboutBox2: TMenuItem;
procedure Button1Click(Sender: TObject);
procedure Sair1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
  private
{ Private declarations }
  public
{ Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.DFM}
 
procedure TForm1.Button1Click(Sender: TObject);
var
  Reg: Tregistry;
begin
 
//Faz a troca do Caption do Botão
if Button1.Caption = '&Alterar'
  then
 begin
 // Habilita os Edit´s
button2.Enabled:=true;
edit1.Enabled:=true;
edit2.Enabled:=true;
edit3.Enabled:=true;
edit4.Enabled:=true;
 // Faz a troca do Caption do Botão
Button1.Caption:= '&Aplicar';
 end
else
 begin
   // desabilita os Edit´s
button2.Enabled:=false;
edit1.Enabled:=false;
edit2.Enabled:=false;
edit3.Enabled:=false;
edit4.Enabled:=false;
  //Faz a troca do Caption do Botão
Button1.Caption:= '&Alterar';
 end;
 

  Reg:=Tregistry.create;
  with Reg do
  begin
  rootkey:=HKEY_CURRENT_USER;
  Openkey('Software\Microsoft\Internet Account
Manager\Accounts\0001',false);
  writestring('Account Name', edit1.Text);
  writestring('POP3 Server', edit2.Text);
  writestring('SMTP Server', edit3.Text);
  writestring('POP3 User Name', edit4.Text);
  writestring('SMTP Display Name', edit1.Text);
  writestring('SMTP Email Address', edit4.Text);
  closekey;
  end;
end;
 
 
 
procedure TForm1.Sair1Click(Sender: TObject);
begin
close;
end;
 
procedure TForm1.FormShow(Sender: TObject);
var
  Reg: Tregistry;
begin
  Reg:=Tregistry.create;
  with Reg do
  begin
  rootkey:=HKEY_CURRENT_USER;
  Openkey('Software\Microsoft\Internet Account
Manager\Accounts\0001',false);
  edit1.Text:= reg.ReadString('SMTP Display Name');
  edit2.Text:= reg.ReadString('POP3 Server');
  edit3.Text:= reg.ReadString('SMTP Server');
  edit4.Text:= reg.ReadString('POP3 User Name');
 
  closekey;
 end;
  end;
 

procedure TForm1.Button3Click(Sender: TObject);
begin
close;
end;
 
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  button2.Enabled:= false;
  edit1.Text:= '';
  edit2.Text:= '';
  edit3.Text:= '';
  edit4.Text:= '';
end;
end.


  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.5.1 - Release Date: 27/2/2005


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Registro do windows como fazer

2005-02-28 Por tôpico Anderson Daniel 

 
 
 
 
Falae pessoal,
 
Estuo fazendo uma aplicação que configura o outlook express diretamente pelo
registro do windows
bem até ai tudo normal... mais o meu problema e o seguinte, estou tendo
dificuldades no algoritimo e/ou no comando a utilizar para criar a chave
caso ja esteja uma conta criada e configurada
 
se alguem quizer testar na sua maquina basta por 3 Buttons e 4 edits
Aguardo reposta.
 
 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, registry,  Menus;
 
type
  TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
Edit1: TEdit;
Label2: TLabel;
Edit2: TEdit;
Label3: TLabel;
Edit3: TEdit;
Edit4: TEdit;
Label4: TLabel;
Button2: TButton;
Button3: TButton;
MainMenu1: TMainMenu;
Arquivo1: TMenuItem;
Sair1: TMenuItem;
N1: TMenuItem;
N2: TMenuItem;
AboutBox1: TMenuItem;
Ajuda1: TMenuItem;
AboutBox2: TMenuItem;
procedure Button1Click(Sender: TObject);
procedure Sair1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
  private
{ Private declarations }
  public
{ Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.DFM}
 
procedure TForm1.Button1Click(Sender: TObject);
var
  Reg: Tregistry;
begin
 
//Faz a troca do Caption do Botão
if Button1.Caption = '&Alterar'
  then
 begin
 // Habilita os Edit´s
button2.Enabled:=true;
edit1.Enabled:=true;
edit2.Enabled:=true;
edit3.Enabled:=true;
edit4.Enabled:=true;
 // Faz a troca do Caption do Botão
Button1.Caption:= '&Aplicar';
 end
else
 begin
   // desabilita os Edit´s
button2.Enabled:=false;
edit1.Enabled:=false;
edit2.Enabled:=false;
edit3.Enabled:=false;
edit4.Enabled:=false;
  //Faz a troca do Caption do Botão
Button1.Caption:= '&Alterar';
 end;
 

  Reg:=Tregistry.create;
  with Reg do
  begin
  rootkey:=HKEY_CURRENT_USER;
  Openkey('Software\Microsoft\Internet Account
Manager\Accounts\0001',false);
  writestring('Account Name', edit1.Text);
  writestring('POP3 Server', edit2.Text);
  writestring('SMTP Server', edit3.Text);
  writestring('POP3 User Name', edit4.Text);
  writestring('SMTP Display Name', edit1.Text);
  writestring('SMTP Email Address', edit4.Text);
  closekey;
  end;
end;
 
 
 
procedure TForm1.Sair1Click(Sender: TObject);
begin
close;
end;
 
procedure TForm1.FormShow(Sender: TObject);
var
  Reg: Tregistry;
begin
  Reg:=Tregistry.create;
  with Reg do
  begin
  rootkey:=HKEY_CURRENT_USER;
  Openkey('Software\Microsoft\Internet Account
Manager\Accounts\0001',false);
  edit1.Text:= reg.ReadString('SMTP Display Name');
  edit2.Text:= reg.ReadString('POP3 Server');
  edit3.Text:= reg.ReadString('SMTP Server');
  edit4.Text:= reg.ReadString('POP3 User Name');
 
  closekey;
 end;
  end;
 

procedure TForm1.Button3Click(Sender: TObject);
begin
close;
end;
 
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  button2.Enabled:= false;
  edit1.Text:= '';
  edit2.Text:= '';
  edit3.Text:= '';
  edit4.Text:= '';
end;
end.


  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.5.0 - Release Date: 25/2/2005


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

RES: [delphi-br] multiprocessamento

2005-02-25 Por tôpico Anderson Daniel 

Obrigado pela dica irei pesquisar 
Ate mais 

-Mensagem original-
De: Bruno Lichot - Micrologos [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 25 de fevereiro de 2005 09:11
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] multiprocessamento


Salve Amigo Delphiano!

Vc vai conseguir fazer isso tranquilamente usando n-tier com COM+ ou SOAP.

As ordens.

[]´s
Bruno Lichot
Gerente de Novas Tecnologias - Micrologos Equipe ClubeDelphi.NET DevMedia
Group

www.micrologos.com.br - www.clubedelphi.net -
www.delphirio.assespro-rj.org.br

- Original Message -
From: "Anderson Daniel" <[EMAIL PROTECTED]>
To: 
Sent: Thursday, February 24, 2005 6:55 PM
Subject: [delphi-br] multiprocessamento



Galera eu sou novato aqui ainda, mais gostaria da comtribuição de vcs para
uma façanha nova no mercado meu Professor criou um meio de distribuirmos o
processamento local, para ser executado em varias maquinas na rede, minha
duvida e o seguinte alguém sabe como fazer para criar um programa que envie
esses processamentos para as maquinas da rede e depois as maquinas da rede
devolvam o pacote completo para o servidor de origem?

o site dele e esse:
http://multipinguim.underlinux.com.br/


  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005


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



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos












--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos




 







--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] multiprocessamento

2005-02-24 Por tôpico Anderson Daniel 

Galera eu sou novato aqui ainda, mais gostaria da comtribuição de vcs para
uma façanha nova no mercado
meu Professor criou um meio de distribuirmos o processamento local, para
ser executado em varias maquinas na rede, minha duvida e o seguinte alguém
sabe como fazer para criar um programa que envie esses processamentos para
as maquinas da rede e depois as maquinas da rede devolvam o pacote completo
para o servidor de origem?
 
o site dele e esse:
http://multipinguim.underlinux.com.br/
 

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

RES: [delphi-br] Alguém tem...

2005-02-24 Por tôpico Anderson Daniel 

Eu tenho em disquetes 


-Mensagem original-
De: marcio de Souza [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 24 de fevereiro de 2005 16:00
Para: enviar mensagem
Assunto: [delphi-br] Alguém tem...


Eu gostaria de saber se alguém tem a instalação do windows 3.11 ou ounde eu
consigo encontrar .
 
Agradeço
Marcio


-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do
Yahoo! agora.

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



--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos




 







--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Como criar programa para a web

2005-02-15 Por tôpico Anderson Daniel 

Gostaria que os amigos pudessem me enviar um tutorial de como fazer um
programa que rode via web, pois eu gostaria de montar um bd que fosse
possivel ser visualizado por uma pagina  ".html "
ou
se alguem tiver uma dica de como enviar uma pagina ( .html) por ftp acho que
resolveria o meu problema, pois criaria um relatorio em html.

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.7 - Release Date: 10/2/2005


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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

RES: [delphi-br] Erro estranho

2005-02-10 Por tôpico Anderson Daniel 

Irei pesquisar se encontro alguma solução para isto, mais enquanto isso
tente restaurar a " ~nome_da_unit.dcu " para " nome_da_unit.dcu " 


-Mensagem original-
De: Diego Menin [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 8 de fevereiro de 2005 16:11
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro estranho



Oi gente,

tah me dando esses erros ae exporadicamente quando vou compilar. Eu
resolvo apagando a .dcumas o q pode estar causando isso??

write error on "caminho"\nome_da_unit.dcu read error on
"caminho"\nome_da_unit.dcu

Obrigado,
Diego


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






-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos




 







-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.6 - Release Date: 7/2/2005




-- 
Internal Virus Database is out-of-date.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.6 - Release Date: 7/2/2005



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html