[delphi-br] Criar pasta no Linux

2008-08-14 Por tôpico Pedro Henrique
Estou tentando criar uma pasta remotamente em um servidor Linux, mas quando
tento ele da erro falando que o caminho esta inválido. No Windows faço da
seguinte forma:

Valor de GHost: ‘192.168.0.200:/home/sistemas_vilesoft/corporate/dados/’

ASDiretorio := GHost;

ASDiretorio := '\\' + ASDiretorio + 'DocumentosRNC';

if not DirectoryExists(ASDiretorio) then

if not CreateDir(ASDiretorio) then
   raise Exception.Create('Não Foi Possível criar o diretório '
+ASDiretorio);



 

Parte superior do formulário

Parte inferior do formulário

Parte superior do formulário

  _  

Atenciosamente,

 


http://www.vienasistemas.com.br/assinatura.png

 Pedro Henrique Gomes 
 Projetos e Desenvolvimento 


 


( 

 MG (37) 3213-4855


* 

  mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


8 

  http://www.vilesoft.com.br/ www.vilesoft.com.br


 

http://www.vienasistemas.com.br/images/bn_franquia_pegn.gif

Parte inferior do formulário

Parte superior do formulário

O emitente desta mensagem é responsável por seu conteúdo e endereçamento.
Cabe ao destinatário cuidar quanto ao tratamento adequado. Sem a devida
autorização, a divulgação, a reprodução, a distribuição ou qualquer outra
ação em desconformidade com as normas internas da Vilesoft são proibidas e
passíveis de sanção disciplinar, cível e criminal. 

The sender of this message is responsible for its content and addressing.
The receiver shall take proper care of it. Without due authorization, the
publication, reproduction, distribution or the performance of any other
action not conforming to Vilesoft internal policies and procedures is
forbidden and liable to disciplinary, civil or criminal sanctions. 

 El emisor de este mensaje es responsable por su contenido y
direccionamiento. Cabe al destinatario darle el tratamiento adecuado. Sin la
debida autorización, su divulgación, reproducción, distribución o cualquier
otra acción no conforme a las normas internas de Vilesoft están prohibidas y
serán pasibles de sanción disciplinaria, civil y penal. Parte inferior do
formulário

 



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



[delphi-br] Re: WebCam - Remover imagem do dispositivo

2008-08-14 Por tôpico cezarmolinar
Estou utilizando o TCamera, obrigado pela dica. 
Quanto ao TCamera existe algum método que permita selecionar a 
webcam desejada? (ex.: tenho um notebook com webcam mas quero 
utilizar uma outra.) Quando eu utilizo o sistema o TCamera aciona 
automaticamente a camera on-board.

--- Em delphi-br@yahoogrupos.com.br, Adriano Santos (Yahoo) 
[EMAIL PROTECTED] escreveu

 Qq coisa tem o exemplo no meu blog também.
 Abs
 
 -- 
 Boa Leitura,
 
 Adriano Santos
 Development Manager SoftPark
 Editor Técnico Revistas ClubeDelphi e WebMobile
 www.delphitodelphi.blogspot.com
 www.adrianosantos.pro.br
 www.devmedia.com.br
 
 
 
 Odail Della Niesi Junior respondeu:
 
  Segue link para um exemplo do Adriano Santos
  http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip 
  http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip
 
  Ricardo César Cardoso escreveu:
  
   Se não me engano o nome desse componente é TCamera.
  
   Atte,
   Ricardo.
  
   --- Em ter, 12/8/08, Eduardo Silva dos Santos [EMAIL PROTECTED] 
  mailto:eduardo.drd%40gmail.com
   mailto:eduardo.drd%40gmail.com escreveu:
   De: Eduardo Silva dos Santos [EMAIL PROTECTED] 
  mailto:eduardo.drd%40gmail.com
   mailto:eduardo.drd%40gmail.com
   Assunto: Re: [delphi-br] WebCam - Remover imagem do dispositivo
   Para: delphi-br@yahoogrupos.com.br 
  mailto:delphi-br%40yahoogrupos.com.br 
  mailto:delphi-br%40yahoogrupos.com.br
   Data: Terça-feira, 12 de Agosto de 2008, 9:09
  
   o DelphiTwain funciona melhor com scanner, para webcam tem 
outro
   componente,
  
   só nao lembro o nome, da uma olhada no google que você vai 
achar.
  
   2008/8/12 cezarmolinar [EMAIL PROTECTED] mailto:cezar%40maua.g12 
  mailto:cezar%40maua.g12. br
  
Olá Pessoal!
  
   
  
Estou implementando um sistema que faz a captura de imagens 
através de
  
uma webcam. Estou utilizando o componente DelphiTwain.
  
Meu problema está em como remover do dispositivo a imagem 
capturada
  
pois as webcam criam um dispositivo (semelhante a um 
pendrive) porém
  
este dispositivo não pode ser mapeado. Minha dúvida é:
  
   
  
O DelphiTwain possui alguma rotina que faça a remoção de 
imagem do
  
dispositivo?
  
Existe alguma forma automática (via sistema sem interção do 
usuário)
  
para remover a imagem do dispositivo?
  
   




[delphi-br] SQL

2008-08-14 Por tôpico dhsb
Pessoal estou com uma dúvida.

Tenho um campo x dot ipo decimal 

xDECIMAL(15,2)

Ate ai tranquilo.


Todos os meus campos de x tem valor com duas casas decimas (,00)

Bom quando vou dar um sum no campo ele me apresenta o seguinte valor

1979,01999 ao qual o soma correta é 1979,02. POr que isso ocorre? 
quando gravo meus redistros gravo do tipo float.Como posso corrigir?

Delphi7, Firebird/Interbase



[delphi-br] Incremento no For

2008-08-14 Por tôpico Fabrício | PrismaFive
Bom dia senhores!

É possível fazer algum tipo de incremento no loop For? Gostaria de fazer 
loop no for de 2 em 2, ou 3 em 3. Em outras linguagens que utilizo é 
possível fazer tal procedimento.

Grato!

Fabrício Veiga.


Re: [delphi-br] Criar pasta no Linux

2008-08-14 Por tôpico Humberto Sales
Vc tem permissao pra criar pasta ?
Vc usa o samba pra compartilhar as pasta do linux?

Se o usuario q vc esta logado no windows nao tiver permissao sobre a 
pasta vc nao cria,
se vc estiver usando o samba pra compartilhar verifique no smb.conf se 
as opcoes

[public]
path = /home/teste  - pasta compartilhada
guest ok = yes  possibilita qualquer usuario ate mesmo sem senha 
usar a pasta
writable = yes   criar e salvar arquivos e permitida



Re: [delphi-br] SQL

2008-08-14 Por tôpico Andrei Luís
Isso já foi bastante discutido, o campo float não é um campo para valores
exatos como o que você precisa. Use Numeric pra definir o campo. E no delphi
utilize currency ao invés de float. Vai resolver teu problema.

[]
Andrei

2008/8/14 dhsb [EMAIL PROTECTED]

 Pessoal estou com uma dúvida.

 Tenho um campo x dot ipo decimal

 xDECIMAL(15,2)

 Ate ai tranquilo.


 Todos os meus campos de x tem valor com duas casas decimas (,00)

 Bom quando vou dar um sum no campo ele me apresenta o seguinte valor

 1979,01999 ao qual o soma correta é 1979,02. POr que isso ocorre?
 quando gravo meus redistros gravo do tipo float.Como posso corrigir?

 Delphi7, Firebird/Interbase




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



Re: [delphi-br] Re: WebCam - Remover imagem do dispositivo

2008-08-14 Por tôpico Adriano Santos (Yahoo)
Puts,

Não cheguei a testar isso não.

-- 
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br



cezarmolinar respondeu:

 Estou utilizando o TCamera, obrigado pela dica.
 Quanto ao TCamera existe algum método que permita selecionar a
 webcam desejada? (ex.: tenho um notebook com webcam mas quero
 utilizar uma outra.) Quando eu utilizo o sistema o TCamera aciona
 automaticamente a camera on-board.

 --- Em delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br, Adriano Santos (Yahoo)
 [EMAIL PROTECTED] escreveu
 
  Qq coisa tem o exemplo no meu blog também.
  Abs
 
  --
  Boa Leitura,
 
  Adriano Santos
  Development Manager SoftPark
  Editor Técnico Revistas ClubeDelphi e WebMobile
  www.delphitodelphi.blogspot.com
  www.adrianosantos.pro.br
  www.devmedia.com.br
 
 
 
  Odail Della Niesi Junior respondeu:
  
   Segue link para um exemplo do Adriano Santos
   http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip 
 http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip
   http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip 
 http://mrbool.devmedia.com.br/Novo/Revista/cd79-adriano-cam.zip
  
   Ricardo César Cardoso escreveu:
   
Se não me engano o nome desse componente é TCamera.
   
Atte,
Ricardo.
   
--- Em ter, 12/8/08, Eduardo Silva dos Santos [EMAIL PROTECTED]
   mailto:eduardo.drd%40gmail.com
mailto:eduardo.drd%40gmail.com escreveu:
De: Eduardo Silva dos Santos [EMAIL PROTECTED]
   mailto:eduardo.drd%40gmail.com
mailto:eduardo.drd%40gmail.com
Assunto: Re: [delphi-br] WebCam - Remover imagem do dispositivo
Para: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
   mailto:delphi-br%40yahoogrupos.com.br
   mailto:delphi-br%40yahoogrupos.com.br
Data: Terça-feira, 12 de Agosto de 2008, 9:09
   
o DelphiTwain funciona melhor com scanner, para webcam tem
 outro
componente,
   
só nao lembro o nome, da uma olhada no google que você vai
 achar.
   
2008/8/12 cezarmolinar [EMAIL PROTECTED] mailto:cezar%40maua.g12
   mailto:cezar%40maua.g12. br
   
 Olá Pessoal!
   

   
 Estou implementando um sistema que faz a captura de imagens
 através de
   
 uma webcam. Estou utilizando o componente DelphiTwain.
   
 Meu problema está em como remover do dispositivo a imagem
 capturada
   
 pois as webcam criam um dispositivo (semelhante a um
 pendrive) porém
   
 este dispositivo não pode ser mapeado. Minha dúvida é:
   

   
 O DelphiTwain possui alguma rotina que faça a remoção de
 imagem do
   
 dispositivo?
   
 Existe alguma forma automática (via sistema sem interção do
 usuário)
   
 para remover a imagem do dispositivo?
   


 
 No virus found in this incoming message.
 Checked by AVG - http://www.avg.com 
 Version: 8.0.138 / Virus Database: 270.6.3/1611 - Release Date: 14/8/2008 
 06:20
   

-- 
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br



RES: [delphi-br] SQL

2008-08-14 Por tôpico Luís Antônio
Bom eu uso o formatfloat(##,###.##) ... isso resolve o problema dos
floats

 

At.,

 

Luis

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Andrei Luís
Enviada em: quinta-feira, 14 de agosto de 2008 11:36
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] SQL

 

Isso já foi bastante discutido, o campo float não é um campo para valores
exatos como o que você precisa. Use Numeric pra definir o campo. E no delphi
utilize currency ao invés de float. Vai resolver teu problema.

[]
Andrei

2008/8/14 dhsb [EMAIL PROTECTED]
mailto:dionatan%40prosisinformatica.com.br 

 Pessoal estou com uma dúvida.

 Tenho um campo x dot ipo decimal

 x DECIMAL(15,2)

 Ate ai tranquilo.


 Todos os meus campos de x tem valor com duas casas decimas (,00)

 Bom quando vou dar um sum no campo ele me apresenta o seguinte valor

 1979,01999 ao qual o soma correta é 1979,02. POr que isso ocorre?
 quando gravo meus redistros gravo do tipo float.Como posso corrigir?

 Delphi7, Firebird/Interbase



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

 



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



[delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Jorge Ericsson
Olá amigos,
Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse
o meu problema.
Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.

Bom, preciso criar um atalho para o meu programa na pasta dentro da
Programas e nessa pasta colocar meu atalho da seguinte forma.

Programa Console - Desktop  (moleza)
   Console (programa)

Programa Exportação - Iniciar -
   Programas -
   Exportação (pasta)
  Export.exe (programa)

Programa Importação - Iniciar -
   Programas -
   Importação (pasta)
   Import.exe (programa)
Programa Migração -  Iniciar -
   Programas -
   Migração (programa)


Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei
o meu programa de instalação eu gostaria de controlar essa distribuição de
aplicativos.

Tentei usar a function abaixo mas não deu certo.

CreateShortcut(SourceFileName ;.

const
  SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
  QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';

Se alguém que já passou por isso puder me ajudar, já lhe fico grato...

Valew pessoal.

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


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



Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows

2008-08-14 Por tôpico Vinicius Santos - MSI
Meu computador se chama VINICIUS, as pastas ficam aqui dentro:

C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\

basta criar uma pasta ali dentro.

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br

  - Original Message - 
  From: Jorge Ericsson 
  To: undisclosed-recipients: 
  Sent: Thursday, August 14, 2008 3:45 PM
  Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows


  Olá amigos,
  Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse
  o meu problema.
  Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.

  Bom, preciso criar um atalho para o meu programa na pasta dentro da
  Programas e nessa pasta colocar meu atalho da seguinte forma.

  Programa Console - Desktop (moleza)
  Console (programa)

  Programa Exportação - Iniciar -
  Programas -
  Exportação (pasta)
  Export.exe (programa)

  Programa Importação - Iniciar -
  Programas -
  Importação (pasta)
  Import.exe (programa)
  Programa Migração - Iniciar -
  Programas -
  Migração (programa)

  Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei
  o meu programa de instalação eu gostaria de controlar essa distribuição de
  aplicativos.

  Tentei usar a function abaixo mas não deu certo.

  CreateShortcut(SourceFileName ;.

  const
  SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
  QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';

  Se alguém que já passou por isso puder me ajudar, já lhe fico grato...

  Valew pessoal.

  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF

  [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] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Jorge Ericsson
Vinicius o problema é que gostaria de criar para qq usuários que logasse na
máquina ou seja

C:\Documents and Settings\All Users\Menu Iniciar\Programas

Dessa forma qq usuário que logar na máquina terá a visualização dos
programas.



2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]

   Meu computador se chama VINICIUS, as pastas ficam aqui dentro:

 C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\

 basta criar uma pasta ali dentro.

 Vinicius dos Santos
 Blog: http://tuplas.blogspot.com
 http://www.msisolucoes.com.br


 - Original Message -
 From: Jorge Ericsson
 To: undisclosed-recipients:
 Sent: Thursday, August 14, 2008 3:45 PM
 Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
 Windows

 Olá amigos,
 Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse
 o meu problema.
 Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.

 Bom, preciso criar um atalho para o meu programa na pasta dentro da
 Programas e nessa pasta colocar meu atalho da seguinte forma.

 Programa Console - Desktop (moleza)
 Console (programa)

 Programa Exportação - Iniciar -
 Programas -
 Exportação (pasta)
 Export.exe (programa)

 Programa Importação - Iniciar -
 Programas -
 Importação (pasta)
 Import.exe (programa)
 Programa Migração - Iniciar -
 Programas -
 Migração (programa)

 Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu
 criei
 o meu programa de instalação eu gostaria de controlar essa distribuição de
 aplicativos.

 Tentei usar a function abaixo mas não deu certo.

 CreateShortcut(SourceFileName ;.

 const
 SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
 QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';

 Se alguém que já passou por isso puder me ajudar, já lhe fico grato...

 Valew pessoal.

 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF

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

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

  




-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


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



Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows

2008-08-14 Por tôpico Vinicius Santos - MSI
certo, mas então qual o problema de se criar dentro de All User ??


  - Original Message - 
  From: Jorge Ericsson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 14, 2008 4:11 PM
  Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do 
Windows


  Vinicius o problema é que gostaria de criar para qq usuários que logasse na
  máquina ou seja

  C:\Documents and Settings\All Users\Menu Iniciar\Programas

  Dessa forma qq usuário que logar na máquina terá a visualização dos
  programas.

  2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]

   Meu computador se chama VINICIUS, as pastas ficam aqui dentro:
  
   C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\
  
   basta criar uma pasta ali dentro.
  
   Vinicius dos Santos
   Blog: http://tuplas.blogspot.com
   http://www.msisolucoes.com.br
  
  
   - Original Message -
   From: Jorge Ericsson
   To: undisclosed-recipients:
   Sent: Thursday, August 14, 2008 3:45 PM
   Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
   Windows
  
   Olá amigos,
   Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse
   o meu problema.
   Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.
  
   Bom, preciso criar um atalho para o meu programa na pasta dentro da
   Programas e nessa pasta colocar meu atalho da seguinte forma.
  
   Programa Console - Desktop (moleza)
   Console (programa)
  
   Programa Exportação - Iniciar -
   Programas -
   Exportação (pasta)
   Export.exe (programa)
  
   Programa Importação - Iniciar -
   Programas -
   Importação (pasta)
   Import.exe (programa)
   Programa Migração - Iniciar -
   Programas -
   Migração (programa)
  
   Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu
   criei
   o meu programa de instalação eu gostaria de controlar essa distribuição de
   aplicativos.
  
   Tentei usar a function abaixo mas não deu certo.
  
   CreateShortcut(SourceFileName ;.
  
   const
   SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
   QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';
  
   Se alguém que já passou por isso puder me ajudar, já lhe fico grato...
  
   Valew pessoal.
  
   Jorge Ericsson S. Pinheiro
   Analista/Projetista de Sistemas
   Ericsson Sistemas e Soluções
   http://www.jericsson.com.br
   61 9227.4785 / 3967.6172
   Brasília - DF
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Att,

  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF

  [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] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Jorge Ericsson
você sabe como criar via código ???
Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta.



2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]

   certo, mas então qual o problema de se criar dentro de All User ??


 - Original Message -
 From: Jorge Ericsson
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Thursday, August 14, 2008 4:11 PM
 Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
 Windows

 Vinicius o problema é que gostaria de criar para qq usuários que logasse na
 máquina ou seja

 C:\Documents and Settings\All Users\Menu Iniciar\Programas

 Dessa forma qq usuário que logar na máquina terá a visualização dos
 programas.

 2008/8/14 Vinicius Santos - MSI [EMAIL 
 PROTECTED]vinicius%40msisolucoes.com.br
 

  Meu computador se chama VINICIUS, as pastas ficam aqui dentro:
 
  C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\
 
  basta criar uma pasta ali dentro.
 
  Vinicius dos Santos
  Blog: http://tuplas.blogspot.com
  http://www.msisolucoes.com.br
 
 
  - Original Message -
  From: Jorge Ericsson
  To: undisclosed-recipients:
  Sent: Thursday, August 14, 2008 3:45 PM
  Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
  Windows
 
  Olá amigos,
  Depois de fuçar muito esses dois dias, eu não encontrei nada que
 resolvesse
  o meu problema.
  Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.
 
  Bom, preciso criar um atalho para o meu programa na pasta dentro da
  Programas e nessa pasta colocar meu atalho da seguinte forma.
 
  Programa Console - Desktop (moleza)
  Console (programa)
 
  Programa Exportação - Iniciar -
  Programas -
  Exportação (pasta)
  Export.exe (programa)
 
  Programa Importação - Iniciar -
  Programas -
  Importação (pasta)
  Import.exe (programa)
  Programa Migração - Iniciar -
  Programas -
  Migração (programa)
 
  Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu
  criei
  o meu programa de instalação eu gostaria de controlar essa distribuição
 de
  aplicativos.
 
  Tentei usar a function abaixo mas não deu certo.
 
  CreateShortcut(SourceFileName ;.
 
  const
  SHELL_FOLDERS_ROOT =
 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
  QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';
 
  Se alguém que já passou por isso puder me ajudar, já lhe fico grato...
 
  Valew pessoal.
 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF
 
  [As partes desta mensagem que não continham texto foram removidas]
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Att,

 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF

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

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

  




-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


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



Re: [delphi-br] Urgente - Criação de Subpasta no m enu INICIAR do Windows

2008-08-14 Por tôpico Vinicius Santos - MSI
Coloquei um botão no form e coloquei isso:

MkDir('C:\Documents and Settings\All Users\Menu Iniciar\Programas\Teste')

funcionou, normalmente !

além de MkDir, vc tem o CreateDir, para criar pastas.


  - Original Message - 
  From: Jorge Ericsson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 14, 2008 4:25 PM
  Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do 
Windows


  você sabe como criar via código ???
  Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta.

  2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]

   certo, mas então qual o problema de se criar dentro de All User ??
  
  
   - Original Message -
   From: Jorge Ericsson
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Thursday, August 14, 2008 4:11 PM
   Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
   Windows
  
   Vinicius o problema é que gostaria de criar para qq usuários que logasse na
   máquina ou seja
  
   C:\Documents and Settings\All Users\Menu Iniciar\Programas
  
   Dessa forma qq usuário que logar na máquina terá a visualização dos
   programas.
  
   2008/8/14 Vinicius Santos - MSI [EMAIL 
PROTECTED]vinicius%40msisolucoes.com.br
   
  
Meu computador se chama VINICIUS, as pastas ficam aqui dentro:
   
C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\
   
basta criar uma pasta ali dentro.
   
Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br
   
   
- Original Message -
From: Jorge Ericsson
To: undisclosed-recipients:
Sent: Thursday, August 14, 2008 3:45 PM
Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
Windows
   
Olá amigos,
Depois de fuçar muito esses dois dias, eu não encontrei nada que
   resolvesse
o meu problema.
Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.
   
Bom, preciso criar um atalho para o meu programa na pasta dentro da
Programas e nessa pasta colocar meu atalho da seguinte forma.
   
Programa Console - Desktop (moleza)
Console (programa)
   
Programa Exportação - Iniciar -
Programas -
Exportação (pasta)
Export.exe (programa)
   
Programa Importação - Iniciar -
Programas -
Importação (pasta)
Import.exe (programa)
Programa Migração - Iniciar -
Programas -
Migração (programa)
   
Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu
criei
o meu programa de instalação eu gostaria de controlar essa distribuição
   de
aplicativos.
   
Tentei usar a function abaixo mas não deu certo.
   
CreateShortcut(SourceFileName ;.
   
const
SHELL_FOLDERS_ROOT =
   'Software\MicroSoft\Windows\CurrentVersion\Explorer';
QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';
   
Se alguém que já passou por isso puder me ajudar, já lhe fico grato...
   
Valew pessoal.
   
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF
   
[As partes desta mensagem que não continham texto foram removidas]
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   
  
   --
   Att,
  
   Jorge Ericsson S. Pinheiro
   Analista/Projetista de Sistemas
   Ericsson Sistemas e Soluções
   http://www.jericsson.com.br
   61 9227.4785 / 3967.6172
   Brasília - DF
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Att,

  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF

  [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] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico Jorge Ericsson
Desculpe Vinicius mas vc não entendeu meu problema..

Valew amigão..

2008/8/14 Vinicius Santos - MSI [EMAIL PROTECTED]

   Coloquei um botão no form e coloquei isso:

 MkDir('C:\Documents and Settings\All Users\Menu Iniciar\Programas\Teste')

 funcionou, normalmente !

 além de MkDir, vc tem o CreateDir, para criar pastas.


 - Original Message -
 From: Jorge Ericsson
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Thursday, August 14, 2008 4:25 PM
 Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
 Windows

 você sabe como criar via código ???
 Pq eu já testei e não tive sucesso, mesmo criando na mão a pasta.

 2008/8/14 Vinicius Santos - MSI [EMAIL 
 PROTECTED]vinicius%40msisolucoes.com.br
 

  certo, mas então qual o problema de se criar dentro de All User ??
 
 
  - Original Message -
  From: Jorge Ericsson
  To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br%
 40yahoogrupos.com.br
  Sent: Thursday, August 14, 2008 4:11 PM
  Subject: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
  Windows
 
  Vinicius o problema é que gostaria de criar para qq usuários que logasse
 na
  máquina ou seja
 
  C:\Documents and Settings\All Users\Menu Iniciar\Programas
 
  Dessa forma qq usuário que logar na máquina terá a visualização dos
  programas.
 
  2008/8/14 Vinicius Santos - MSI [EMAIL 
  PROTECTED]vinicius%40msisolucoes.com.br
 vinicius%40msisolucoes.com.br

  
 
   Meu computador se chama VINICIUS, as pastas ficam aqui dentro:
  
   C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\
  
   basta criar uma pasta ali dentro.
  
   Vinicius dos Santos
   Blog: http://tuplas.blogspot.com
   http://www.msisolucoes.com.br
  
  
   - Original Message -
   From: Jorge Ericsson
   To: undisclosed-recipients:
   Sent: Thursday, August 14, 2008 3:45 PM
   Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
   Windows
  
   Olá amigos,
   Depois de fuçar muito esses dois dias, eu não encontrei nada que
  resolvesse
   o meu problema.
   Talvezes seja o cansaço mais não consegui mesmo resolver o meu
 problema.
  
   Bom, preciso criar um atalho para o meu programa na pasta dentro da
   Programas e nessa pasta colocar meu atalho da seguinte forma.
  
   Programa Console - Desktop (moleza)
   Console (programa)
  
   Programa Exportação - Iniciar -
   Programas -
   Exportação (pasta)
   Export.exe (programa)
  
   Programa Importação - Iniciar -
   Programas -
   Importação (pasta)
   Import.exe (programa)
   Programa Migração - Iniciar -
   Programas -
   Migração (programa)
  
   Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu
   criei
   o meu programa de instalação eu gostaria de controlar essa distribuição
  de
   aplicativos.
  
   Tentei usar a function abaixo mas não deu certo.
  
   CreateShortcut(SourceFileName ;.
  
   const
   SHELL_FOLDERS_ROOT =
  'Software\MicroSoft\Windows\CurrentVersion\Explorer';
   QUICK_LAUNCH_ROOT =
 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';
  
   Se alguém que já passou por isso puder me ajudar, já lhe fico grato...
  
   Valew pessoal.
  
   Jorge Ericsson S. Pinheiro
   Analista/Projetista de Sistemas
   Ericsson Sistemas e Soluções
   http://www.jericsson.com.br
   61 9227.4785 / 3967.6172
   Brasília - DF
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
  --
  Att,
 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF
 
  [As partes desta mensagem que não continham texto foram removidas]
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Att,

 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF

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

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

  




-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


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



[delphi-br] caminhar automaticamente dentro de um filelist

2008-08-14 Por tôpico Clovis iTelefonica
Ola Pessoal

Boa tarde e Saudações

Como faço para cominhar automaticamente dentro de um FileListBox?

Obrigado
Clovito


   Clovis Machado Ferreira
Que o grande arquiteto do Universo nos Ilumine
Dourado(SP) - [EMAIL PROTECTED](MSN)

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



RE: [delphi-br] caminhar automaticamente dentro de um filelist

2008-08-14 Por tôpico Rubem Nascimento da Rocha

Defina caminhar automaticamente dentro de um FileListBox!
Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Thu, 14 Aug 2008 18:01:10 -0300
Subject: [delphi-br] caminhar automaticamente dentro de um filelist



Ola Pessoal

Boa tarde e Saudações

Como faço para cominhar automaticamente dentro de um FileListBox?

Obrigado
Clovito

_
Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver 
offline. Conheça  o MSN Mobile!
http://mobile.live.com/signup/signup2.aspx?lc=pt-br

[delphi-br] Usando dbexpress e clientDataset

2008-08-14 Por tôpico crist_ita
Amigos boa tarde 

Tenho a seguinte consulta no delphi: 

procedure TfrmAgenda.Calendario; 
var 
mostraData : String; 
mostraRegiao : String; 
begin 
mostraData := FormatDateTime('dd-mm-', MonthCalendar1.Date); 
mostraRegiao := ComboBox1.Text; 
sqlConsAgenda.Close; 
sqlConsAgenda.SQL.Clear; 
sqlConsAgenda.SQL.Add('SELECT a.hora FROM calendario a INNER JOIN 
calendario b'); 
sqlConsAgenda.SQL.Add('ON a.controle = b.controle'); 
sqlConsAgenda.SQL.Add('where b.dataagenda ='+ #39 + mostraData + 
#39); 
sqlConsAgenda.SQL.Add('AND b.zonaatuacao ='+ #39 + mostraRegiao + 
#39); 
sqlConsAgenda.Open; 
end; 

Seleciono todos os horários disponíveis dentro desta consulta, a 
mesma está funcionando, mais precisava mostra ao usuário o resultado 
da consulta que seria o campo `hora' desta consulta dentro de um 
DBLookupComboBox, neste caso trago o campo que preciso dentro do 
ClientDataSet, mais ao selecionar o registro gera o erro : 

allowed on a unidirectional dataset 

Alguém poderia dar uma dica como solucionar este problema.



Agradeço a ajuda!!





RES: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do Windows

2008-08-14 Por tôpico André
Mas e se eu tiver duas partições e minha documents and settings estiver na
unidade D:\ por exemplo?

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Vinicius Santos - MSI
Enviada em: quinta-feira, 14 de agosto de 2008 Boa tarde Dé 15:51
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
Windows

 

Meu computador se chama VINICIUS, as pastas ficam aqui dentro:

C:\Documents and Settings\VINICIUS\Menu Iniciar\Programas\

basta criar uma pasta ali dentro.

Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br

- Original Message - 
From: Jorge Ericsson 
To: undisclosed-recipients: 
Sent: Thursday, August 14, 2008 3:45 PM
Subject: [delphi-br] Urgente - Criação de Subpasta no menu INICIAR do
Windows

Olá amigos,
Depois de fuçar muito esses dois dias, eu não encontrei nada que resolvesse
o meu problema.
Talvezes seja o cansaço mais não consegui mesmo resolver o meu problema.

Bom, preciso criar um atalho para o meu programa na pasta dentro da
Programas e nessa pasta colocar meu atalho da seguinte forma.

Programa Console - Desktop (moleza)
Console (programa)

Programa Exportação - Iniciar -
Programas -
Exportação (pasta)
Export.exe (programa)

Programa Importação - Iniciar -
Programas -
Importação (pasta)
Import.exe (programa)
Programa Migração - Iniciar -
Programas -
Migração (programa)

Sei que o Inno Setup dá pra fazer isso com o pé nas costa, mas como eu criei
o meu programa de instalação eu gostaria de controlar essa distribuição de
aplicativos.

Tentei usar a function abaixo mas não deu certo.

CreateShortcut(SourceFileName ;.

const
SHELL_FOLDERS_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\Explorer';
QUICK_LAUNCH_ROOT = 'Software\MicroSoft\Windows\CurrentVersion\GrpConv';

Se alguém que já passou por isso puder me ajudar, já lhe fico grato...

Valew pessoal.

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF

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

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

 

No virus found in this incoming message.
Checked by AVG - http://www.avg.com 
Version: 8.0.138 / Virus Database: 270.6.3/1611 - Release Date: 14/8/2008
06:20


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



[delphi-br] Criptografar Executável

2008-08-14 Por tôpico Fabio Thomaz
Alguém conhece algum programa para criptografar um executável?
Conheço o HandProt, mas queria uma coisa mais fácil, só para criptografar
mesmo, e de preferência free (caso exista).


Fábio Thomaz
RG System Informática Ltda - Desenvolvimento
Msn: [EMAIL PROTECTED]


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



Re: [delphi-br] Incremento no For

2008-08-14 Por tôpico Joao Morais
Fabrício | PrismaFive wrote:
 É possível fazer algum tipo de incremento no loop For? Gostaria de fazer 
 loop no for de 2 em 2, ou 3 em 3. Em outras linguagens que utilizo é 
 possível fazer tal procedimento.

Não. Ou você faz o for com a quantidade de iterações e multiplica para 
pegar o valor atual, ou você usa um while com inc.

Joao Morais


Re: RES: [delphi-br] SQL

2008-08-14 Por tôpico Joao Morais
Luís Antônio wrote:
 Bom eu uso o formatfloat(##,###.##) ... isso resolve o problema dos
 floats

Na verdade isso mascara o problema mas não o resolve. Se você utiliza o 
valor para fazer algum cálculo, você terá um resultado igualmente 
impreciso. Bem melhor usar um inteiro escalado como currency.

Joao Morais


[delphi-br] Re: Usando dbexpress e clientDataset

2008-08-14 Por tôpico Carlos
Boa noite!
Me desculpe, não sou expert, mas apesar do título, você não está
usando o ClientDataSet para efetuar a consulta, e sim, o SqlDataSet e
no ClientDataSet você está apenas exibindo o resultado desta consulta.
Acontece que o SqlDataSet é um componente Unidirecional, não sendo
possível navegar pelos registros, então você deve fazer o seguinte:
SqlDataSet-DataSetProvider-ClientDataSet-DataSource
Na propriedade Options do DataSetProvider deve ser habilitada a opção
AllowCommandText, e a consulta deve ser realizada no ClientDataSet que
é Bidirecional, que no seu caso ficaria mais ou menos assim:

procedure TfrmAgenda.Calendario; 
begin 
 mostraData := FormatDateTime('dd-mm-', MonthCalendar1.Date); 
 mostraRegiao := ComboBox1.Text; 
 cdsConAgenda.Close; 
 cdsConAgenda.CommandText := '';//esta linha é desnessária, mas uso
por hábito
 cdsConAgenda.CommandText := 'SELECT a.hora FROM calendario a INNER
JOIN '+
   'calendario b ON a.controle = b.controle where b.dataagenda = '+
    + FoematDateTime('dd-mm-', MonthCalendar1.Date) + ''' and ' +
   ' b.zonaatuacao = ''' + ComboBox1.Text + ;
 cdsConAgenda.Open; 
end; 

Espero ter ajudado, mas qualquer dúvida, estamos ai!
Fraterno abraço,
Carlos