Re: RES: [delphi-br] Firebird no Vista

2009-05-20 Por tôpico Wanderlei - Yahoo
Boa tarde Vinicius

Tenta desabilitar a segurança de usuário do Vista.
E caso ainda não funcione (se precisar urgente) , instala uma máquina 
virtual Windows XP usando o Virtual Box (http://www.virtualbox.org/)


Valeu


Re: [delphi-br] Cópia do banco MySQL

2009-03-24 Por tôpico Wanderlei - Yahoo
Olá amigo.

Usa o MySQL Dump pra fazer a cópia do SCRIPT SQL
Executar isso no prompt de comando:
mysqldump.exe --host=ip --user=usuario --password=senha --databases 
nome_bd  backup.sql

Valeu Wanderlei



[delphi-br] Ajuda em Tray Icon

2008-08-05 Por tôpico Wanderlei - Yahoo
Bom Dia Pessoal

Sei que a lista é de delphi, mas como não tem muito material sobre C++ 
Builder, o negócio é tentar converter de Delphi par C++.

Seguinte, utilizo o C++ Builder 2007, e estou precisando implantar no 
meu sistema o MinimizeToTray.
No C++Builder 6, apenas colocava o componente no Projeto e quando 
minimizava o programa, ele já sumia da barra de tarefas e ficava apenas 
no Tray.

Mas no C++ Builder 2007, quando minimizo, ele ainda permanece na barra 
de tarefas.

Se alguem utiliza uma versão mais recente do Delphi, sabe se apenas 
colocando o componente TrayIcon e minimizando o programa,
ele vai para o Tray e sai da barra de tarefas ???

Se alguem puder dar uma dica, ajuda ou sabe como fazer em Delphi, agradeço.

Wanderlei


Re: [delphi-br] Ajuda em Tray Icon

2008-08-05 Por tôpico Wanderlei - Yahoo
Tem um componente Chamado TApplicationsEvents da paleta Additional.
Ele possuí os eventos OnMinimize e OnRestore

Então no evento OnMinimize mudo o visible do Form:false - (funciona)

No evento DoubleClick do TrayIcon coloquei
Form1--BringToFront(); //trazer o Form para frente
Form1--Visible = true //torna o formulário visivel de novo

O problema que quando restauro, o form não aparece aberto, e sim 
minimizado na barra de tarefas.
Dai de vez em quando quando fico minimizando pro tray e restaurando,  
às vezes o evento OnMinimize,
não atende mais, dai tenho que maximizar e restaurar p/ para voltar a 
funcionar.

Alguem sabe porque ??

Att. Wanderlei

Alison Zen escreveu:

 Ao minimizar, vc tentou colocar o projeto como visible := false, tipo,
 o formulário ficando invisível.

 2008/8/5 Wanderlei - Yahoo [EMAIL PROTECTED] 
 mailto:wandihuttel%40yahoo.com.br:
  Bom Dia Pessoal
 
  Sei que a lista é de delphi, mas como não tem muito material sobre C++
  Builder, o negócio é tentar converter de Delphi par C++.
 
  Seguinte, utilizo o C++ Builder 2007, e estou precisando implantar no
  meu sistema o MinimizeToTray.
  No C++Builder 6, apenas colocava o componente no Projeto e quando
  minimizava o programa, ele já sumia da barra de tarefas e ficava apenas
  no Tray.
 
  Mas no C++ Builder 2007, quando minimizo, ele ainda permanece na barra
  de tarefas.
 
  Se alguem utiliza uma versão mais recente do Delphi, sabe se apenas
  colocando o componente TrayIcon e minimizando o programa,
  ele vai para o Tray e sai da barra de tarefas ???
 
  Se alguem puder dar uma dica, ajuda ou sabe como fazer em Delphi, 
 agradeço.
 
  Wanderlei
 
 

 -- 
 Atenciosamente
 Alison Zen



[delphi-br] Ajuda em Form Login

2008-07-29 Por tôpico Wanderlei - Yahoo
Boa Tarde Pessoal

Gostaria que alguem me desse um Help, de como fazer um form de Login .
(já procurei em vários sites, mas nenhum me agradou).

Modelo 1
Queria fazer um modelo que abra o form de login apenas e depois chame 
o form menu, por exemplo.
Tinha feito um exemplo desse tipo, se validar usuário e senha o programa 
escondia o form login e mostrava
o form menu, o problema que quando você minimiza o programa ele não 
ficava na barra de tarefas, e sim minimizado acima do botão iniciar.


Modelo 2
Ou fazer um que abra o form menu (principal) com o o form login em 
showmodal. Se validar usuário e login libera
para trabalhar no form principal.

Estou pedindo porque não manjo muito de Delphi, e como deve ter muita 
gente que manja bem e
esse tipo de coisa é simples para quem entende bem, creio que poderia me 
ajudar.

Se alguem poder me dar uma solução agradecerei muito


Muito Obrigado Wanderlei



[delphi-br] Dúvida Formulário de Login

2008-04-15 Por tôpico Wanderlei - Yahoo
Bom Dia

Seguinte pessoal, estou precisando de uma ajuda pra fazer um formulário 
de Login.
Tenho um sisteminha que eu fiz que ele abre 1º o frmLogin e dai o 
usuário e senha estando OK,
gravo umas variáves globais com as infomações do Login e mando abrir o 
frmPrincipal e esconder o FrmLogin.

O problema é que o FrmPrincipal não minimiza para a bandeja do Windows, 
fica ali em cima do botão iniciar, quando eu minimizo.
Como não sou muito expert em Delphi, queria saber mais detalhado como 
posso fazer uma coisa mais profissional.

Obrigado pela atenção
Wanderlei Hüttel



Re: [delphi-br] Backup no Delphi

2008-04-04 Por tôpico Wanderlei - Yahoo
Boa Tarde amigo, eu utilizo algo parecido no meu Sistema de Caixa (em 
C++ Builder, mas é bem parecido com o Delphi).

O que eu fiz, foi copiar o mysqldump.exe do mysql para o diretório onde 
está o executável do programa,
e também o pkzip.exe, para compactar o dump do MySQL.


/**/
//Declaração de variáveis
String parametros, programa, host, porta, usuario, senha, base, destino, 
zip;

// Deleta os arquivos de backup caso existam
DeleteFile(caixa.sql);
DeleteFile(backup.zip);


programa = mysqldump.exe --complete-insert;
host =  --host= + frmLogin-pubMySQLServidor;
porta=  --port= + frmLogin-pubMySQLPorta;
usuario  =  --user= + frmLogin-pubMySQLUsuario;
senha=  --password= + frmLogin-pubMySQLSenha;
base =  --database +frmLogin-pubMySQLBD;
destino  =  --result-file=caixa.sql;
parametros = programa+host+porta+usuario+senha+base+destino;

//Executa o dump
WinExec(parametros.c_str(), SW_HIDE);


// dar um tempo de uns 5 segundos, porque senão não compactava
//foi a alternativa que eu achei POG hehehh
Sleep(5000);

zip = pkzip.exe backup.zip caixa.sql;

WinExec(zip.c_str(), SW_HIDE);
ShowMessage(Backup Efetuado com Sucesso!);


/**/


[delphi-br] Ajuda com Formulários

2008-02-11 Por tôpico Wanderlei - Yahoo
Boa Tarde Pessoal

Seguinte, trabalho com C++ Builder e como muitas soluções são bem 
parecidas como o Delphi, venho pedir ajuda para vocês.
Possuo um Form de Login (frmLogin), que é  chamado quando o programa 
inicia;
Se o usuário informar os dados corretamente, então é chamado o Form 
Principal com os menus (frmPrincipal).

No Evento OnShow do frmPrincipal, mando esconder o frmLogin - 
frmLogin-Hide();
Até ai tudo bem.

O problema que estou encontrando é ao minimizar o frmPrincipal, pois 
quando minimizo este form, é como se tivesse
aberto um form em ShowModal e minimizado, o programa não fica na barra 
onde ficam os programas abertos, ele fica minimizado acima do botão 
iniciar;

Imagem 1 (frmLogin)
http://www.alipioejubileu.com/img001.JPG

Imagem 2 (frmPrincipal)
http://www.alipioejubileu.com/img002.JPG

Imagem 3 (Quando minimiza o programa pelo botão minimizar)
http://www.alipioejubileu.com/img003.JPG

Imagem 3 (Quando minimiza o programa pel barra)
http://www.alipioejubileu.com/img004.JPG

Se alguem puder dar uma ajuda, agradeço.
Obrigado Wanderlei Hüttel


Re: [delphi-br] Ajuda com Formulários

2008-02-11 Por tôpico Wanderlei - Yahoo
Desculpe João, mas não recebi a resposta anterior.
O meu frmLogin é o MainForm realmente.

Mas nesse caso, o que devo fazer, para ficar bem certo ???

Obrigado Wanderlei


Wanderlei - Yahoo wrote:
  O problema que estou encontrando é ao minimizar o frmPrincipal, pois
  quando minimizo este form, é como se tivesse
  aberto um form em ShowModal e minimizado, o programa não fica na barra
  onde ficam os programas abertos, ele fica minimizado acima do botão
  iniciar;

Repetindo o que falei na sua postagem anterior: será que o frmLogin não
está declarado como sendo o seu MainForm? Veja em Project | Options.

--
Joao Morais


Re: [delphi-br] Pesquisa por aproximação

2008-02-07 Por tôpico Wanderlei - Yahoo
Coloca a pesquisa no Evento OnChange do Edit.

Valeu


[delphi-br] Dúvida com Forms

2008-02-06 Por tôpico Wanderlei - Yahoo
Boa Tarde Pessoal

Seguinte, trabalho com C++ Builder e como muitas soluções são bem 
parecidas como o Delphi, venho pedir ajuda para vocês.
Possuo um Form de Login (frmLogin), que é  chamado quando o programa 
inicia;
Se o usuário informar os dados corretamente, então é chamado o Form 
Principal com os menus (frmPrincipal).

No Evento OnShow do frmPrincipal, mando esconder o frmLogin - 
frmLogin-Hide();
Até ai tudo bem.

O problema que estou encontrando é ao minimizar o frmPrincipal, pois 
quando minimizo este form, é como se tivesse
aberto um form em ShowModal e minimizado, o programa não fica na barra 
onde ficam os programas abertos, ele fica minimizado acima do botão iniciar;

Imagem 1 (frmLogin)
http://www.alipioejubileu.com/img001.JPG

Imagem 2 (frmPrincipal)
http://www.alipioejubileu.com/img002.JPG

Imagem 3 (Quando minimiza o programa pelo botão minimizar)
http://www.alipioejubileu.com/img003.JPG

Imagem 3 (Quando minimiza o programa pel barra)
http://www.alipioejubileu.com/img004.JPG

Se alguem puder dar uma ajuda, agradeço.
Obrigado Wanderlei Hüttel


Re: [delphi-br] Case When no Delphi

2008-01-24 Por tôpico Wanderlei - Yahoo
Tenho um exemplo que uso no meu sistema (É C++ Builder, mas é igual no 
Delphi, basta trocar os - por . ):
Estou usando Banco de Dados MySQL.

adoqryFrmLancamento-SQL-Clear();
sql  = SELECT ;
/* Caso o Tipo de Lançamento for = 'D' então pega o próprio valor, SENÂO 
multiplca o Valor por -1) */
sql += SUM(CASE WHEN TipoLancamento = 'D' THEN ValorLancamento ELSE 
ValorLancamento*-1  END) as ValorSaldo ;
sql += FROM tbllancamento ;
sql += WHERE EXTRACT(MONTH FROM DataLancamento) = '12' AND EXTRACT(YEAR 
FROM DataLancamento) = '12' ;
sql += AND CodigoCliente = '18' ;
adoqryFrmLancamento-SQL-Add(sql);
adoqryFrmLancamento-Open();



Valeu
Wanderlei


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



[delphi-br] Dúvida em Casas Decimais

2008-01-24 Por tôpico Wanderlei - Yahoo
Boa tarde pessoal

Preciso de uma função para limitar casas decimais em um Edit.
Achei uma função onde digito por exemplo o valor: 123456,
e o sistema coloca a vírgula automaticamente, ficando 1234,56.

Mas vi um programa da prefeitura da minha cidade, onde só é
possível digitar 2 casas após a vírgula.

Alguém tem algum exemplo??

Se alguém tiver agradeço.


Muito Obrigado
Wanderlei