Re: [delphi-br] Zeos DBO - Qual usar?

2007-06-15 Por tôpico Leandro
Aproveitando o assunto, o Zeos tem algum componente
tipo o IBDataset do IBX, onde vc coloca o SQL pra buscar
os dados, e gera os SQL´s de UPDATE, INSERT, DELETE
automaticamente?

Instalei o 6.6.1 e nao vi nada desse tipo, só que na pagina
do Zeos tem uma screenshot mostrando uma tela dessa que falei...

obrigado,

Leandro
  - Original Message - 
  From: Alessandro DUARTE de Moraes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 14, 2007 2:56 PM
  Subject: Re: [delphi-br] Zeos DBO - Qual usar?


  Eu uso a 6.6.1 Beta e está tudo indo muito bem.

  Alessandro DUARTE de Moraes

  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 14, 2007 12:25 PM
  Subject: [delphi-br] Zeos DBO - Qual usar?

  Ao Eduardo ou a quem mais trabalhe com Zeos e MySQL 5:

  Qual versão do Zeos DBO eu baixo/instalo: a 6.5.0 Alpha ou a 6.5.1 Alpha?

  Ou posso radicalizar e usar a 6.1.5 Stable ou mesmo a 6.6.1 Beta?

  Estou na página para baixar e pintou esta dúvida.

  Estarei instalando no D7, D2005 e D2006.

  Sds,
  Ricardo.

  -
  Novo Yahoo! Cadê? - Experimente uma nova busca. 

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

  -- 
  E-mail Seguro Vetorial.net 

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

  Chave de Identificação: 54568,46715dfa133898686240882 

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



   

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



RES: RES: [Spam] [delphi-br] Ajuda com o dbgrid???

2007-06-15 Por tôpico Valdir
Bom dia amigãovc quer habilitar ou não a edição da célula..é isso?
 
Abs

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alisson Rodrigo O.
Enviada em: quinta-feira, 14 de junho de 2007 21:17
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [Spam] [delphi-br] Ajuda com o dbgrid???



Cara valeu pela atenção.. mas não e bem isso que eu quero...
tenho um checkbox na celular defeito então se for verdadeiro 
ativa e celula desc. defeito se for falso desativa a celula 
desc. defeito e coloca o valor como '' (null)..
Sabe como fazer? valeu

--- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
os.com.br, Valdir Sola [EMAIL PROTECTED] escreveu

 Clique duas vezes sobre o seu ClientDataSet (espero q esteja usando
 ele), p/ exibir o Fields Editor, escolha o campo vá até a propriedade
 onGetText, lá vc digita:
 
 If (condicao)=True then 
 Text:='Texto'
 Else
 Text:='';
 
 
 Abs
 
 Valdir
 
 
 -Mensagem original-
 De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
[mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
os.com.br]
 Em nome de Alisson Rodrigo O.
 Enviada em: quinta-feira, 14 de junho de 2007 20:51
 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
os.com.br
 Assunto: [Spam] [delphi-br] Ajuda com o dbgrid???
 
 Ola pessoal, to com um problema no uso do dbgrid. o querendo fazer o
 seguinte (não sei se tem como) ai vai?
 
 Tenho um dbgrid com as colunas 
 --
 - Codigo - Cartucho - Defeito - Desc. defeito -
 --
 - 01 - HP 27 - N - -
 --
 - 02 - HP 28 - S - Queimado -
 --
 
 quero fazer o seguinte:
 Se o campo defeito for = 'S' abilitar (celula) desc. defeito
 end;
 Se o campo_defeito for = 'N' desabilitar (celular) Desc.defeito
 e colocar o valor do campo Desc. defeito:='';
 
 se alguem souber como fazer ma da uma ajudar por favor, me mande um
 e-mail ( alissonrodrigo@ mailto:alissonrodrigo%40yahoo.com.br
 yahoo.com.br ) de como fazer isso.
 Valeu, obrigado
 
 
 _ 
 
 E-mail classificado pelo Identificador de Spam Inteligente.
 Para alterar a categoria classificada, visite o Terra Mail
 http://mail.
http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,1181865199
terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,1181865199
 .542486.14714.tacamaca.hst.terra.com.br,16815,20031127114101,20031127114
 101 
 
 _ 
 
 Esta mensagem foi verificada pelo E-mail Protegido Terra
 http://mail. http://mail.terra.com.br/ terra.com.br/ .
 Scan engine: McAfee VirusScan / Atualizado em 14/06/2007 / Versão:
 5.1.00/5053
 Proteja o seu e-mail Terra: http://mail. http://mail.terra.com.br/
terra.com.br/ 
 
 
 [As partes desta mensagem que não continham texto foram removidas]




 


  _  

E-mail classificado pelo Identificador de Spam Inteligente.
Para alterar a categoria classificada, visite o Terra
http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,118182.825
633.23543.buruma.hst.terra.com.br,20807,Des15,Des15 Mail 


  _  

Esta mensagem foi verificada pelo E-mail Protegido Terra
http://mail.terra.com.br/ .
Scan engine: McAfee VirusScan / Atualizado em 14/06/2007 / Versão:
5.1.00/5053
Proteja o seu e-mail Terra: http://mail.terra.com.br/ 



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



[delphi-br] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Tiago Zacchi
Olá pessoal!

 

 

Gostaria de seber se tem fazer com que um dos campos da minha 
DBGrid seja um CheckBox, ou algo parecido! Tem como fazer isso ?

 

Obrigado, 


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



[delphi-br] XP MENU

2007-06-15 Por tôpico Leandro
Alguém conhece um componente que coloque o programa com a cara do XP,
tipo o XP Menu? 

Estou querendo outro porque usando o XP Menu, qdo habilito/desabilito botões,
esses tremem um pouco, imagino que seja no momento de desenhá-los. Isso
acaba por dar um aspecto estranho à tela, como se o programa estivesse lento :(

Desde já agradeço,

Leandro


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



Re: [delphi-br] D7 - DBExpress - SQLServer 2005 - Read Commited / e alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

2007-06-15 Por tôpico Márcio Ricardo
Davi, no evento BeforeApplyUpdates do DataSetProvider, você fecha a conexão, 
assim:

TSQLConnection.CloseDataSets.

vê se funciona.

Márcio Ricardo.


  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 14, 2007 2:52 PM
  Subject: RES: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???


  Estou utilizando a estrutura Connection - sqlquery - provider - 
clientedataset- datasource

  Se vc está falando do problema do fetch, tivemos que utilizar ddois dataset's 
1 para consultas e outro para alterações para 

  contornar o problema.

  Mas o problema ainda existe, se eu não der fetchall numa query utilizando sql 
server eu não consigo alterar os dados.
  as vezes gera uma mensagem de erro que não recordo, mas lembro que era em 
português e achei um tanto esquisito.

  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Márcio 
Ricardo
  Enviada em: quarta-feira, 13 de junho de 2007 16:52
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

  Davi, que tipo de componentes de conexão você está utilizando?

  Você poderia passar exatamente a mesangem de erro que está dando? Acho que 
tive algo parecido com isso, e consegui resolver, é fácil.

  Márcio Ricardo.
  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Sent: Friday, June 08, 2007 9:47 AM
  Subject: [delphi-br] D7 - DBExpress - SQLServer 2005 - ReadCommited / e 
alterações com Fetch (não fetchAll) SERÁ QUE TEM SOLUÇÃO???

  Olá senhores,

  Gostaria de saber como os senhores lidaram com esta situação que 
aparentemente só acontece
  no SGBD SQL Server.

  Trabalho no desenvolvimento de um sistema multibanco que utiliza transação 
pessimista. Ou seja, 
  somente quero ler informações commitadas. Todos os dados que não forem 
commitados considero
  dados inconsistentes. 

  No SQL Server (no meu caso 2005) se eu abrir uma transação, alterar, salvar e 
não dar commit ele da lock na tabela em questão.
  Todas as outras consultas ficarão literalmente travadas, até que o commit 
desta transação seja efetuado. Alguém sabe a causa disto?
  É assim mesmo que o SQL Server se comporta nesse caso? Por que os outros 
bancos como o FireBird e o Oracle não se comportam desta
  maneira mesmo utilizando ReadCommited?

  Estudei o hint NOLOCK que transforma aquele select especifico em uma consulta 
Read Uncommited, isto está ok, não gera mais o lock.
  Mas ele me retorna os dados antes de Commitar. O que não é legal. Imagine 
que um dado está sendo inserido por um usuário enquanto

  Outro usuário está tirando um relatório e esta informação está saindo no 
relatório. Daí da um erro, e acontece um Rollback. Eu tenho um
  dado no relatório que não existe na base.
  ReadPast me traz todos os registros que não estão lockados. O que também 
não satisfaz, pois o usuário pode estar editando um registro,
  importante alterando por exemplo a descrição, e estou tirando um relatório 
com valores. Esse registro não vai aparecer no relatório.

  Um colega uma vez disse  Qualquer que for a sua escolha, todas as opções são 
ruins, é isso mesmo ?

  Estas situações me fazem chegar a conclusão de que o Sql Server não é um 
banco de dados compatível com isolation ReadCommited,
  pois se para evitar um lock eu devo usar uma instrução Read Uncommited.

  No SqlServer também, estou com um problema intrigante. Se eu tenho uma query 
com fetch de 30 ou XX registros e tento alterar algum registro,
  após salvar o registro não salva. Somente se eu der um FetchAll, alterar e 
salvar, aí então os dados são salvos.

  Se alguém passou por esses problemas, qualquer sugestão é bem vinda.

  []'s

  Davi Wall.

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

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

  [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] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Márcio Ricardo
Claro que tem!

const
  CtrlState: array[Boolean] of Integer = (DFCS_BUTTONCHECK, DFCS_BUTTONCHECK or 
DFCS_CHECKED);

eventos da Grid.



procedure TfrmExportaXML.DBGrid2DblClick(Sender: TObject);
begin
  if not (DM.ClientDataSet.State in [dsEdit]) then
DM.ClientDataSet.Edit;
  if DBGrid2.SelectedIndex = 8 then
  begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
 DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
  end
  else
  begin
if DBGrid2.SelectedIndex = 9 then
begin
  if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
  else
DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
end
else
begin
  if DBGrid2.SelectedIndex = 10 then
  begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
  end;
end;
  end
end;

procedure TfrmExportaXML.DBGrid2DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if DM.ClientDataSet.RecordCount  0 then
  begin
if (Column.FieldName = 'CAMPO') or
   (Column.FieldName = 'CAMPO') or
   (Column.FieldName = 'CAMPO')then
begin
  Self.DBGrid2.Canvas.FillRect(Rect);
  CheckBoxRectangle.Left := Rect.Left + 2;
  CheckBoxRectangle.Right := Rect.Right - 2;
  CheckBoxRectangle.Top := Rect.Top + 2;
  CheckBoxRectangle.Bottom := Rect.Bottom - 2;

  if (DataCol = 8) then
  begin
if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
else
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
  end
  else
  begin
if (DataCol = 9) then
begin
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
  else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
end
else
begin
  if (DataCol = 10) then
  begin
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[True])
  else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, 
DFC_BUTTON, CtrlState[False]);
  end;
end;
  end;
   end;
  end;
end;

  - Original Message - 
  From: Tiago Zacchi 
  To: Grupo_Delphi-Br 
  Sent: Friday, June 15, 2007 8:01 AM
  Subject: [delphi-br] CheckBox na DBGrid. Tem Como?


  Olá pessoal!

  Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um 
CheckBox, ou algo parecido! Tem como fazer isso ?

  Obrigado, 

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



   

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



Res: [delphi-br] XP MENU

2007-06-15 Por tôpico Luis Lopes
Procure pelo Suiskin... 
 

Luis Alberto P. Lopes
Desenvolvimento de Sistemas
Belo Horizonte - Minas Gerais




- Mensagem original 
De: Leandro [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 15 de Junho de 2007 8:00:33
Assunto: [delphi-br] XP MENU

Alguém conhece um componente que coloque o programa com a cara do XP,
tipo o XP Menu? 

Estou querendo outro porque usando o XP Menu, qdo habilito/desabilito botões,
esses tremem um pouco, imagino que seja no momento de desenhá-los. Isso
acaba por dar um aspecto estranho à tela, como se o programa estivesse lento :(

Desde já agradeço,

Leandro


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 







   

Novo Yahoo! Cadê? - Experimente uma nova busca.
http://yahoo.com.br/oqueeuganhocomisso 

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



Re: [delphi-br] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico fabio giro
delphi.about.com/od/usedbvcl/l/aa082003a.htm
   
  Espero ter ajudado.

Tiago Zacchi [EMAIL PROTECTED] escreveu:
  Olá pessoal!

Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um 
CheckBox, ou algo parecido! Tem como fazer isso ?

Obrigado, 

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



 

   
-
Novo Yahoo! Cadê? - Experimente uma nova busca. 

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



Re: [delphi-br] Criar botão na barra de título

2007-06-15 Por tôpico Leandro
Cara. esse exemplo funcionou só no XP... preciso que funcione no 98/2000/2003 
etc também...
saberia de mais algum exemplo?

Obrigado,

Leandro

  - Original Message - 
  From: Thiago Filiano (America Soft) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 14, 2007 8:54 AM
  Subject: Re: [delphi-br] Criar botão na barra de título


  tem sim, da uma olhada nesse link!

  
http://www.esnips.com/doc/13240d68-c0bd-4714-b9be-0c82782e0b10/Caption-Buttons 

  []'s

  Thiago Filiano
  msn: [EMAIL PROTECTED]
  11-8288-4402

  Leandro escreveu:
   Boa tarde,
  
  
   Alguém tem um exemplo de como criar um botão na barra de título de uma 
janela? Seria um
   botão com uma ? que ao ser clicado mostraria uma ajuda sobre algum item 
da janela, parecido
   com o que acontece em algumas janelas de configuração do Windows.
  
   []',s
  
   Leandro
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
   


   

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



[delphi-br] Tutorial/manual StarTeam? alguem conhece?

2007-06-15 Por tôpico André J . J - YAHOO
Olá pessoal, alguem tem alguma documentação de como usar o STARTEAM da 
Borland??? to quebrando a kbça aqui!

obrigado

André



Att,

André J.J
IT Staff
Informatec Sistemas
  - Original Message - 
  From: Fabiana 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 12, 2007 11:10 AM
  Subject: [delphi-br] XML da Anvisa


  Boa Tarde para todos!!!

  Por acaso alguém esta desenvolvendo algo do SNGPC da anvisa?

  Fabiana

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



   

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



Res: Re: [delphi-br] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Daniel
Lógico    VC pode colocar qualquer coisa no dbgrid da vcl...loockup,
combobox, checkbox, radiobuton, ímagens e até esmo um memo, mas dar um
trabalho..tem que fazer tudo na mão...por linha de codigo...
Uma solução mas PRática e melhor, seria VC usa a cxgrid da devexpress..
excelente componente e VC pode fazer tudo isso que eu falei sem digitar uma
linha de código, somente configurando as propriedades do comonente
 
---Mensagem original---
 
De: Márcio Ricardo
Data: 15/06/2007 09:00:36
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] CheckBox na DBGrid. Tem Como?
 
Claro que tem!

const
CtrlState: array[Boolean] of Integer = (DFCS_BUTTONCHECK, DFCS_BUTTONCHECK
or DFCS_CHECKED);

eventos da Grid.

procedure TfrmExportaXML.DBGrid2DblClick(Sender: TObject);
begin
if not (DM.ClientDataSet.State in [dsEdit]) then
DM.ClientDataSet.Edit;
if DBGrid2.SelectedIndex = 8 then
begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
end
else
begin
if DBGrid2.SelectedIndex = 9 then
begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
end
else
begin
if DBGrid2.SelectedIndex = 10 then
begin
if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then
DM.ClientDataSet.FieldByName('CAMPO').AsString := '1'
else
DM.ClientDataSet.FieldByName('CAMPO').AsString := '0';
end;
end;
end
end;

procedure TfrmExportaXML.DBGrid2DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState)

begin
if DM.ClientDataSet.RecordCount  0 then
begin
if (Column.FieldName = 'CAMPO') or
(Column.FieldName = 'CAMPO') or
(Column.FieldName = 'CAMPO')then
begin
Self.DBGrid2.Canvas.FillRect(Rect);
CheckBoxRectangle.Left := Rect.Left + 2;
CheckBoxRectangle.Right := Rect.Right - 2;
CheckBoxRectangle.Top := Rect.Top + 2;
CheckBoxRectangle.Bottom := Rect.Bottom - 2;

if (DataCol = 8) then
begin
if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[True])
else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[False]);
end
else
begin
if (DataCol = 9) then
begin
if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[True])
else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[False]);
end
else
begin
if (DataCol = 10) then
begin
if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[True])
else
DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[False]);
end;
end;
end;
end;
end;
end;

- Original Message - 
From: Tiago Zacchi 
To: Grupo_Delphi-Br 
Sent: Friday, June 15, 2007 8:01 AM
Subject: [delphi-br] CheckBox na DBGrid. Tem Como?

Olá pessoal!

Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um
CheckBox, ou algo parecido! Tem como fazer isso ?

Obrigado, 

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

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


 

__ Información de NOD32, revisión 2329 (20070614) __

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com

 

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



Res: [delphi-br] XP MENU

2007-06-15 Por tôpico Daniel
 Existe o XP manifest da própria vlc do Delphi 7 / 2005/ 2006, existe tbm o
SUIPACK que tem o SUISkin, mas não deixa com a cara do xp, ele coloca vários
skins que VC escolhe, existe tbm o vcl skin e o mais novo ja com skin di win
vista.

Agora se estver usando o Delhi 2007, vá em project options, tem um check box
la que se VC marcar , quando compilar ele ja fica com a cara do xp
 
---Mensagem original---
 
De: Leandro
Data: 15/06/2007 08:59:17
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] XP MENU
 
Alguém conhece um componente que coloque o programa com a cara do XP,
tipo o XP Menu? 

Estou querendo outro porque usando o XP Menu, qdo habilito/desabilito botões

esses tremem um pouco, imagino que seja no momento de desenhá-los. Isso
acaba por dar um aspecto estranho à tela, como se o programa estivesse lento
:(

Desde já agradeço,

Leandro

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


 

__ Información de NOD32, revisión 2329 (20070614) __

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com

 

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



Re: [delphi-br] Importação de Dados

2007-06-15 Por tôpico Eduardo Silva dos Santos
Olá Ricado César, estou à disposição para qualquer *dúvida, pq mySQL não da
problema.*
hehheh, até mais.


Em 14/06/07, Ricardo César Cardoso [EMAIL PROTECTED] escreveu:

   Obrigado mesmo, Eduardo!

 Agora já sei quem eu vou atormentar com problemas no MySQL. ;)

 Sds,
 Ricardo.

 Eduardo Silva dos Santos [EMAIL PROTECTED] eduardo.drd%40gmail.com
 escreveu: Olá *Ricardo, *
 * *
 Recomendo você usar o MySQL 5.0, use somente tabelas InnoDB, elas te dão
 uma baita segurança e suporte a transação/integridade referencial e mais
 um
 monte de coisa.

 Para componentes de acesso FREE, recomento o Zeos 6.5 mesmo.
 Para componentes pagos recomento o MyDac 5, www.crlab.com

 eu trabalho com MySQL ha bastante tempo e tenho uma grande experiência com
 o
 mesmo, qualquer coisa estou à disposição.

 Em 12/06/07, Ricardo César Cardoso [EMAIL 
 PROTECTED]ricardo_engsoft%40yahoo.com.br
 escreveu:
 
  Só tenho algumas dúvidas Eduardo.
 
  Vou trabalhar com o mySQL 5 e gostaria de saber se existe algum driver
  (free é claro) pra acessá-lo pelo Delphi. E como componentes de acesso,
  posso usar diretamente o ZEOS 6.5 ou vc recomenda algum outro? Existe
  alguma recomendação ao criar as tabelas ou a base de dados como usar ou
 não
  usar MyISAM e usar ou não usar InnoDB?
 
  Grato,
  Ricardo.
 
  Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com
 eduardo.drd%40gmail.com
  escreveu: hehehe, por isso que gosto do MySQL, um simples *Show Tables*;
  resolve
  esse problema.
 
  Em 04/06/07, Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com
 jericssonsup%40gmail.com
  escreveu:
  
   Problema resolvido, mas caso alguém queira a instrução para carregar
   tabelas
   e campos do SQL Server que eu montei segue abaixo:
  
   with ADOQuery1 do
   begin
   Close;
   Sql.Clear;
   Sql.Add('SELECT so.name as [Nome_Tabela] FROM SysObjects so WITH
   (NOLOCK)');
   Sql.Add('Where so.type = ''u'' and so.name like ''TB%'' order by
 so.name
   ');
   //Somente Tabelas
   Open;
   DBCmbTabelas.Items.Clear;
   while not eof do
   begin
   DBCmbTabelas.Items.Add(ADOQuery1.FieldbyName('Nome_Tabela').Value);
   ADOQuery1.Next;
   end;
   end;
  
   Instrução para extração da Tabela informada no ComboBox
  
   Screen.Cursor := crSqlWait;
   with ADOQueryTabelas do
   begin
   Close;
   Sql.Clear;
   Sql.Add('SELECT so.name as [Nome_Tabela], sc.name as [Nome_Columa],
   st.name as [Tipo_Dado], sc.length as [Precisao]');
   Sql.Add('FROM SysObjects so WITH (NOLOCK)');
   Sql.Add('INNER JOIN SysColumns sc on so.id = sc.id');
   Sql.Add('INNER JOIN SysTypes st on st.xtype = sc.xtype');
   Sql.Add('where so.type = ''u'' and so.name = :prTabela');
   Sql.Add('order by sc.colorder');
   Parameters.ParamByName('prTabela').Value := TRIM(DBCmbTabelas.Text);
   Open;
   vSqlInstrucao := '';
   vSqlInstrucao := 'SELECT ';
   vSqlOrdenado := ADOQueryTabelas.FieldbyName('Nome_Columa').Value;
   while not eof do
   begin
   vSqlInstrucao := vSqlInstrucao +
   ADOQueryTabelas.FieldbyName('Nome_Columa').Value
   + ', ';
   Next;
   end;
   vSqlInstrucao := Copy(vSqlInstrucao,1,Length(vSqlInstrucao)-2);
   vSqlInstrucao := vSqlInstrucao +' FROM '+ ADOQueryTabelas.FieldbyName
   ('Nome_Tabela').Value;
   vSqlInstrucao := vSqlInstrucao +' ORDER BY '+ vSqlOrdenado;
   end;
   edtInstrucao.Clear;
   edtInstrucao.Text := vSqlInstrucao;
   btnInstrucaoMEC.Onclick(Sender);
   Screen.Cursor := crDefault;
  
   I love you GOOGLE.
  
   Em 04/06/07, Ricardo César Cardoso [EMAIL 
   PROTECTED]ricardo_engsoft%40yahoo.com.br
 ricardo_engsoft%40yahoo.com.br
  ricardo_engsoft%40yahoo.com.br
   escreveu:
   
Olha amigo, com relação ao Oracle apareceu alguma coisa sobre este
assunto na semana passada. Dá uma olhada nas mensagens antigas do
  grupo
   que
tem alguma coisa.
   
Quanto ao SQL Server, me lembro que já vi isso, mas não tenho mais o
link... nesse caso vai ter que buscar mesmo pelo Google.
   
Sds,
Ricardo.
   
Jorge Ericsson [EMAIL PROTECTED] 
jericssonsup%40gmail.comjericssonsup%
 40gmail.comjericssonsup%
  40gmail.comjericssonsup%
   40gmail.com
escreveu: Olá amigos delphianos,
   
   
Estou desenvolvendo uma ferramenta de migração de dados SQL-SERVER X
ORACLE
e gostaria de saber como faço para pegar parâmetros como nome da
  tabela,
todos os seus campos e tipos de campos.
   
Obs: Com o nome da tabela eu necessito montar uma instrução SELECT
capturar
os dados e inserir em uma TQuery os mesmos dados.
   
Desculpe se não fui muito claro.
   
Grato,
   
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericssonsup.com.br
61 9667-4785 / 3966-4535
Brasília- DF
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   
_
   
-
Novo Yahoo! Cadê? - Experimente uma nova busca.
   
[As partes desta mensagem que não continham texto 

Re: [delphi-br] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Tiago Zacchi
Ok.. Ajudou sim ... Obrigado !


  - Original Message - 
  From: fabio giro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 8:35 AM
  Subject: Re: [delphi-br] CheckBox na DBGrid. Tem Como?


  delphi.about.com/od/usedbvcl/l/aa082003a.htm

  Espero ter ajudado.

  Tiago Zacchi [EMAIL PROTECTED] escreveu:
  Olá pessoal!

  Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um 
CheckBox, ou algo parecido! Tem como fazer isso ?

  Obrigado, 

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

  -
  Novo Yahoo! Cadê? - Experimente uma nova busca. 

  [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] Criar botão na barra de t ítulo

2007-06-15 Por tôpico Ricardo César Cardoso
Bom dia Leandro!

Acho que o melhor que vc tem a fazer é baixar a JediVCL e usar o componente 
TJvCaptionButton (paleta TJvButtons) que faz exatamente o que vc precisa. Na 
edição 81 da revista Clube Delphi saiu uma matéria explicando o funciona este e 
outros componentes. 

Montei um exemplo de como usar o TJvCaptionButton e TJvTrayIcon e estou 
colocando no meu site.

http://www.esnips.com/doc/495f7cf6-823f-4f1e-91cf-fdb5d90b5aff/JvDesktopAlert_JvTrayIcon_JvCaptionButton_Demo

Sds,
Ricardo.

Leandro [EMAIL PROTECTED] escreveu:  Cara. 
esse exemplo funcionou só no XP... preciso que funcione no 98/2000/2003 etc 
também...
 saberia de mais algum exemplo?
 
 Obrigado,
 
 Leandro
 
 - Original Message - 
   From: Thiago Filiano (America Soft) 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Thursday, June 14, 2007 8:54 AM
   Subject: Re: [delphi-br] Criar botão na barra de título
 
 tem sim, da uma olhada nesse link!
 
 http://www.esnips.com/doc/13240d68-c0bd-4714-b9be-0c82782e0b10/Caption-Buttons 
 
 []'s
 
 Thiago Filiano
   msn: [EMAIL PROTECTED]
   11-8288-4402
 
 Leandro escreveu:
Boa tarde,
   
   
Alguém tem um exemplo de como criar um botão na barra de título de uma 
janela? Seria um
botão com uma ? que ao ser clicado mostraria uma ajuda sobre algum item 
da janela, parecido
com o que acontece em algumas janelas de configuração do Windows.
   
[]',s
   
Leandro
   
   
[As partes desta mensagem que não continham texto foram removidas]
   
   
   

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



   
-
Novo Yahoo! Cadê? - Experimente uma nova busca. 

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



[delphi-br] SQLConnection

2007-06-15 Por tôpico Adenes I. Freire Junior
Estou desenvolvendo uma agenda usando o Firebird no Delphi 7, na máquina
está rodando bem, copie para outra máquina:

- Aplicativo
- gds32.DLL
- dbxconnections.ini

Quando executo o aplicativo na outra máquina acontece o seguinte erro: 
SQLConnectionPrincipal: DLL/Shared library name not set

Como faço para resolver esse problema?
  --



---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 000749-0, 14/06/2007
Tested on: 15/6/2007 10:21:38
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com





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



[delphi-br] Informações sobre atualizações

2007-06-15 Por tôpico Jorge Ericsson
Bom dia amigos,

Gostaria de disponibilizar para os meus usuários informações sobre
atualizações do meu sistema logo que o mesmo acesse o sistema.
Bom eu tenho um endereço FTP onde armazeno o meu executável e um arquivo txt
com informações sobre as atualizações e gostaria que meus usuários ao
acessar o sistema fossem informados dessas novas atualizações onde o mesmo
tomaria a decisão da atualização ou não.
Alguém já fez isso ou pode me indica o caminho das pedras ?

[]´s


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


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



[delphi-br] Ajuda com Atualizador de Executaveis

2007-06-15 Por tôpico Raphae Fonseca
Bom dia a todos da lista
a alguns dias a traz alguns amigos me deram algumas dicas de como montar um 
atualizador de versão do sistema pela rede.
tentei implementar e não consegui. Algum amigo tem um código fonte que esteja 
funcionando e pode me passar???
Fico no aguardo
Raphael


   

Novo Yahoo! Cadê? - Experimente uma nova busca.
http://yahoo.com.br/oqueeuganhocomisso 

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



Re: [delphi-br] Ajuda com Atualizador de Executaveis

2007-06-15 Por tôpico Andrei Luís
Raphae,

O que eu mandei está funcionando aqui.

Procure no google por delphi atualizador executável que vai aparecer
vários outros exemplos.

[]
Andrei

Em 15/06/07, Raphae Fonseca[EMAIL PROTECTED] escreveu:
 Bom dia a todos da lista
 a alguns dias a traz alguns amigos me deram algumas dicas de como montar um 
 atualizador de versão do sistema pela rede.
 tentei implementar e não consegui. Algum amigo tem um código fonte que esteja 
 funcionando e pode me passar???
 Fico no aguardo
 Raphael


[delphi-br] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico Jorge Ericsson
Olá amigos,

Tenho uma aplicação que utiliza o mysql e alguns usuários não podem deixar o
serviço ativo.
Qdo a aplicação é executada e não encontra o serviço ativo dá um monte de
erro na abertura do bco de dados.
Gostaria de saber se alguém tem um exemplo para iniciar o serviço do mysql
automáticamente caso o mesmo se encontre desativado.

[]´s


-- 
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericssonsup.com.br
61 9667-4785 / 3966-4535
Brasília- DF


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



Re: Re: [delphi-br] CheckBox na DBGrid. Tem Como?

2007-06-15 Por tôpico Tiago Zacchi
Olá,

Estive dando uma olhada neste componente que vc indicou, achei bem 
interessante. Gostaria de saber se existe uma versão free, pois pelo que vi não 
é um componente gratuito!

Obrigado !

  - Original Message - 
  From: Daniel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 9:49 AM
  Subject: Res: Re: [delphi-br] CheckBox na DBGrid. Tem Como?


  Lógico  VC pode colocar qualquer coisa no dbgrid da vcl...loockup,
  combobox, checkbox, radiobuton, ímagens e até esmo um memo, mas dar um
  trabalho..tem que fazer tudo na mão...por linha de codigo... 
  Uma solução mas PRática e melhor, seria VC usa a cxgrid da devexpress..
  excelente componente e VC pode fazer tudo isso que eu falei sem digitar uma
  linha de código, somente configurando as propriedades do comonente 

  ---Mensagem original--- 

  De: Márcio Ricardo 
  Data: 15/06/2007 09:00:36 
  Para: delphi-br@yahoogrupos.com.br 
  Assunto: Re: [delphi-br] CheckBox na DBGrid. Tem Como? 

  Claro que tem! 

  const 
  CtrlState: array[Boolean] of Integer = (DFCS_BUTTONCHECK, DFCS_BUTTONCHECK
  or DFCS_CHECKED); 

  eventos da Grid. 

  procedure TfrmExportaXML.DBGrid2DblClick(Sender: TObject); 
  begin 
  if not (DM.ClientDataSet.State in [dsEdit]) then 
  DM.ClientDataSet.Edit; 
  if DBGrid2.SelectedIndex = 8 then 
  begin 
  if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1' 
  else 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '0'; 
  end 
  else 
  begin 
  if DBGrid2.SelectedIndex = 9 then 
  begin 
  if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1' 
  else 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '0'; 
  end 
  else 
  begin 
  if DBGrid2.SelectedIndex = 10 then 
  begin 
  if DM.ClientDataSet.FieldByName('CAMPO').AsString = '0' then 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '1' 
  else 
  DM.ClientDataSet.FieldByName('CAMPO').AsString := '0'; 
  end; 
  end; 
  end 
  end; 

  procedure TfrmExportaXML.DBGrid2DrawColumnCell(Sender: TObject; 
  const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState)

  begin 
  if DM.ClientDataSet.RecordCount  0 then 
  begin 
  if (Column.FieldName = 'CAMPO') or 
  (Column.FieldName = 'CAMPO') or 
  (Column.FieldName = 'CAMPO')then 
  begin 
  Self.DBGrid2.Canvas.FillRect(Rect); 
  CheckBoxRectangle.Left := Rect.Left + 2; 
  CheckBoxRectangle.Right := Rect.Right - 2; 
  CheckBoxRectangle.Top := Rect.Top + 2; 
  CheckBoxRectangle.Bottom := Rect.Bottom - 2; 

  if (DataCol = 8) then 
  begin 
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[True]) 
  else 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[False]); 
  end 
  else 
  begin 
  if (DataCol = 9) then 
  begin 
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[True]) 
  else 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[False]); 
  end 
  else 
  begin 
  if (DataCol = 10) then 
  begin 
  if (DM.ClientDataSet.FieldByName('CAMPO').AsString = '1') then 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[True]) 
  else 
  DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
  CtrlState[False]); 
  end; 
  end; 
  end; 
  end; 
  end; 
  end; 

  - Original Message - 
  From: Tiago Zacchi 
  To: Grupo_Delphi-Br 
  Sent: Friday, June 15, 2007 8:01 AM 
  Subject: [delphi-br] CheckBox na DBGrid. Tem Como? 

  Olá pessoal! 

  Gostaria de seber se tem fazer com que um dos campos da minha DBGrid seja um
  CheckBox, ou algo parecido! Tem como fazer isso ? 

  Obrigado, 

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

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




  __ Información de NOD32, revisión 2329 (20070614) __ 

  Este mensaje ha sido analizado con NOD32 antivirus system 
  http://www.nod32.com 



  [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] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico desenvolvimento
vai depender do obj de banco de dados q vc usa...
se for o zeos, por exemplo, ao mandar conectar o zconnection, vc pode fazer:


try
  zconnection.connect;
except
{ se não conectar, vai vir pra cá!!!  daí, vc roda o serviço dependendo da 
versão do mysql. Se for por exemplo, a 3.23, vc pode rodar o mysqld-opt.exe, 
que automaticamente identifica qual melhor servidor pra rodar, de acordo com o 
sistema operacional. vc pode usar o comando winexec ou shellexecute. aqui, vc 
pode fazer o teste de rodar através do winexec:}
if fileexists('c:\mysql\bin\mysqld-opt.exe') then
begin
winexec('c:\mysql\bin\mysqld-opt.exe',sw_show);
leep(1);// espera 10 segundos...
end
else
begin
   showmessage('servidor não ativo e não encontrado em 
C:\MYSQL\BIN\MYSQLD-OPT.EXE, fechando aplicação');
 HALT;
end;

  try
// vamos tentar denovo!!!
 zconnection.connect;
  except
   showmessage('Não foi possível encontrar o servidor, fechando aplicação');
   halt;
  end;
end;
  - Original Message - 
  From: Jorge Ericsson 
  Sent: Friday, June 15, 2007 11:39 AM
  Subject: [delphi-br] Iniciar o MySQL automaticamente


  Olá amigos,

  Tenho uma aplicação que utiliza o mysql e alguns usuários não podem deixar o
  serviço ativo.
  Qdo a aplicação é executada e não encontra o serviço ativo dá um monte de
  erro na abertura do bco de dados.
  Gostaria de saber se alguém tem um exemplo para iniciar o serviço do mysql
  automáticamente caso o mesmo se encontre desativado.

  []´s

  -- 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericssonsup.com.br
  61 9667-4785 / 3966-4535
  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] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico desenvolvimento
atenção: não é leep... é Sleep.. rsrsheheheh

é a falta de tempo e ler o q escrevi... hehehehehhe
foi mal.

boa sorte.
  - Original Message - 
  From: desenvolvimento 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 1:18 PM
  Subject: Re: [delphi-br] Iniciar o MySQL automaticamente


  vai depender do obj de banco de dados q vc usa...
  se for o zeos, por exemplo, ao mandar conectar o zconnection, vc pode fazer:

  try
  zconnection.connect;
  except
  { se não conectar, vai vir pra cá!!! daí, vc roda o serviço dependendo da 
versão do mysql. Se for por exemplo, a 3.23, vc pode rodar o mysqld-opt.exe, 
que automaticamente identifica qual melhor servidor pra rodar, de acordo com o 
sistema operacional. vc pode usar o comando winexec ou shellexecute. aqui, vc 
pode fazer o teste de rodar através do winexec:}
  if fileexists('c:\mysql\bin\mysqld-opt.exe') then
  begin
  winexec('c:\mysql\bin\mysqld-opt.exe',sw_show);
  leep(1);// espera 10 segundos...
  end
  else
  begin
  showmessage('servidor não ativo e não encontrado em 
C:\MYSQL\BIN\MYSQLD-OPT.EXE, fechando aplicação');
  HALT;
  end;

  try
  // vamos tentar denovo!!!
  zconnection.connect;
  except
  showmessage('Não foi possível encontrar o servidor, fechando aplicação');
  halt;
  end;
  end;
  - Original Message - 
  From: Jorge Ericsson 
  Sent: Friday, June 15, 2007 11:39 AM
  Subject: [delphi-br] Iniciar o MySQL automaticamente

  Olá amigos,

  Tenho uma aplicação que utiliza o mysql e alguns usuários não podem deixar o
  serviço ativo.
  Qdo a aplicação é executada e não encontra o serviço ativo dá um monte de
  erro na abertura do bco de dados.
  Gostaria de saber se alguém tem um exemplo para iniciar o serviço do mysql
  automáticamente caso o mesmo se encontre desativado.

  []´s

  -- 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericssonsup.com.br
  61 9667-4785 / 3966-4535
  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]



   

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



[delphi-br] caminho da lixeira no vista

2007-06-15 Por tôpico support
alguem ai usando VISTA podia me confirmar se o caminho da lixeira eh
C:\$Recycle.Bin 

muito obrigado pela ajuda
.

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



[delphi-br] QReport + erro *.jpeg

2007-06-15 Por tôpico chmereha
 Boa Tarde estou querendo add uma image de banco e no componente 
QRDBImage está dando erro de Bitmap is not valid ,
Alguem pode me ajudar , Já add Jpeg na uses e num funcionou!!

Obrigado,





[delphi-br] Gravador Wave em Delphi

2007-06-15 Por tôpico Marcelo Carvalho
Pessoal,

Estou com projeto para criação de um aplicativo que grava em formato wav e
depois converta em formato ogg.
Até ai nada de estranho, mas o que preciso saber é 
Após iniciado uma gravação, quando for dado o comando WaveOut1.Pause, como
eu posso fazer para que quando
for continuar a gravação eu consiga retornar XX segundos ???
Estou usando os componentes da AUDIO COMPONENTS SUITE 2.2.


-- 
Marcelo Carvalho
MSN  [EMAIL PROTECTED]
ICQ 239-997-482


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



[delphi-br] DSPack

2007-06-15 Por tôpico blcksun954
 Alguém sabe me dizer como usar o DSPack pra fazer captura de vídeo 
com uma webcam? E por favor, não me dêem o link praquele tutorial em 
francês, nem digam pra olhar as demos que vem com ele, eu não 
consegui entender nenhum dos dois.



RES: [delphi-br] Exception do Projeto, Como Tratar ?

2007-06-15 Por tôpico Rogerio Rodrigues , Informatica , Jundiaí


-Mensagem original-
De: Fabiano Catrinck [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 12 de agosto de 2004 16:55
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Exception do Projeto, Como Tratar ?


use o bloco try-except, procure no help do delphi

Um abraço,
Fabiano Catrinck - Programador
Softguild Informática Ltda
www.softguild.com.br
Tel.: (21)2643-2132
Celular : (21)9449-6286
ICQ :178241485
msn: [EMAIL PROTECTED]
- Original Message - 
From: CPD (Borborema-Imperial Transportes Ltda) [EMAIL PROTECTED]
To: Grupo do Delphi delphi-br@yahoogrupos.com.br
Sent: Thursday, August 12, 2004 12:53 PM
Subject: [delphi-br] Exception do Projeto, Como Tratar ?


Pessoal,

Existe alguma forma deu tratar todos os exception que ocorrer no meu
projeto ?

Alexandre C Souza

[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







__ Informação do NOD32 1.840 (20040811) __

Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br





-- 
 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

 


[delphi-br] Fwd: Menu Vertical - TreeView

2007-06-15 Por tôpico tiosambuilder
--- Em delphi-br@yahoogrupos.com.br, tiosambuilder [EMAIL PROTECTED] 
escreveu

Olá Pessoal, 

Estou tentanto fazer um menu vertical utilizando o TreeView. Gostaria 
de saber como posso identificar um nó pelo número e não pelo texto 
(TreeView.Selected.Text). 
Caso alguém tenha uma opção mais prática para desenvolver um menu 
vertical neste estilo, eu agradeço a ajuda. 

Cícero

Fim da mensagem encaminhada ---




Re: [delphi-br] QReport + erro *.jpeg

2007-06-15 Por tôpico omar l m rosa
coloca jpeg cláusula uses da interface unit;

unit xxx
interface;

uses xx...xxx..., jpeg;

bai!
omar

  - Original Message - 
  From: chmereha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 6:02 PM
  Subject: [delphi-br] QReport + erro *.jpeg


  Boa Tarde estou querendo add uma image de banco e no componente 
  QRDBImage está dando erro de Bitmap is not valid ,
  Alguem pode me ajudar , Já add Jpeg na uses e num funcionou!!

  Obrigado,



   

  __ Informação do NOD32 IMON 2334 (20070615) __

  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] Como dar ping em um Site?

2007-06-15 Por tôpico Gabriel Herdt
Amigos bruxos do delphi,
Vocês por acaso sabem como dar um ping em um site e pegar o retorno, 
com finalidade de saber se o site esta online?

Utilizo Delhi 2005



RES: [Spam] [delphi-br] DSPack

2007-06-15 Por tôpico Valdir
Só serve este? Eu uso um componente da JEDI Library que além de ser muito
bom e fácil de usar tem também os exemplos.
 
Abs
 
Valdir

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de blcksun954
Enviada em: sexta-feira, 15 de junho de 2007 15:49
Para: delphi-br@yahoogrupos.com.br
Assunto: [Spam] [delphi-br] DSPack



Alguém sabe me dizer como usar o DSPack pra fazer captura de vídeo 
com uma webcam? E por favor, não me dêem o link praquele tutorial em 
francês, nem digam pra olhar as demos que vem com ele, eu não 
consegui entender nenhum dos dois.



 


  _  

E-mail classificado pelo Identificador de Spam Inteligente.
Para alterar a categoria classificada, visite o Terra
http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,1181933370.432
665.15273.tacamaca.hst.terra.com.br,14955,20031127114101,20031127114101
Mail 


  _  

Esta mensagem foi verificada pelo E-mail Protegido Terra
http://mail.terra.com.br/ .
Scan engine: McAfee VirusScan / Atualizado em 15/06/2007 / Versão:
5.1.00/5054
Proteja o seu e-mail Terra: http://mail.terra.com.br/ 



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



[delphi-br] Re: Como dar ping em um Site?

2007-06-15 Por tôpico crassh_over
--- Em delphi-br@yahoogrupos.com.br, Gabriel Herdt 
[EMAIL PROTECTED] escreveu

 Amigos bruxos do delphi,
 Vocês por acaso sabem como dar um ping em um site e pegar o retorno, 
 com finalidade de saber se o site esta online?
 
 Utilizo Delhi 2005


eu utilizaria o componente da barra Indy IdIcmpClient, essa é do 
Delphi 7, não sei se tem no Delphi 2005 mas provavelmente tem como 
instalar, procure pelo Pacote Indy 7

ae é só digitar IdIcmpClient.host:= edit.text; 
IdIcmpClient.ping;
sendo q edit.text vc pode colocar o ip ou o endereço..senaum me engano 
da...ae vc tem q pesquisar sobre o retorno do ping pois naum me lembro 
bem...



Re: [delphi-br] Proteger pasta com senha

2007-06-15 Por tôpico Elizeu JM Chiogna
Claro você quer saber como se faz isso via programa delphi né? Assim não tenho 
dica mas senão é só clicar com o botão direito na pasta e enviar para pasta 
compactada depois ir em arquivo e adicionar senha tá pronto. Claro isso vale 
pra RuWindos XP em diante se não me engano.

-Mensagem Original- 
De: nillgolv 
Para: delphi-br 
Enviada em: quinta-feira, 14 de junho de 2007 22:27
Assunto: [delphi-br] Proteger pasta com senha


Pessoal, alguem já teve a oportunidade de conhecer este procedimento e poderia 
compartilhar aqui no forum.

Preciso de implementar algo deste tipo.
Grato

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



 

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



[delphi-br] Stored Procedure e DbGrid - Ta Quase

2007-06-15 Por tôpico crassh_over
Olá...eu fiz a Stored Procedure e deu certo...porém eu fiz com q o 
select nela gerasse os dados num DBGrid...até ae tudo bem...ele fez 
isso...mas qdo eu teclo seta pra baixo na barra de rolagem da DBGrid, 
ela naum mexe de registro...naum consigo descer a barra, e fika muito 
lento..alguém sabe me dizer o que pode ser?!



Re: [delphi-br] Stored Procedure e DbGrid - Ta Quase

2007-06-15 Por tôpico Luiz Escobar

Qual o banco ? qual o componente para conectar ?

Se for MySQL e vc estiver usando o MyDAC ele tem um aplicativo chamado MONITOR 
para ver o que o componente esta pedindo/fazendo com o MySQL, agora outro, ai 
já num sei...

boa sorte...

Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLER/MySQL/xBase
SERVIDORES - IntraNetWare4.11, LINUX-RedHat9, Windows


  - Original Message - 
  From: crassh_over 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 5:04 PM
  Subject: [delphi-br] Stored Procedure e DbGrid - Ta Quase


  Olá...eu fiz a Stored Procedure e deu certo...porém eu fiz com q o 
  select nela gerasse os dados num DBGrid...até ae tudo bem...ele fez 
  isso...mas qdo eu teclo seta pra baixo na barra de rolagem da DBGrid, 
  ela naum mexe de registro...naum consigo descer a barra, e fika muito 
  lento..alguém sabe me dizer o que pode ser?!



   

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



[delphi-br] Erro ao executar aplicação pelo BDS 2006

2007-06-15 Por tôpico Claudiney-listas
Boa tarde a todos...

 

Após a atualização para o Windows Vista, que vem com IIS 7, depois de
configurar o BDS pra executar como administrador, quando dou F9 para
executar uma aplicação asp.net, ele me retorna a seguinte mensagem de erro:

 

The project cannot be debugged because virtual directory “WebApplication1”
is not configured with ASP.NET version 1.1. Use aspnet_regiis.exe to
configure the local IIS web server.

 

Antes de iniciar como administrador ele dizia que o IIS não estava
configurado, provavelmente por uma questão de direitos para executar. Agora
me retorna esta mensagem. Já tentei o aspnet_regiis.exe e nada. Já
configurei manualmente a aplicação no iis com o pool do asp.net 1.1 e nada.
Pelo IE direto a aplicação executa normalmente.

 

Alguém teve este problema e conseguiu descobrir o que falta?

 

Abraços e obrigado.

 

_

Claudiney Cogo

N2 Sistemas e Soluções em Informática

Av. São Paulo, 172 - 15º Andar - Sala 1505

Maringá - Paraná

www.n2solutions.com.br

 



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



Re: [delphi-br] Gravador Wave em Delphi

2007-06-15 Por tôpico Luiz Escobar
Só uma curiosidade...
PQ OGG e não MP3 ???

Se vc esta GRAVANDO em WAV os segundos sempre terão um tamanho FIXO
EX: 22Khz stereo 16Bit´s = 22000 * 2 * ( 16 / 8 ) = 88000 bytes por segundo...

www.google.com.br;-)

Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLER/MySQL/xBase
SERVIDORES - IntraNetWare4.11, LINUX-RedHat9, Windows



  - Original Message - 
  From: Marcelo Carvalho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 3:36 PM
  Subject: [delphi-br] Gravador Wave em Delphi


  Pessoal,

  Estou com projeto para criação de um aplicativo que grava em formato wav e
  depois converta em formato ogg.
  Até ai nada de estranho, mas o que preciso saber é 
  Após iniciado uma gravação, quando for dado o comando WaveOut1.Pause, como
  eu posso fazer para que quando
  for continuar a gravação eu consiga retornar XX segundos ???
  Estou usando os componentes da AUDIO COMPONENTS SUITE 2.2.

  -- 
  Marcelo Carvalho
  MSN [EMAIL PROTECTED]
  ICQ 239-997-482

  [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] Erro ao executar aplicação pelo BDS 2006

2007-06-15 Por tôpico Daniel augusto braga
Claudiney c tem que registar o .net no IIS ou entaum setar a versão do .net
que está usando no IIS

Em 15/06/07, Claudiney-listas [EMAIL PROTECTED]
escreveu:

   Boa tarde a todos...

 Após a atualização para o Windows Vista, que vem com IIS 7, depois de
 configurar o BDS pra executar como administrador, quando dou F9 para
 executar uma aplicação asp.net, ele me retorna a seguinte mensagem de
 erro:

 The project cannot be debugged because virtual directory WebApplication1
 is not configured with ASP.NET http://asp.net/ version 1.1. Use
 aspnet_regiis.exe to
 configure the local IIS web server.

 Antes de iniciar como administrador ele dizia que o IIS não estava
 configurado, provavelmente por uma questão de direitos para executar.
 Agora
 me retorna esta mensagem. Já tentei o aspnet_regiis.exe e nada. Já
 configurei manualmente a aplicação no iis com o pool do asp.net 1.1 e
 nada.
 Pelo IE direto a aplicação executa normalmente.

 Alguém teve este problema e conseguiu descobrir o que falta?

 Abraços e obrigado.

 _

 Claudiney Cogo

 N2 Sistemas e Soluções em Informática

 Av. São Paulo, 172 - 15º Andar - Sala 1505

 Maringá - Paraná

 www.n2solutions.com.br

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

 




-- 
Daniel Augusto Braga
Cel: (19) 9128-7589


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



RES: [delphi-br] Menu Vertical - TreeView

2007-06-15 Por tôpico Davi Eduardo Borges Wall
Você poderia utilizar a propriedade DATA que guarda um integer eu acho..

 

Eu lembro que utilizei essa propriedade para guardar ponteiros para objetos...

 



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de 
tiosambuilder
Enviada em: quinta-feira, 14 de junho de 2007 10:39
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Menu Vertical - TreeView

 

Olá Pessoal, 

Estou tentanto fazer um menu vertical utilizando o TreeView. Gostaria 
de saber como posso identificar um nó pelo número e não pelo texto 
(TreeView.Selected.Text). 
Caso alguém tenha uma opção mais prática para desenvolver um menu 
vertical neste estilo, eu agradeço a ajuda. 

Cícero 



 



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



Re: [delphi-br] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico Eduardo Silva dos Santos
pq vc não coloca o mySQL para rodar como serviço? vai ficar bem melhor.

qual a versão do Windows onde o MySQL ta instalado?


Em 15/06/07, Jorge Ericsson [EMAIL PROTECTED] escreveu:

   Achei interesaante a sua sujestão, mas por enquanto por falta de tempo
 tbém,
 não converti para o Zeus, tó usando infelizmente ADO.
 Vou testar e qq coisa eu te informo caso funcione...

 Valew pela diga

 Em 15/06/07, desenvolvimento [EMAIL 
 PROTECTED]desenvolvimento%40sisponto.com.br
 escreveu:
 
  atenção: não é leep... é Sleep.. rsrsheheheh
 
  é a falta de tempo e ler o q escrevi... hehehehehhe
  foi mal.
 
  boa sorte.
 
  - Original Message -
  From: desenvolvimento
  To: delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%40yahoog
 rupos.com.br
  Sent: Friday, June 15, 2007 1:18 PM
  Subject: Re: [delphi-br] Iniciar o MySQL automaticamente
 
  vai depender do obj de banco de dados q vc usa...
  se for o zeos, por exemplo, ao mandar conectar o zconnection, vc pode
  fazer:
 
  try
  zconnection.connect;
  except
  { se não conectar, vai vir pra cá!!! daí, vc roda o serviço dependendo
 da
  versão do mysql. Se for por exemplo, a 3.23, vc pode rodar o
  mysqld-opt.exe, que automaticamente identifica qual melhor servidor pra
  rodar, de acordo com o sistema operacional. vc pode usar o comando
 winexec
  ou shellexecute. aqui, vc pode fazer o teste de rodar através do
 winexec:}
  if fileexists('c:\mysql\bin\mysqld-opt.exe') then
  begin
  winexec('c:\mysql\bin\mysqld-opt.exe',sw_show);
  leep(1);// espera 10 segundos...
  end
  else
  begin
  showmessage('servidor não ativo e não encontrado em C:\MYSQL\BIN\MYSQLD-
  OPT.EXE, fechando aplicação');
  HALT;
  end;
 
  try
  // vamos tentar denovo!!!
  zconnection.connect;
  except
  showmessage('Não foi possível encontrar o servidor, fechando
 aplicação');
  halt;
  end;
  end;
  - Original Message -
  From: Jorge Ericsson
  Sent: Friday, June 15, 2007 11:39 AM
  Subject: [delphi-br] Iniciar o MySQL automaticamente
 
  Olá amigos,
 
  Tenho uma aplicação que utiliza o mysql e alguns usuários não podem
 deixar
  o
  serviço ativo.
  Qdo a aplicação é executada e não encontra o serviço ativo dá um monte
 de
  erro na abertura do bco de dados.
  Gostaria de saber se alguém tem um exemplo para iniciar o serviço do
 mysql
  automáticamente caso o mesmo se encontre desativado.
 
  []´s
 
  --
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericssonsup.com.br
  61 9667-4785 / 3966-4535
  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]
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericssonsup.com.br
 61 9667-4785 / 3966-4535
 Brasília- DF

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

  




-- 
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/


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



Re: [delphi-br] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico Jorge Ericsson
O Windows é 2000 (Servidor)
Eu utilizo driver odbc como conexão ao servidor.
Mas as vezes eu necessito para o serviço no servidor e algum usuário esta
preso na aplicação.
É um saco, por isso gostaria de iniciar e parar o serviço qdo estiversse
efetuando tbém uma manutenção.



Em 15/06/07, Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu:

   pq vc não coloca o mySQL para rodar como serviço? vai ficar bem melhor.

 qual a versão do Windows onde o MySQL ta instalado?

 Em 15/06/07, Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com
 escreveu:
 
  Achei interesaante a sua sujestão, mas por enquanto por falta de tempo
  tbém,
  não converti para o Zeus, tó usando infelizmente ADO.
  Vou testar e qq coisa eu te informo caso funcione...
 
  Valew pela diga
 
  Em 15/06/07, desenvolvimento [EMAIL 
  PROTECTED]desenvolvimento%40sisponto.com.br
 desenvolvimento%40sisponto.com.br
  escreveu:
  
   atenção: não é leep... é Sleep.. rsrsheheheh
  
   é a falta de tempo e ler o q escrevi... hehehehehhe
   foi mal.
  
   boa sorte.
  
   - Original Message -
   From: desenvolvimento
   To: delphi-br@yahoogrupos.com.br 
   delphi-br%40yahoogrupos.com.brdelphi-br%40yahoog
 rupos.com.brdelphi-br%40yahoog
  rupos.com.br
   Sent: Friday, June 15, 2007 1:18 PM
   Subject: Re: [delphi-br] Iniciar o MySQL automaticamente
  
   vai depender do obj de banco de dados q vc usa...
   se for o zeos, por exemplo, ao mandar conectar o zconnection, vc pode
   fazer:
  
   try
   zconnection.connect;
   except
   { se não conectar, vai vir pra cá!!! daí, vc roda o serviço dependendo
  da
   versão do mysql. Se for por exemplo, a 3.23, vc pode rodar o
   mysqld-opt.exe, que automaticamente identifica qual melhor servidor
 pra
   rodar, de acordo com o sistema operacional. vc pode usar o comando
  winexec
   ou shellexecute. aqui, vc pode fazer o teste de rodar através do
  winexec:}
   if fileexists('c:\mysql\bin\mysqld-opt.exe') then
   begin
   winexec('c:\mysql\bin\mysqld-opt.exe',sw_show);
   leep(1);// espera 10 segundos...
   end
   else
   begin
   showmessage('servidor não ativo e não encontrado em
 C:\MYSQL\BIN\MYSQLD-
   OPT.EXE, fechando aplicação');
   HALT;
   end;
  
   try
   // vamos tentar denovo!!!
   zconnection.connect;
   except
   showmessage('Não foi possível encontrar o servidor, fechando
  aplicação');
   halt;
   end;
   end;
   - Original Message -
   From: Jorge Ericsson
   Sent: Friday, June 15, 2007 11:39 AM
   Subject: [delphi-br] Iniciar o MySQL automaticamente
  
   Olá amigos,
  
   Tenho uma aplicação que utiliza o mysql e alguns usuários não podem
  deixar
   o
   serviço ativo.
   Qdo a aplicação é executada e não encontra o serviço ativo dá um monte
  de
   erro na abertura do bco de dados.
   Gostaria de saber se alguém tem um exemplo para iniciar o serviço do
  mysql
   automáticamente caso o mesmo se encontre desativado.
  
   []´s
  
   --
   Jorge Ericsson S. Pinheiro
   Analista/Projetista de Sistemas
   Ericsson Sistemas e Soluções
   http://www.jericssonsup.com.br
   61 9667-4785 / 3966-4535
   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]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
  --
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericssonsup.com.br
  61 9667-4785 / 3966-4535
  Brasília- DF
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 Eduardo Silva dos Santos
 DRD Sistemas.
 (27) 3218-4201
 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com
 Site: http://www.drdsistemas.com/

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

  




-- 
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericssonsup.com.br
61 9667-4785 / 3966-4535
Brasília- DF


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



Re: RES: [Spam] [delphi-br] DSPack

2007-06-15 Por tôpico blcksun954
 Já conheço ele. O problema é que preciso poder capturar um screen 
shot da câmera quando o usuário clicar em um botão, e não achei como 
fazer isso com o componente da JEDI. O DSPack eu sei que faz isso, 
mas não sei nem o básico dele, ainda estou tentando entender os 
exemplos, mas tá dificil.



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

 Só serve este? Eu uso um componente da JEDI Library que além de ser 
muito
 bom e fácil de usar tem também os exemplos.
  
 Abs
  
 Valdir
 




Re: [delphi-br] Iniciar o MySQL automaticamente

2007-06-15 Por tôpico Plinio Cesar Pavin
Desculpe, a dica que te enviei antes num tinha nada a ver... rs

Mas vão duas legais aqui (não testei) se funcionar nos avise:

Windows Services - Checking Status
http://www.chami.com/tips/delphi/031498D.html

Windows Services - Starting and Stopping
http://www.chami.com/tips/delphi/031598D.html

Espero que sejam úteis

Plinio Cesar Pavin
Consultoria em TI
Campinas/SP

  - Original Message - 
  From: Jorge Ericsson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, June 15, 2007 3:40 PM
  Subject: Re: [delphi-br] Iniciar o MySQL automaticamente


  Achei interesaante a sua sujestão, mas por enquanto por falta de tempo tbém,
  não converti para o Zeus, tó usando infelizmente ADO.
  Vou testar e qq coisa eu te informo caso funcione...

  Valew pela diga

  Em 15/06/07, desenvolvimento [EMAIL PROTECTED] escreveu:
  
   atenção: não é leep... é Sleep.. rsrsheheheh
  
   é a falta de tempo e ler o q escrevi... hehehehehhe
   foi mal.
  
   boa sorte.
  
   - Original Message -
   From: desenvolvimento
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Sent: Friday, June 15, 2007 1:18 PM
   Subject: Re: [delphi-br] Iniciar o MySQL automaticamente
  
   vai depender do obj de banco de dados q vc usa...
   se for o zeos, por exemplo, ao mandar conectar o zconnection, vc pode
   fazer:
  
   try
   zconnection.connect;
   except
   { se não conectar, vai vir pra cá!!! daí, vc roda o serviço dependendo da
   versão do mysql. Se for por exemplo, a 3.23, vc pode rodar o
   mysqld-opt.exe, que automaticamente identifica qual melhor servidor pra
   rodar, de acordo com o sistema operacional. vc pode usar o comando winexec
   ou shellexecute. aqui, vc pode fazer o teste de rodar através do winexec:}
   if fileexists('c:\mysql\bin\mysqld-opt.exe') then
   begin
   winexec('c:\mysql\bin\mysqld-opt.exe',sw_show);
   leep(1);// espera 10 segundos...
   end
   else
   begin
   showmessage('servidor não ativo e não encontrado em C:\MYSQL\BIN\MYSQLD-
   OPT.EXE, fechando aplicação');
   HALT;
   end;
  
   try
   // vamos tentar denovo!!!
   zconnection.connect;
   except
   showmessage('Não foi possível encontrar o servidor, fechando aplicação');
   halt;
   end;
   end;
   - Original Message -
   From: Jorge Ericsson
   Sent: Friday, June 15, 2007 11:39 AM
   Subject: [delphi-br] Iniciar o MySQL automaticamente
  
   Olá amigos,
  
   Tenho uma aplicação que utiliza o mysql e alguns usuários não podem deixar
   o
   serviço ativo.
   Qdo a aplicação é executada e não encontra o serviço ativo dá um monte de
   erro na abertura do bco de dados.
   Gostaria de saber se alguém tem um exemplo para iniciar o serviço do mysql
   automáticamente caso o mesmo se encontre desativado.
  
   []´s
  
   --
   Jorge Ericsson S. Pinheiro
   Analista/Projetista de Sistemas
   Ericsson Sistemas e Soluções
   http://www.jericssonsup.com.br
   61 9667-4785 / 3966-4535
   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]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericssonsup.com.br
  61 9667-4785 / 3966-4535
  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: RES: RES: [Spam] [delphi-br] Ajuda com o dbgrid???

2007-06-15 Por tôpico Alisson Rodrigo O.
No meu caso agora e boa noite, para você tambem
Cara problema resolvido a sua dia ajudou muito... em vez de abilitar a
celula do dbgrid coloquei o como como somente leitura (se o valor for
true)

Valeu um abraço



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

 Bom dia amigãovc quer habilitar ou não a edição da célula..é isso?
  
 Abs
 
   _  
 
 De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
 nome de Alisson Rodrigo O.
 Enviada em: quinta-feira, 14 de junho de 2007 21:17
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: RES: [Spam] [delphi-br] Ajuda com o dbgrid???
 
 
 
 Cara valeu pela atenção.. mas não e bem isso que eu quero...
 tenho um checkbox na celular defeito então se for verdadeiro 
 ativa e celula desc. defeito se for falso desativa a celula 
 desc. defeito e coloca o valor como '' (null)..
 Sabe como fazer? valeu
 
 --- Em [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
 os.com.br, Valdir Sola fastbyte@ escreveu
 
  Clique duas vezes sobre o seu ClientDataSet (espero q esteja usando
  ele), p/ exibir o Fields Editor, escolha o campo vá até a propriedade
  onGetText, lá vc digita:
  
  If (condicao)=True then 
  Text:='Texto'
  Else
  Text:='';
  
  
  Abs
  
  Valdir
  
  
  -Mensagem original-
  De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
os.com.br
 [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
 os.com.br]
  Em nome de Alisson Rodrigo O.
  Enviada em: quinta-feira, 14 de junho de 2007 20:51
  Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
 os.com.br
  Assunto: [Spam] [delphi-br] Ajuda com o dbgrid???
  
  Ola pessoal, to com um problema no uso do dbgrid. o querendo fazer o
  seguinte (não sei se tem como) ai vai?
  
  Tenho um dbgrid com as colunas 
  --
  - Codigo - Cartucho - Defeito - Desc. defeito -
  --
  - 01 - HP 27 - N - -
  --
  - 02 - HP 28 - S - Queimado -
  --
  
  quero fazer o seguinte:
  Se o campo defeito for = 'S' abilitar (celula) desc. defeito
  end;
  Se o campo_defeito for = 'N' desabilitar (celular) Desc.defeito
  e colocar o valor do campo Desc. defeito:='';
  
  se alguem souber como fazer ma da uma ajudar por favor, me mande um
  e-mail ( alissonrodrigo@ mailto:alissonrodrigo%40yahoo.com.br
  yahoo.com.br ) de como fazer isso.
  Valeu, obrigado
  
  
  _ 
  
  E-mail classificado pelo Identificador de Spam Inteligente.
  Para alterar a categoria classificada, visite o Terra Mail
  http://mail.

http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,1181865199
 terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,1181865199
 
.542486.14714.tacamaca.hst.terra.com.br,16815,20031127114101,20031127114
  101 
  
  _ 
  
  Esta mensagem foi verificada pelo E-mail Protegido Terra
  http://mail. http://mail.terra.com.br/ terra.com.br/ .
  Scan engine: McAfee VirusScan / Atualizado em 14/06/2007 / Versão:
  5.1.00/5053
  Proteja o seu e-mail Terra: http://mail. http://mail.terra.com.br/
 terra.com.br/ 
  
  
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
  
 
 
   _  
 
 E-mail classificado pelo Identificador de Spam Inteligente.
 Para alterar a categoria classificada, visite o Terra

http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=fastbyte_l=1,118182.825
 633.23543.buruma.hst.terra.com.br,20807,Des15,Des15 Mail 
 
 
   _  
 
 Esta mensagem foi verificada pelo E-mail Protegido Terra
 http://mail.terra.com.br/ .
 Scan engine: McAfee VirusScan / Atualizado em 14/06/2007 / Versão:
 5.1.00/5053
 Proteja o seu e-mail Terra: http://mail.terra.com.br/ 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Delphi 2007. Como saber se é Pro ou Ent ?

2007-06-15 Por tôpico Fellipe Henrique
Olá amigos, baixei o Delphi 2007 Trial... mas até o momento continuo com o
problema de não ter o DataSnap... como faço para saber se o Delphi 2007 é
Enterprise ou Professional?

[]s

-- 
_
Fellipe Henrique
[EMAIL PROTECTED]
Você valoriza a existêcia das pessoas extraordinárias e momentos em que a
história avança graças a elas. Tudo o que se imagina pode ser alcançado.
Deve-se ousar sonhar. Mas não há substituto para perseverança e trabalho...
e trabalho em equipe. Por que ninguém consegue sozinho. Se comemoramos a
grandeza desses eventos e as pessoas que os realizam... não podemos esquecer
o sacrifício daqueles que tornam possíveis tais realizações.


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



Re: [delphi-br] Delphi 2007. Como saber se é Pro ou Ent ?

2007-06-15 Por tôpico Eduardo Silva dos Santos
Baixa novamente, dai ele ja vai ta com o Update1 e todo certinho pra vc
testar.

o trial é enterprise.


Em 15/06/07, Fellipe Henrique [EMAIL PROTECTED] escreveu:

   Olá amigos, baixei o Delphi 2007 Trial... mas até o momento continuo com
 o
 problema de não ter o DataSnap... como faço para saber se o Delphi 2007 é
 Enterprise ou Professional?

 []s

 --
 _
 Fellipe Henrique
 [EMAIL PROTECTED] fellipeh%40gmail.com
 Você valoriza a existêcia das pessoas extraordinárias e momentos em que a
 história avança graças a elas. Tudo o que se imagina pode ser alcançado.
 Deve-se ousar sonhar. Mas não há substituto para perseverança e
 trabalho...
 e trabalho em equipe. Por que ninguém consegue sozinho. Se comemoramos a
 grandeza desses eventos e as pessoas que os realizam... não podemos
 esquecer
 o sacrifício daqueles que tornam possíveis tais realizações.

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

 




-- 
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/


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