Re: [delphi-br] Botões redondos... codigo fontebotão de bitmap´s...

[Luiz Escobar]

cara essa foi duro heheheh
roda o scroll ai do mouse que vc vai ver o código, não mandei anexo, mandei no corpo do email...

Luiz Escobar




- Segue mensagem original! -

De: Francisco Thiago 
Data: Thu, 01 Jun 2006 00:52:18 -0300
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Botões redondos... codigo fontebotão de bitmap´s...

Como assim? Tá no final do e-mail!

Thiago

iTelefonica wrote:
 Obrigado Luiz
 Mas o codigo não veio pois é proibido via Lista. Mas valeu assim mesmo. 
 Obrigado
 Clovito


 Que a Paz do Grande Arquiteto do Universo nos Ampare
 [EMAIL PROTECTED]
 Msn- [EMAIL PROTECTED]
 Dourado SP



 - Original Message - 
 From: Luiz Escobar 
 To: 
 Sent: Wednesday, May 31, 2006 9:01 PM
 Subject: RES: [delphi-br] Botões redondos... codigo fontebotão de 
 bitmap´s...


 
 bom sei que vc quer um botão redondo, e isso parece dificil.. bom aqui tem 
 um exemplo de um botão
 feito atravez de um bitmap, qualquer bitmap vira um botão...
 ele cria o efeito de Lighter, quando passa o mouse encima, Darker, quando 
 clica, acertei esta parte, comia um pedaçinho da imagem quando era justa, 
 Disabled, (essa eu implementei, ehehhehe), quando vc disabilita o botão...
 talvez ajude...

 como não sabia o endereço postei o código
 se alguem gostar e implementar algo novo, posta ai

 Luiz Escobar



 //==
 //jvBitmapButton.pas
 // versão 2.1c modify by Luiz Escobar
 //---
 unit jvBitmapButton;

 interface

 uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

 type
 TjvBitmapButton = class(TGraphicControl)
 private
 FBitmap: TBitmap;
 FLighter: TBitmap;
 FDarker: Tbitmap;
 FDisabled: Tbitmap; // by Luiz Escobar
 FPushDown:boolean;
 FMouseOver:boolean;
 FLatching: boolean;
 FDown: boolean;
 FHotTrack: boolean;
 Fenable: boolean; // by Luiz Escobar
 procedure SetBitmap(const Value: TBitmap);
 procedure MakeDarker;
 procedure MakeLighter;
 procedure MakeDisabled; // by Luiz Escobar
 procedure SetLatching(const Value: boolean);
 procedure SetDown(const Value: boolean);
 procedure SetHotTrack(const Value: boolean);
 function GetEnabled : Boolean; // by Luiz Escobar
 procedure SetEnabled( const Value: boolean); // by Luiz Escobar
 { Private declarations }
 protected
 { Protected declarations }
 procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: 
 Integer);override;
 procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: 
 Integer);override;
 procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
 procedure Click;override;
 procedure CMMouseLeave(var Message:TMessage); message CM_MouseLeave;
 procedure Loaded;override;
 procedure Resize;override;
 public
 { Public declarations }
 constructor Create(AOwner:TComponent);override;
 destructor Destroy;override;
 procedure Paint; override;
 published
 { Published declarations }
 property Bitmap:TBitmap read FBitmap write SetBitmap;
 property Down:boolean read FDown write SetDown;
 property Latching:boolean read FLatching write SetLatching;
 property HotTrack:boolean read FHotTrack write SetHotTrack;
 property Enable:boolean read GetEnabled write SetEnabled; // by Luiz 
 Escobar
 property onclick;
 property onmousedown;
 property onmouseup;
 end;

 procedure Register;

 implementation

 procedure Register;
 begin
 RegisterComponents('ESC_UTIL', [TjvBitmapButton]);
 end;

 { TjvBitmapButton }

 function TjvBitmapButton.GetEnabled: boolean; // by Luiz Escobar
 begin
 result := enabled;
 end;

 procedure TjvBitmapButton.SetEnabled( const Value : boolean ); // by Luiz 
 Escobar
 begin
 enabled := value;
 fenable := enabled;
 Paint;
 end ;

 procedure TjvBitmapButton.Click;
 begin
 inherited;
 if FPushDown then
 if assigned(onclick) then
 onclick(self);
 end;

 constructor TjvBitmapButton.Create(AOwner: TComponent);
 begin
 inherited;
 width:=24;
 height:=24;
 FPushDown:=false;
 FMouseOver:=false;
 FLatching:=false;
 FHotTrack:=true;
 FDown:=false;
 FBitmap:=TBitmap.create;
 Fbitmap.width:=24;
 Fbitmap.Height:=24;
 Fbitmap.canvas.brush.color:=clgray;
 FBitmap.canvas.FillRect (rect(1,1,23,23));
 FLighter:=Tbitmap.create;
 FDarker:=Tbitmap.create;
 FDisabled:=Tbitmap.create; // by Luiz Escobar
 Fenable := enabled; // by Luiz Escobar
 end;

 destructor TjvBitmapButton.Destroy;
 begin
 FBitmap.free;
 FLighter.free;
 FDarker.free;
 FDisabled.free; // by Luiz Escobar
 inherited;
 end;

 procedure TjvBitmapButton.MouseDown(Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
 begin
 inherited;
 if FBitmap.canvas.pixels[x,y]Fbitmap.canvas.pixels[0,FBitmap.height-1] 
 then
 FPushDown:=true
 else
 FPushDown:=false;
 Paint;
 if assigned(onmousedown) then
 onmousedown(self,button,shift,x,y);
 end;

 procedure TjvBitmapButton.MouseUp(Button: TMouseButton; Shift: 
 TShiftState;
 X, Y: Integer);
 

Re: [delphi-br] Botões redondos... codigofontebotã o de bitmap´s...

[iTelefonica]

Desculpe-me pela falta de atençaõ


Que a Paz do Grande Arquiteto do Universo nos Ampare
[EMAIL PROTECTED]
Msn- [EMAIL PROTECTED]
Dourado SP



- Original Message - 
From: Luiz Escobar [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 01, 2006 4:46 AM
Subject: Re: [delphi-br] Botões redondos... codigofontebotão de bitmap´s...



 cara essa foi duro heheheh
 roda o scroll ai do mouse que vc vai ver o código, não mandei anexo, 
 mandei no corpo do email...

 Luiz Escobar




 - Segue mensagem original! -

 De: Francisco Thiago
 Data: Thu, 01 Jun 2006 00:52:18 -0300
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Botões redondos... codigo fontebotão de 
 bitmap´s...

 Como assim? Tá no final do e-mail!

 Thiago

 iTelefonica wrote:
 Obrigado Luiz
 Mas o codigo não veio pois é proibido via Lista. Mas valeu assim mesmo.
 Obrigado
 Clovito


 Que a Paz do Grande Arquiteto do Universo nos Ampare
 [EMAIL PROTECTED]
 Msn- [EMAIL PROTECTED]
 Dourado 
 SP



 - Original Message - 
 From: Luiz Escobar
 To:
 Sent: Wednesday, May 31, 2006 9:01 PM
 Subject: RES: [delphi-br] Botões redondos... codigo fontebotão de
 bitmap´s...



 bom sei que vc quer um botão redondo, e isso parece dificil.. bom aqui 
 tem
 um exemplo de um botão
 feito atravez de um bitmap, qualquer bitmap vira um botão...
 ele cria o efeito de Lighter, quando passa o mouse encima, Darker, 
 quando
 clica, acertei esta parte, comia um pedaçinho da imagem quando era 
 justa,
 Disabled, (essa eu implementei, ehehhehe), quando vc disabilita o 
 botão...
 talvez ajude...

 como não sabia o endereço postei o código
 se alguem gostar e implementar algo novo, posta ai

 Luiz Escobar



 //==
 //jvBitmapButton.pas
 // versão 2.1c modify by Luiz Escobar
 //---
 unit jvBitmapButton;

 interface

 uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, 
 Dialogs;

 type
 TjvBitmapButton = class(TGraphicControl)
 private
 FBitmap: TBitmap;
 FLighter: TBitmap;
 FDarker: Tbitmap;
 FDisabled: Tbitmap; // by Luiz Escobar
 FPushDown:boolean;
 FMouseOver:boolean;
 FLatching: boolean;
 FDown: boolean;
 FHotTrack: boolean;
 Fenable: boolean; // by Luiz Escobar
 procedure SetBitmap(const Value: TBitmap);
 procedure MakeDarker;
 procedure MakeLighter;
 procedure MakeDisabled; // by Luiz Escobar
 procedure SetLatching(const Value: boolean);
 procedure SetDown(const Value: boolean);
 procedure SetHotTrack(const Value: boolean);
 function GetEnabled : Boolean; // by Luiz Escobar
 procedure SetEnabled( const Value: boolean); // by Luiz Escobar
 { Private declarations }
 protected
 { Protected declarations }
 procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y:
 Integer);override;
 procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y:
 Integer);override;
 procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
 procedure Click;override;
 procedure CMMouseLeave(var Message:TMessage); message CM_MouseLeave;
 procedure Loaded;override;
 procedure Resize;override;
 public
 { Public declarations }
 constructor Create(AOwner:TComponent);override;
 destructor Destroy;override;
 procedure Paint; override;
 published
 { Published declarations }
 property Bitmap:TBitmap read FBitmap write SetBitmap;
 property Down:boolean read FDown write SetDown;
 property Latching:boolean read FLatching write SetLatching;
 property HotTrack:boolean read FHotTrack write SetHotTrack;
 property Enable:boolean read GetEnabled write SetEnabled; // by Luiz
 Escobar
 property onclick;
 property onmousedown;
 property onmouseup;
 end;

 procedure Register;

 implementation

 procedure Register;
 begin
 RegisterComponents('ESC_UTIL', [TjvBitmapButton]);
 end;

 { TjvBitmapButton }

 function TjvBitmapButton.GetEnabled: boolean; // by Luiz Escobar
 begin
 result := enabled;
 end;

 procedure TjvBitmapButton.SetEnabled( const Value : boolean ); // by 
 Luiz
 Escobar
 begin
 enabled := value;
 fenable := enabled;
 Paint;
 end ;

 procedure TjvBitmapButton.Click;
 begin
 inherited;
 if FPushDown then
 if assigned(onclick) then
 onclick(self);
 end;

 constructor TjvBitmapButton.Create(AOwner: TComponent);
 begin
 inherited;
 width:=24;
 height:=24;
 FPushDown:=false;
 FMouseOver:=false;
 FLatching:=false;
 FHotTrack:=true;
 FDown:=false;
 FBitmap:=TBitmap.create;
 Fbitmap.width:=24;
 Fbitmap.Height:=24;
 Fbitmap.canvas.brush.color:=clgray;
 FBitmap.canvas.FillRect (rect(1,1,23,23));
 FLighter:=Tbitmap.create;
 FDarker:=Tbitmap.create;
 FDisabled:=Tbitmap.create; // by Luiz Escobar
 Fenable := enabled; // by Luiz Escobar
 end;

 destructor TjvBitmapButton.Destroy;
 begin
 FBitmap.free;
 FLighter.free;
 FDarker.free;
 FDisabled.free; // by Luiz Escobar
 inherited;
 end;

 procedure TjvBitmapButton.MouseDown(Button: 

[delphi-br] Instalação de Componentes via programação

[Marcio Cristiano Tenreiro]

Pessoal, preciso de uma ajudona...
 
Acontece o seguinte, utilizamos varios componentes que precisam ser
instalados no Delphi toda vez que reinstalamos o mesmo. Isso é uma tarefa
muito chata pois requer muito tempo para realiza-la..
 
Gostaria de saber se alguem ja fez ou sabe como fazer para eu desenvolver um
programa que instale esses componentes??? O que eu faco Deve ter como
fazer pq os componentes JEDI instalam...
 
Alguem tem uma ideia??? 
 
Márcio Cristiano Tenreiro
Programador Pleno
Unimar - Universidade de Marília -S.P.
(14) 3402-4129
 

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Evento OnShow/OnActivate

[Giovani Benedetti Penha]

Você não inicializou o objeto FrmCadastroVeiculos.

 Tente fazer o seguinte, antes de qualquer chamada ao FrmCadastroVeiculos:
Application.CreateForm(FrmCadastroVeiculos, TFrmCadastroVeiculos);

Você pode colocar isso no DPR, antes do Application.Run ou 
Application.Initialize, não me recordo ao certo.

Se não me engano era assim, faz um tempo que não trabalho com Delphi. 
Confere aí, qualquer coisa dá uma olhada no help...

Abraços!

Adenes I. Freire Junior escreveu:
 Caro amigo, qual totina que eu faça da erro no evento OnShow ou OnActivate.
 Coloque: DTM.TblVeiculos.Active := true;

 quando compilo da error de acesso ao endereço

 ou quando faço uma chamada a um form: FrmCadastroVeiculos.ShowModal;

 O erro é:

 Project SIMAVE2006.exe raised exception class EAccessviolation with message 
 Access violation at addrress 004DFSFF in module SIMAVE2006.EXE.. Process 
 stopped. Use step or run to continue.

 Qual será problema?


 - Original Message - 
 From: Jonatã Castelo Branco [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, May 31, 2006 9:15 AM
 Subject: Re: [delphi-br] Evento OnShow/OnActivate


 Qual [e a mensagem de erro e qual a funcao que da erro?

 Adenes I. Freire Junior [EMAIL PROTECTED] escreveu: Instalei o 
 delphi 7, estou desenvolvendo um sistema de controle de veículo, no form 
 principal quando uso o evento OnShow ou OnActivate dar um erro de violação 
 ao acesso de memória seja abrir um simples banco de dados como fazer uma 
 chamada a um form.
 Nos outros form's fuciona sem problemas, só form principal que esta dando 
 este erro,

 Alguém poderia me orientar sobre esta questão?

 Adenes

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



 

-- 
*Giovani Benedetti Penha*
Gerente de TI
Veltrac Rastreadores de Veículos
Fone: (43) 2105-5041 / (43) 9117-5181
Email: [EMAIL PROTECTED]







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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Delphi para Diagrama UML, é possível?

[Fellipe Henrique]

Olá, estou utilizando o BDS2006 em meu projeto de conclusão de curso, pois é
necessário apresentar o UML do sistema no final do processo... eis que vem
minha pergunta, como faço isso no BDS2006? tenho q ter outro programa pra
vincular!?

[]s

-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RE: [delphi-br] Delta porcento da HP12C

[Thiago - Danysoft]

Para os que ficaram curiosos, depois de analisar os números, encontrei ontem
uma solução:

 

Function deltaPorcento(precoCompra, precoVenda: double): double;

var

 aux: double;

Begin

 aux := precoVenda – precoCompra;

 result := aux / precoCompra;

End;

 

Atenciosamente,

 

7 ]-[ | /\ 6 0 /V\  |_ 0 |)  | /\ (_) |_ /\

 

 _ 

From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Thiago - Danysoft
Sent: terça-feira, 30 de maio de 2006 18:20
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Delta porcento da HP12C

 

Pessoal,

Alguém saberia qual a operação matemática executada pela calculadora HP12C
quando pressionamos aquele botão de delta porcento?
De repente alguém já fez uma calculadora com essa função poderia
compartilhar o algoritmo...

Atenciosamente,

7 ]-[ | /\ 6 0 /V\  |_ 0 |)  | /\ (_) |_ /\



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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Botões redondos... codigo fonte bo tão de bitmap´s...

[Desenvolvimento \(Anderson\)]

Olá, 

gostei do componente, mas tenho q adicionar uma observação:

estou usando o delphi 5. No 3 ele não aceitou... vou ver porque...
mas no delphi 5, depois q vc solta o botão, ele fica com a imagem rebocada, como se mostrasse as 2 imagens...
portanto, fiz uma melhoria no código, e com sua permissão, segue abaixo o que deve ser feito:

procedure TjvBitmapButton.MouseUp(Button: TMouseButton; Shift: TShiftState;
 X, Y: Integer);
begin
 inherited;
 FPushDown:=false;
 if Latching then
 FDown:= not FDown
 else
 FDown:=false;
 refresh;   ADICIONE ISSO!!! BY ANDERSON
 Paint;
 if assigned(onmouseup) then
 onmouseup(self,button,shift,x,y);
end;

 - Original Message - 
 From: Luiz Escobar 
 To: delphi-br@yahoogrupos.com.br 
 Sent: Wednesday, May 31, 2006 9:01 PM
 Subject: RES: [delphi-br] Botões redondos... codigo fonte botão de bitmap´s...



 bom sei que vc quer um botão redondo, e isso parece dificil.. bom aqui tem um exemplo de um botão
 feito atravez de um bitmap, qualquer bitmap vira um botão...
 ele cria o efeito de Lighter, quando passa o mouse encima, Darker, quando clica, acertei esta parte, comia um pedaçinho da imagem quando era justa, Disabled, (essa eu implementei, ehehhehe), quando vc disabilita o botão...
 talvez ajude...

 como não sabia o endereço postei o código 
 se alguem gostar e implementar algo novo, posta ai

 Luiz Escobar



 //==
 //jvBitmapButton.pas
 // versão 2.1c modify by Luiz Escobar
 //---
 unit jvBitmapButton;

 interface

 uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

 type
 TjvBitmapButton = class(TGraphicControl)
 private
 FBitmap: TBitmap;
 FLighter: TBitmap;
 FDarker: Tbitmap;
 FDisabled: Tbitmap; // by Luiz Escobar
 FPushDown:boolean;
 FMouseOver:boolean;
 FLatching: boolean;
 FDown: boolean;
 FHotTrack: boolean;
 Fenable: boolean; // by Luiz Escobar
 procedure SetBitmap(const Value: TBitmap);
 procedure MakeDarker;
 procedure MakeLighter;
 procedure MakeDisabled; // by Luiz Escobar
 procedure SetLatching(const Value: boolean);
 procedure SetDown(const Value: boolean);
 procedure SetHotTrack(const Value: boolean);
 function GetEnabled : Boolean; // by Luiz Escobar
 procedure SetEnabled( const Value: boolean); // by Luiz Escobar
 { Private declarations }
 protected
 { Protected declarations }
 procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);override;
 procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);override;
 procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
 procedure Click;override;
 procedure CMMouseLeave(var Message:TMessage); message CM_MouseLeave;
 procedure Loaded;override;
 procedure Resize;override;
 public
 { Public declarations }
 constructor Create(AOwner:TComponent);override;
 destructor Destroy;override;
 procedure Paint; override;
 published
 { Published declarations }
 property Bitmap:TBitmap read FBitmap write SetBitmap;
 property Down:boolean read FDown write SetDown;
 property Latching:boolean read FLatching write SetLatching;
 property HotTrack:boolean read FHotTrack write SetHotTrack;
 property Enable:boolean read GetEnabled write SetEnabled; // by Luiz Escobar
 property onclick;
 property onmousedown;
 property onmouseup;
 end;

 procedure Register;

 implementation

 procedure Register;
 begin
 RegisterComponents('ESC_UTIL', [TjvBitmapButton]);
 end;

 { TjvBitmapButton }

 function TjvBitmapButton.GetEnabled: boolean; // by Luiz Escobar
 begin
 result := enabled;
 end;

 procedure TjvBitmapButton.SetEnabled( const Value : boolean ); // by Luiz Escobar
 begin
 enabled := value;
 fenable := enabled;
 Paint;
 end ;

 procedure TjvBitmapButton.Click;
 begin
 inherited;
 if FPushDown then
 if assigned(onclick) then
 onclick(self);
 end;

 constructor TjvBitmapButton.Create(AOwner: TComponent);
 begin
 inherited;
 width:=24;
 height:=24;
 FPushDown:=false;
 FMouseOver:=false;
 FLatching:=false;
 FHotTrack:=true;
 FDown:=false;
 FBitmap:=TBitmap.create;
 Fbitmap.width:=24;
 Fbitmap.Height:=24;
 Fbitmap.canvas.brush.color:=clgray;
 FBitmap.canvas.FillRect (rect(1,1,23,23));
 FLighter:=Tbitmap.create;
 FDarker:=Tbitmap.create;
 FDisabled:=Tbitmap.create; // by Luiz Escobar
 Fenable := enabled; // by Luiz Escobar
 end;

 destructor TjvBitmapButton.Destroy;
 begin
 FBitmap.free;
 FLighter.free;
 FDarker.free;
 FDisabled.free; // by Luiz Escobar
 inherited;
 end;

 procedure TjvBitmapButton.MouseDown(Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
 begin
 inherited;
 if FBitmap.canvas.pixels[x,y]Fbitmap.canvas.pixels[0,FBitmap.height-1] then
 FPushDown:=true
 else
 FPushDown:=false;
 Paint;
 if assigned(onmousedown) then
 onmousedown(self,button,shift,x,y);
 end;

 procedure TjvBitmapButton.MouseUp(Button: TMouseButton; Shift: TShiftState;
 X, Y: Integer);
 

RES: [delphi-br] Botões redondos... codigo fonte botão de bitmap´s...

[Walter Alves Chagas Junior]

Legal esse componente. Instalei aqui e funcionou blz

[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações S/A
Belo Horizonte - MG - Brasil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Luiz Escobar
Enviada em: quarta-feira, 31 de maio de 2006 21:01
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Botões redondos... codigo fonte botão de
bitmap´s...



bom sei que vc quer um botão redondo, e isso parece dificil.. bom aqui tem
um exemplo de um botão
feito atravez de um bitmap, qualquer bitmap vira um botão...
ele cria o efeito de Lighter, quando passa o mouse encima, Darker, quando
clica, acertei esta parte, comia um pedaçinho da imagem quando era justa,
Disabled, (essa eu implementei, ehehhehe), quando vc disabilita o botão...
talvez ajude...

como não sabia o endereço postei o código 
se alguem gostar e implementar algo novo, posta ai
 
Luiz Escobar



//==
//jvBitmapButton.pas
// versão 2.1c modify by Luiz Escobar
//--
-
unit jvBitmapButton;

interface

uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
 TjvBitmapButton = class(TGraphicControl)
 private
 FBitmap: TBitmap;
 FLighter: TBitmap;
 FDarker: Tbitmap;
 FDisabled: Tbitmap; // by Luiz Escobar
 FPushDown:boolean;
 FMouseOver:boolean;
 FLatching: boolean;
 FDown: boolean;
 FHotTrack: boolean;
 Fenable: boolean; // by Luiz Escobar
 procedure SetBitmap(const Value: TBitmap);
 procedure MakeDarker;
 procedure MakeLighter;
 procedure MakeDisabled; // by Luiz Escobar
 procedure SetLatching(const Value: boolean);
 procedure SetDown(const Value: boolean);
 procedure SetHotTrack(const Value: boolean);
 function GetEnabled : Boolean; // by Luiz Escobar
 procedure SetEnabled( const Value: boolean); // by Luiz Escobar
 { Private declarations }
 protected
 { Protected declarations }
 procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y:
Integer);override;
 procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y:
Integer);override;
 procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
 procedure Click;override;
 procedure CMMouseLeave(var Message:TMessage); message CM_MouseLeave;
 procedure Loaded;override;
 procedure Resize;override;
 public
 { Public declarations }
 constructor Create(AOwner:TComponent);override;
 destructor Destroy;override;
 procedure Paint; override;
 published
 { Published declarations }
 property Bitmap:TBitmap read FBitmap write SetBitmap;
 property Down:boolean read FDown write SetDown;
 property Latching:boolean read FLatching write SetLatching;
 property HotTrack:boolean read FHotTrack write SetHotTrack;
 property Enable:boolean read GetEnabled write SetEnabled; // by Luiz
Escobar
 property onclick;
 property onmousedown;
 property onmouseup;
 end;

procedure Register;

implementation

procedure Register;
begin
 RegisterComponents('ESC_UTIL', [TjvBitmapButton]);
end;

{ TjvBitmapButton }

function TjvBitmapButton.GetEnabled: boolean; // by Luiz Escobar
begin
 result := enabled;
end;

procedure TjvBitmapButton.SetEnabled( const Value : boolean ); // by Luiz
Escobar
begin
 enabled := value;
 fenable := enabled;
 Paint;
end ;

procedure TjvBitmapButton.Click;
begin
 inherited;
 if FPushDown then
 if assigned(onclick) then
 onclick(self);
end;

constructor TjvBitmapButton.Create(AOwner: TComponent);
begin
 inherited;
 width:=24;
 height:=24;
 FPushDown:=false;
 FMouseOver:=false;
 FLatching:=false;
 FHotTrack:=true;
 FDown:=false;
 FBitmap:=TBitmap.create;
 Fbitmap.width:=24;
 Fbitmap.Height:=24;
 Fbitmap.canvas.brush.color:=clgray;
 FBitmap.canvas.FillRect (rect(1,1,23,23));
 FLighter:=Tbitmap.create;
 FDarker:=Tbitmap.create;
 FDisabled:=Tbitmap.create; // by Luiz Escobar
 Fenable := enabled; // by Luiz Escobar
end;

destructor TjvBitmapButton.Destroy;
begin
 FBitmap.free;
 FLighter.free;
 FDarker.free;
 FDisabled.free; // by Luiz Escobar
 inherited;
end;

procedure TjvBitmapButton.MouseDown(Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
 inherited;
 if FBitmap.canvas.pixels[x,y]Fbitmap.canvas.pixels[0,FBitmap.height-1]
then
 FPushDown:=true
 else
 FPushDown:=false;
 Paint;
 if assigned(onmousedown) then
 onmousedown(self,button,shift,x,y);
end;

procedure TjvBitmapButton.MouseUp(Button: TMouseButton; Shift: TShiftState;
 X, Y: Integer);
begin
 inherited;
 FPushDown:=false;
 if Latching then
 FDown:= not FDown
 else
 FDown:=false;
 Paint;
 if assigned(onmouseup) then
 onmouseup(self,button,shift,x,y);
end;

procedure TjvBitmapButton.Paint;
var Acolor:TColor;
begin
 inherited;
 if assigned(FBitmap) then
 begin
 AColor:=FBitmap.canvas.pixels[0,FBitmap.height-1];
 Fbitmap.transparent:=true;
 

[delphi-br] instalação do IB6.0

[iTelefonica]

Ola Pessoal.
Muitro bom dia

Trabalho com o D7 e IB 6.0 e gostaria de saber como faço para instalar no cliente o mínimo número de arquivos para poder trabalhar. Não necessito do console. E onde devo colocar estes arquivos. Ou se ja existe nas questões anteriores respostas para isso.
Obrigado
Clovito


Que a Paz do Grande Arquiteto do Universo nos Ampare
[EMAIL PROTECTED]
Msn- [EMAIL PROTECTED]
Dourado SP




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] Numeração de Página no Quick Re port

[Camoloze]

Olá Ademir,
 
É que no meu caso coloquei um QRLabel para a descrição ( Página.: ) e no
QRSysData deixei a propriedade
Text em branco.
 
Roberto

 _ 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de DelphiStar
Enviada em: quinta-feira, 1 de junho de 2006 00:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Numeração de Página no Quick Report



 Boa Noite, Roberto 
 Eu tentei fazer isso que você falou atribuindo o valor para VALUE
 só que apresentou o seguinte erro:

 Project WinContab.exe raised exception Class EConvertError with message
'Pagina: 1' is not a valid integer
 value'. Process stoped. Use step ou run to continue.

 Abraço
 Ademir 


--


 Ademir,
 
 O que você que é iniciar a numeração de página a partir de um certo
número?
 Ex.: ao invés de começar em 1 ( padrão ) começar em 10?
 Se for isso, no onPrint do QRSysData faça o seguinte.
 
 Value := IntToStr( StrToInt( Value ) + 9 );
 
 ou declare uma variável do tipo integer com o valor inicial desejado
 menos 1.
 
 Att.
 
 Roberto

 _ 

 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
 nome de FILIPE GMAIL
 Enviada em: quarta-feira, 31 de maio de 2006 16:09
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Numeração de Página no Quick Report


 Acho que criando um label e controlando por fora vai dar certo, é uma
 opção...

 Pena que não deu certo.

 []s Filipe
 - Original Message - 
 From: DelphiStar 
 To: delphi-br@yahoogrupos.com.br 
 Sent: Friday, May 26, 2006 10:03 AM
 Subject: Re: [delphi-br] Numeração de Página no Quick Report



 Bom Dia Felipe, 
 Eu já tentei isso também 
 e sempre começa numerando da página 1 (um)
 Não sei mais o que fazer 
 Acho que vou ter que criar algum controle de página externo 
 com um QRLabel 
 Pode ser que funcione 
 Obrigado pela atenção
 Ademir

 
 

 --

 Tenta acessar o método:

 qrPlano.QRPrinter.FirstPage:=5;

 vc tentou isso?

 Abraços, Filipe.



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

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



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






 Yahoo! Grupos, um serviço oferecido por: 

 PUBLICIDADE
 
 
http://br.ard.yahoo.com/SIG=12f2dnqil/M=396559.7942981.9535540.2369893/D=br
 
clubs/S=2137111264:HM/Y=BR/EXP=1149109842/A=3739190/R=0/id=noscript/SIG=154d
 cqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040
http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSD
LID=340715DGC=BADGSeg=DHSD
 
URL="" href="http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%2">http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%2
 6l%3dpt%26s%3ddhs 

 _ 

 Links do Yahoo! Grupos


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

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

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




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



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
 Links do Yahoo! Grupos




 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por: 

PUBLICIDADE
 
http://br.ard.yahoo.com/SIG=12f9u5ltt/M=396559.7942981.9535540.2369893/D=br
clubs/S=2137111264:HM/Y=BR/EXP=1149139274/A=3739190/R=0/id=noscript/SIG=154d
cqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSD
URL="" href="http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%2">http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%2
6l%3dpt%26s%3ddhs  

 _ 

Links do Yahoo! Grupos


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

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

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




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do 

RES: [delphi-br] chamada de um arquivo .chm apart ir de um click do botão??

[Moked - Tamara \(Brazil\)]

Ailton,
 
Usa o ShellExecute...
 
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
www.moked.com.br http://www.moked.com.br/ 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ailton Branco
Enviada em: quarta-feira, 31 de maio de 2006 19:15
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??


fazer uma chamada de um arquivo .chm apartir de um click do botão??

tenho um arquivo de help que funciona normalmente pela tecla F1 mas 
para me complicar o usuario quer que eu coloque um botao na tela e 
quando ele clicar o help aparece... como faço para chamar este aquivo 
apartir de um click do botao









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fe03cmh/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149120093/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs  



Links do Yahoo! Grupos


* Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
* Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??

[Anderson RB]

Application.HelpFile:='SeuHelp.hlp';
Application.HelpCommand(parametros, 0);

Parâmetros:
HELP_CONTENTS - chama o arquivo de Help como se tivesse dado um duplo-clique 
no arquivo .hlp
HELP_FINDER - Chama o help a partir do menu Conteúdo.
HELP_QUIT - Desativa o Help.
- Original Message - 
From: Ailton Branco [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, May 31, 2006 3:40 PM
Subject: [delphi-br] chamada de um arquivo .chm apartir de um click do 
botão??


fazer uma chamada de um arquivo .chm apartir de um click do botão??

tenho um arquivo de help que funciona normalmente pela tecla F1 mas
para me complicar o usuario quer que eu coloque um botao na tela e
quando ele clicar o help aparece... como faço para chamar este aquivo
apartir de um click do botao









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE





Links do Yahoo! Grupos

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

 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]

 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!.







No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.394 / Virus Database: 268.8.0/352 - Release Date: 30/05/2006


  
___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 







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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Dúvidas com DBGRID para mostrar os dados da base num Form...

[Isaque J]

 Bom dia a todos,

 Estou com problemas para mostrar os dados de uma base em um DBgrid.
Inclui as colunas, fiz referência a base, mas quando rodo om programa nada é
apresentado no DBGRID. Estou realmente enferrujado, já tinha feito isso no
passado e hj não sei o que está dando de errado...
 Algum dos amigos pode me ajudar.




-- 
Cordiais saudações,
Isaque Niche Ramos Jota


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] instalação do IB6.0

[Ulisses]

Bom dia!

Só por curiosidade, por que usar o IB6, se existe o Firebird 1.5, que é compatível com o IB6 e já vem com muitas melhorias?

Se o Banco de Dados já estiver instalado no servidor ou máquina que servirá como Servidor de Banco de Dados, basta instalar nas demais máquinas o executável do seu aplicativo, a biblioteca gds32.dll na pasta System ou System32 e, caso utiliza DBX, a dll DBX que estiver utilizando.

Boa sorte.

Ulisses

- Original Message - 
From: iTelefonica [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 01, 2006 8:40 AM
Subject: [delphi-br] instalação do IB6.0


Ola Pessoal.
Muitro bom dia

Trabalho com o D7 e IB 6.0 e gostaria de saber como faço para instalar no cliente o mínimo número de arquivos para poder trabalhar. Não necessito do console. E onde devo colocar estes arquivos. Ou se ja existe nas questões anteriores respostas para isso.
Obrigado
Clovito


Que a Paz do Grande Arquiteto do Universo nos Ampare
[EMAIL PROTECTED]
Msn- [EMAIL PROTECTED]
Dourado SP




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Chamar Calendário no DBGRID.

[Gabriel Herdt]

Como chamar um calendario em uma coluna do dbgrid?
Que funcione como um TcxDateEdit.

Grato!









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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] ADO Parameters via ODBC

[Arthur Souza]

Pessoal,

Estive realizando alguns teste com minha ADOQUERY, Cujo o mesmo realiza a
seguinte consulta num BD Access:

--
GATRASO.CLOSE;
GATRASO.ACTIVE:=FALSE;
GATRASO.SQL.CLEAR;
GATRASO.SQL.ADD('SELECT count(PROJ_PEDPROJ) AS ATRASO FROM prcproj WHERE
proj_chk1=1 AND proj_chk2=1 AND PROJ_DTEMI BETWEEN DTINI AND DATE()');
GATRASO.Parameters.Parambyname('DTINI').VALUE:=DATAINI;
GATRASO.ACTIVE:=TRUE;
GATRASO.OPEN;
--

Quando meu adoconnection está direcionado para o MicrosoftJet4.0 como
conexão..funciona uma blz...
Mas quando aponto a conexão para ser realizada via ODBC ai o negócio começa
dá problema...me aparecendo o seguite na clásula Parameters erro:

Parâmetros insuficiente eram esperados 1

por que este erro acontece via ODBC? sendo que estou utilizando o mesmo
código postado...

Agradeço se alguém souber

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Tradução de header em C para Delphi

[Fortes Informática]

Estou tentando utilizar a biblioteca OpenCV da Intel para detectar faces, mas estou com problemas traduzindo os headers para Delphi, na página do grupo OpenCV tem alguns headers traduzidos mas são apenas para calibrar cameras, procurei em diversos lugares e não achei outras referências para OpenCV com Delphi, pedi ajuda na lista OpenCV e ainda não obtive resposta por isso peço ajuda a lista. 

http://opencvlibrary.sourceforge.net

coloquei meu projeto(junto com os headers em C e .pas) disponíveis para se alguem puder me ajudar a traduzir.
http://geocities.yahoo.com.br/tiagoefmoraes/DelphiOpenCV.zip - Fontes

as Dlls estão disponíveis em 
http://geocities.yahoo.com.br/tiagoefmoraes/Bin.zip - dlls
está compilando mas na execução da linha

 cvGetSeqElem(faces, 1);

na UnitMain acontece um AV:
Project OpenCVTest.exe raised exception class EAccessViolation with message 'Access violation at address 004A6CE7 in module 'cxcore097.dll'. Read of address 830C'. Process stopped. Use Step or Run to continue.

acredito ser algum erro de tradução para Delphi pois o exemplo do OpenCV funciona normalmente.

Obrigado pela ajuda.

Tiago Moraes

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??

[Wiltomar Duarte]

WinExec('caminhodochm\nomechm.chm',SW_SHOW);

Wiltomar Duarte
 - Original Message - 
 From: Ailton Branco 
 To: delphi-br@yahoogrupos.com.br 
 Sent: Wednesday, May 31, 2006 3:40 PM
 Subject: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??


 fazer uma chamada de um arquivo .chm apartir de um click do botão??

 tenho um arquivo de help que funciona normalmente pela tecla F1 mas 
 para me complicar o usuario quer que eu coloque um botao na tela e 
 quando ele clicar o help aparece... como faço para chamar este aquivo 
 apartir de um click do botao









 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 Yahoo! Grupos, um serviço oferecido por: 
 PUBLICIDADE
 
 


--
 Links do Yahoo! Grupos

 a.. Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
 
 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]
 
 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. 



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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] Delphi para Diagrama UML, é p ossível?

[Andreano Lanusse]

Fellipe,

no Delphi Pro você faz diagrama de classe e no Enterprise todos os outros como: Use Case, Seguence, Collaboration, Component etc...

É só clicar no Model View do Project Manager e selecionar a classe ou com o botão direito para criar outros diagramas.

[]'s
Andreano

-Mensagem original-
De: delphi-br@yahoogrupos.com.br em nome de Fellipe Henrique
Enviada: qui 01/06/2006 08:29
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Delphi para Diagrama UML, é possível?
 
Olá, estou utilizando o BDS2006 em meu projeto de conclusão de curso, pois é
necessário apresentar o UML do sistema no final do processo... eis que vem
minha pergunta, como faço isso no BDS2006? tenho q ter outro programa pra
vincular!?

[]s

-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por:  
PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fenac2n/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149168701/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs  



Links do Yahoo! Grupos


* Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
* Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 








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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Controlando o Explorer

[Anderson RB]

Amigo segue o Codigo abaixo

procedure TForm1.Timer1Timer(Sender: TObject);
Var
 WindowName : array[0..MAX_PATH] of char;
 H: THandle;
begin
GetWindowText(GetForegroundWindow,WindowName,MAX_PATH);
Memo1.Lines.Add(WindowName);
end;

Para voce poder testar essa implementacao ai, coloque um Timer e no evendo 
onTimer coloque o codigo acima, coloque tb um Memo no sue programa, como 
imagino que seu programa ficara oculto ou ao lado do relogio, basta voce 
minimizar ele e ele funcionara da maneira que voce quer...

O primeiro parametro de GetWindowText, GetForeGroundWindow diz que é para 
pegar a janela ativa, neste parametro, voce poderia trocar apenas pelo do 
Internet Explorar, mas tem que passar o handle do aplicativo, ai complica em 
mais algumas linhas de codigo... mas essa solucao acima ja ajuda..

- Original Message - 
From: relsi_maron [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, May 31, 2006 5:39 PM
Subject: [delphi-br] Controlando o Explorer



Olá pessoal,

Eu gostaria de saber o seguinte, qual a maneira de implementar um
programa que rode em background, e quando o Internet Explorer for
iniciado ele leia o que está escrito na barra de título do mesmo, e
caso encontre no título a palavra 'Sexo', por exemplo, ele feche o
navegador.

O que estou tentando implementar é um aplicativo que monitore se a
pessoa está navegando em uma categoria de sites não permitidos.

Era isso, se alguém puder dar uma força, eu agradeço de antemão.

Um abraço

Relsi Hur






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE





Links do Yahoo! Grupos

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

 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]

 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!.







No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.394 / Virus Database: 268.7.4/351 - Release Date: 29/05/2006


  
___ 
Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 
http://mail.yahoo.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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Mouse com Net Scrool

[Antonio Pires]

Como faço para o Mouse com Net Scrool funcionar nas minhas

aplicações Delphi 7.



--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.394 / Virus Database: 268.8.0/353 - Release Date: 31/05/2006


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] C# ou Delphi.Net

[Marlon Franco da Costa]

Ei jovem se existe um arquivo do mencionado livro, gostaria de saber onde
esta o link para download.

 

Grato, 

Marlon

 

 

 _ 

De: Andreano Lanusse [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 31 de maio de 2006 18:34
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] C# ou Delphi.Net

 

Rodrigo 

olha esse livro
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx 

[]'s


 
Andreano Lanusse
System Engineer - Development Tools
Tel.: +55 (11) 2165-8000 / +55 (11) 8196-5912
[EMAIL PROTECTED] - www.borland.com.br
http://www.borland.com.br/ http://www.borland.com.br/  
Blogs: http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse 
Artigos: http://bdn.borland.com http://bdn.borland.com
http://bdn.borland.com/ http://bdn.borland.com/  

A Borland Software é líder mundial em soluções independentes de plataforma
para a Criação Otimizada de Software (Software Delivery Optimization),
auxiliando nossos clientes a transporem as barreiras atuais do
desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour
http://info.borland.com.br/delphitour 
http://info.borland.com.br/delphi http://info.borland.com.br/delphi  




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rodrigo Mota
Enviada em: quarta-feira, 31 de maio de 2006 16:41
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] C# ou Delphi.Net


Valew galera.

vô ficar com o Delphi.Net mesmo..assim não preciso mudar de IDE...

não vi nenhum livro ref. a Delphi.Net só C# e VB...tem um curso

la na TDS de .NET, vô ver com Manuel Edesio.

abs.




On Wed, 31 May 2006 14:08:21 -0800, Juliano Carvalho - Folhamatic
[EMAIL PROTECTED] escreveu:

 De: Juliano Carvalho - Folhamatic [EMAIL PROTECTED]
 Data: Wed, 31 May 2006 14:08:21 -0800
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] C# ou Delphi.Net
 
 htmlbodyVB.Net, C# e Delphi.Net são todas excelentes, cada uma a sua
maneira.BRPra desenvolvimento .Net eu prefiro C#.BRBR- Original
Message - BRFrom: Rodrigo Mota [EMAIL PROTECTED]BRTo:
delphi-br@yahoogrupos.com.brBRSent: Wednesday, May 31, 2006 8:55
AMBRSubject: [delphi-br] C# ou Delphi.NetBRBRBR Oi
galera,BRBR eu ja desenvolvo na área Web em PHP, fiz até um curso de
.Net...usandoBR o maldito VB.NET não gostei como a galera do curso ja
conhecia VBe euBR era o unicoque gostava de C a professora
preferiu dar enfase em VB.NETBR faze o que!BRBR Estou para me
aprofundar mais na área .Net ja sou programador Delphi...BR não sou bam
bam bam...mas me viroquero aprenderBR .NET mas tenho sérias
dúvidas...C# ou Delphi.Net?BRBR alguém aí tem uma luz...prós e
contras...?BRBR abs.BRBR Rodrigo.BRBRBRBRBRBR
-- BR  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
BRBRBRBR Links do Yahoo!
GruposBRBRBRBRBRBRBRBRBRBR!-- |**|begin egp
html banner|**| --

!-- |**|end egp html banner|**| -- !-- |**|begin egp html
banner|**| -- 
 table border=0 cellspacing=0 cellpadding=2 tr bgcolor=#CC
td align=centerfont size=-1 color=#003399bYahoo! Grupos, um serviço
oferecido por:/b/font/td /tr tr bgcolor=#FF
td align=center width=470table border=0 cellpadding=0
cellspacing=0trtd align=centerfont face=arial
size=-2PUBLICIDADE/font
a
href="" href="http://br.ard.yahoo.com/SIG=12fiva76v/M=396559.7942981.9535540.2369893">http://br.ard.yahoo.com/SIG=12fiva76v/M=396559.7942981.9535540.2369893
/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149102593/A=3739190/R=0/id=noscript/SIG
=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=
DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3
dbr%26l%3dpt%26s%3ddhs target=_blankimg
src="" href="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/290506_y300x250_maio04_dhs_">http://br.i1.yimg.com/br.yimg.com/i/br/ads7/290506_y300x250_maio04_dhs_
dimension5150.gif
http://br.i1.yimg.com/br.yimg.com/i/br/ads7/290506_y300x250_maio04_dhs_dime
nsion5150.gif  width=300 height= 250 border=0/a/td/tr/table/td
/tr /table !-- |**|end egp html banner|**| -- !--
|**|begin egp html banner|**| --
 hr width=500bLinks do Yahoo! Grupos/b
ulliPara visitar o site do seu grupo na web, acesse:
a href="" href="http://br.groups.yahoo.com/group/delphi-br/">http://br.groups.yahoo.com/group/delphi-br/
http://br.groups.yahoo.com/group/delphi-br/
http://br.groups.yahoo.com/group/delphi-br/
http://br.groups.yahoo.com/group/delphi-br/ /a
liPara sair deste grupo, envie um e-mail para:
a
href="" PROTECTED]d
[EMAIL PROTECTED]/a
liO uso que você faz do Yahoo! Grupos está sujeito aos a
href="" href="http://br.yahoo.com/info/utos.html">http://br.yahoo.com/info/utos.html
http://br.yahoo.com/info/utos.html Termos do Serviço do
Yahoo!/a./ul/br!-- |**|end egp html banner|**| --/body/html


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido 

[delphi-br] SQLConnection property required for this operation - Como arrumar!?

[Fellipe Henrique]

Olá, fiz igual ao exemplo do Bruno sobre BSS, criei lá meu outro RDM...
blz.. Coloquei no Before Open e no Before ApplyUpdate o seguinte codigo:

 if CronosPMServer = nil then
 CronosPMServer := TCronosPMServer.Create(self);

Mas dá esse erro, tanto no executavel rodando, quanto no design no proprio
delphi, ao tentar inserir os campos no CDS:

 SQLConnection property required for this operation

já tentei esse codigo:
 if CronosPMServer = nil then
 begin
 CronosPMServer := TCronosPMServer.Create(self);
 TbFuncoes.SQLConnection := CronosPMServer.Conexao;
 end
 else
 TbFuncoes.SQLConnection := CronosPMServer.Conexao ;

Mas não funciona... :o(

Como eu arrumo isso?

[]s


-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] chamada de um arquivo . chm apartir de um click do botão??

[Walter Alves Chagas Junior]

O .chm é mais complicado de usar ele. Estou disponibilizando esta função que
achei uma vez lá no delphi3000. Mas já vou antecipando que nunca usei ela.
Portanto é por conta e risco de cada um.


--

Do you long to move from WinHelp to HTML Help in your programs? The unit
below converts all WinHelp calls to HTML Help enabling you to upgrade with
the minimum of effort. 
Answer:


Save this unit to a directory on your Environment Options|Library|Library
Path and add to your project uses clause, all WinHelp requests will now be
translated to HTML Help. Specify your *.chm file in the Project
Options|Application|Help file setting. Context sensitive help will work as
normal, use TApplication.HelpCommand to send help commands. eg.
Application.HelpCommand(HELP_KEY, DWORD(keyData)) 



unit dmHTMLHelp; 
{Unit to translate WinHelp requests into HTML Help and call the API.} 
{Written by Dave Murray, October 2001. [EMAIL PROTECTED] 
{NOTES: 
This unit assigns its own handler to the Application.OnHelp event. 
DO NOT assign your own handler to Application.OnHelp. 
Also, this unit ignores any form's HelpFile property. (Delphi 4+)} 

interface 

uses 
 Windows, Messages, SysUtils, Forms; 

const 
 {commands to pass to HtmlHelp(), see HTML Help API Reference} 
 HH_DISPLAY_TOPIC = $; {open help topic} 
 HH_HELP_FINDER = $; {backwards compatibility,use
HH_DISPLAY_TOPIC instead} 
 HH_DISPLAY_TOC = $0001; {select Contents tab in nav pane} 
 HH_DISPLAY_INDEX = $0002; {select Index tab + search for keyword} 
 HH_DISPLAY_SEARCH = $0003; {select Search tab in nav pane} 
 HH_SET_WIN_TYPE = $0004; 
 HH_GET_WIN_TYPE = $0005; 
 HH_GET_WIN_HANDLE = $0006; 
 HH_ENUM_INFO_TYPE = $0007; 
 HH_SET_INFO_TYPE = $0008; 
 HH_SYNC = $0009; 
 HH_RESERVED1 = $000A; {not currently implemented} 
 HH_RESERVED2 = $000B; {not currently implemented} 
 HH_RESERVED3 = $000C; {not currently implemented} 
 HH_KEYWORD_LOOKUP = $000D; 
 HH_DISPLAY_TEXT_POPUP = $000E; {display string resource/text in a popup}

 HH_HELP_CONTEXT = $000F; {display topic for context number} 
 HH_TP_HELP_CONTEXTMENU = $0010; {text popup help, same as
HELP_CONTEXTMENU} 
 HH_TP_HELP_WM_HELP = $0011; {text popup help, same as HELP_WM_HELP} 
 HH_CLOSE_ALL = $0012; {close all windows opened by caller} 
 HH_ALINK_LOOKUP = $0013; {ALink version of HH_KEYWORD_LOOKUP} 
 HH_GET_LAST_ERROR = $0014; {not currently implemented} 
 HH_ENUM_CATEGORY = $0015; 
 HH_ENUM_CATEGORY_IT = $0016; 
 HH_RESET_IT_FILTER = $0017; 
 HH_SET_INCLUSIVE_FILTER = $0018; 
 HH_SET_EXCLUSIVE_FILTER = $0019; 
 HH_INITIALIZE = $001C; 
 HH_UNINITIALIZE = $001D; 
 HH_PRETRANSLATEMESSAGE = $00FD; 
 HH_SET_GLOBAL_PROPERTY = $00FC; 

function HtmlHelp(hwndCaller: THandle; pszFile: PChar; uCommand: cardinal;
dwData: longint): THandle; stdcall; 

implementation 

function HtmlHelp(hwndCaller: THandle; pszFile: PChar; uCommand: cardinal;
dwData: longint): THandle; stdcall; external 'hhctrl.ocx' name 'HtmlHelpA';
{external API call} 

type 
 TdmHTMLHelp = class(TObject) {encapsulates function} 
 function ApplicationHelp(Command: Word; Data: Longint; var CallHelp:
Boolean): Boolean; 
 end; {TdmHTMLHelp..} 

function TdmHTMLHelp.ApplicationHelp(Command: Word; Data: Longint; var
CallHelp: Boolean): Boolean; 
{translates WinHelp commands to HTMLHelp commands + calls API} 
var 
 HCommand : word; 
begin 
 {make sure VCL doesn't activate WinHelp + function succeeds} 
 CallHelp := false; 
 result := true; 
 {translate WinHelp  HTMLHelp} 
 case Command of 
 HELP_CONTENTS : begin 
 HCommand := HH_DISPLAY_TOC; 
 Data := 0; 
 end; {HELP_CONTENTS..} 
 HELP_CONTEXT : HCommand := HH_HELP_CONTEXT; 
 HELP_CONTEXTPOPUP : HCommand := HH_HELP_CONTEXT; 
 HELP_FINDER : HCommand := HH_DISPLAY_TOPIC; 
 HELP_KEY : HCommand := HH_DISPLAY_INDEX; 
 HELP_QUIT : begin 
 HCommand := HH_CLOSE_ALL; 
 Data := 0; 
 end; {HELP_QUIT..} 
 else begin {default} 
 HCommand := HH_DISPLAY_TOPIC; 
 Data := 0; 
 end; {default..} 
 end; {case Command..} 
 {call HTML Help API} 
 HtmlHelp(Application.MainForm.Handle, PChar(Application.HelpFile),
HCommand, Data); 
end; {function TdmHTMLHelp.ApplicationHelp} 

var 
 HTMLHelper: TdmHTMLHelp; 

initialization 
 {create object + assign event handler} 
 HTMLHelper := TdmHTMLHelp.Create; 
 Application.OnHelp := HTMLHelpUser.ApplicationHelp; 
finalization 
 {free event handler + object} 
 Application.OnHelp := nil; 
 HTMLHelper.Free; 
end. 
 

--

[]s

Walter Alves Chagas Junior
Projeto e desenvolvimento de sistemas
Telemont Engenharia de telecomunicações S/A
Belo Horizonte - MG - Brasil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Anderson RB
Enviada em: quinta-feira, 1 de junho de 2006 09:21
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] chamada de um arquivo .chm apartir de um click
do botão??


Application.HelpFile:='SeuHelp.hlp';

[delphi-br] Problema estranho com MEMO

[Moked - Tamara \(Brazil\)]

 
 
 http://www.moked.com.br/   Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br http://www.moked.com.br/ 

Grau de Sigilo: Confidencial Reservado Interno Amplo 
Nível de Prioridade: Alto Médio Baixo
Destinatário/s: Lista de divulgação 
-
Bom dia,
 
Tenho em meu sistema uma tela SOBRE do sistema, nesta tela eu exibo o contrato de licença do msm em um memo. Até ai td bem! Agora estou tentando colocar este msm contrato no msm lugar, porém agora traduzido para outro idioma. A quantidade de linha chega a ser até menor que o original, mas na hr de rodar o sistema... ele corta o contrato pela metade.
 
Eu já peguei o contrato original, assim como funciona certinho no sistema e colar neste q estou alterando e acontece a msm coisa: o contrato é cortado.
 
Alguém sabem me dizer se tem limite de caracter? e se tem, pq então ele deixa eu digitar td o texto no componente pra ñ aparecer? Tem alguma propriedade relativa a isto? 
 
Quem digitou na 1ª vez ñ foi eu e nem esta mais na empresa pra mim perguntar :(
 
Se alguém puder me ajudar eu agradeceria muito 
 
Obrigada,
 


Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

Serviços prestados no Brasil na área de segurança pessoal e empresarial: 
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs 

O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. 
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! 
 


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] C# ou Delphi.Net

[Andreano Lanusse]

Marlon,
 
infelizmente não há venda do livro em formato eletrônico.
 
[]'s



Andreano Lanusse
System Engineer - Development Tools
Tel.: +55 (11) 2165-8000 / +55 (11) 8196-5912
[EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ 
Blogs: http://blogs.borland.com/andreanolanusse
Artigos: http://bdn.borland.com http://bdn.borland.com/ 

A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour http://info.borland.com.br/delphi 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Marlon Franco da Costa
Enviada em: quinta-feira, 1 de junho de 2006 10:16
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] C# ou Delphi.Net


Ei jovem se existe um arquivo do mencionado livro, gostaria de saber onde
esta o link para download.



Grato, 

Marlon





 _ 

De: Andreano Lanusse [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 31 de maio de 2006 18:34
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] C# ou Delphi.Net



Rodrigo 

olha esse livro
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx 

[]'s


 
Andreano Lanusse
System Engineer - Development Tools
Tel.: +55 (11) 2165-8000 / +55 (11) 8196-5912
[EMAIL PROTECTED] - www.borland.com.br
http://www.borland.com.br/ http://www.borland.com.br/  
Blogs: http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse 
Artigos: http://bdn.borland.com http://bdn.borland.com
http://bdn.borland.com/ http://bdn.borland.com/  

A Borland Software é líder mundial em soluções independentes de plataforma
para a Criação Otimizada de Software (Software Delivery Optimization),
auxiliando nossos clientes a transporem as barreiras atuais do
desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour
http://info.borland.com.br/delphitour 
http://info.borland.com.br/delphi http://info.borland.com.br/delphi  




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rodrigo Mota
Enviada em: quarta-feira, 31 de maio de 2006 16:41
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] C# ou Delphi.Net


Valew galera.

vô ficar com o Delphi.Net mesmo..assim não preciso mudar de IDE...

não vi nenhum livro ref. a Delphi.Net só C# e VB...tem um curso

la na TDS de .NET, vô ver com Manuel Edesio.

abs.




On Wed, 31 May 2006 14:08:21 -0800, Juliano Carvalho - Folhamatic
[EMAIL PROTECTED] escreveu:

 De: Juliano Carvalho - Folhamatic [EMAIL PROTECTED]
 Data: Wed, 31 May 2006 14:08:21 -0800
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] C# ou Delphi.Net
 
 htmlbodyVB.Net, C# e Delphi.Net são todas excelentes, cada uma a sua
maneira.BRPra desenvolvimento .Net eu prefiro C#.BRBR- Original
Message - BRFrom: Rodrigo Mota [EMAIL PROTECTED]BRTo:
delphi-br@yahoogrupos.com.brBRSent: Wednesday, May 31, 2006 8:55
AMBRSubject: [delphi-br] C# ou Delphi.NetBRBRBR Oi
galera,BRBR eu ja desenvolvo na área Web em PHP, fiz até um curso de
.Net...usandoBR o maldito VB.NET não gostei como a galera do curso ja
conhecia VBe euBR era o unicoque gostava de C a professora
preferiu dar enfase em VB.NETBR faze o que!BRBR Estou para me
aprofundar mais na área .Net ja sou programador Delphi...BR não sou bam
bam bam...mas me viroquero aprenderBR .NET mas tenho sérias
dúvidas...C# ou Delphi.Net?BRBR alguém aí tem uma luz...prós e
contras...?BRBR abs.BRBR Rodrigo.BRBRBRBRBRBR
-- BR  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
BRBRBRBR Links do Yahoo!
GruposBRBRBRBRBRBRBRBRBRBR!-- |**|begin egp
html banner|**| --

!-- |**|end egp html banner|**| -- !-- |**|begin egp html
banner|**| -- 
 table border=0 cellspacing=0 cellpadding=2 tr bgcolor=#CC
td align=centerfont size=-1 color=#003399bYahoo! Grupos, um serviço
oferecido por:/b/font/td /tr tr bgcolor=#FF
td align=center width=470table border=0 cellpadding=0
cellspacing=0trtd align=centerfont face=arial
size=-2PUBLICIDADE/font
a
href="" href="http://br.ard.yahoo.com/SIG=12fiva76v/M=396559.7942981.9535540.2369893">http://br.ard.yahoo.com/SIG=12fiva76v/M=396559.7942981.9535540.2369893
/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149102593/A=3739190/R=0/id=noscript/SIG
=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=
DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3
dbr%26l%3dpt%26s%3ddhs target=_blankimg
src="" href="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/290506_y300x250_maio04_dhs_">http://br.i1.yimg.com/br.yimg.com/i/br/ads7/290506_y300x250_maio04_dhs_
dimension5150.gif

RES: [delphi-br] chamada de um arquivo .chm apart ir de um click do botão??

[Moked - Tamara \(Brazil\)]

Eu ñ acho o .chm mais dificil de ser usado eu uso tranquilamente:
 
 ShellExecute(0, nil, PChar(ExtractFilePath(Application.ExeName) + '\Ajuda.chm'), '' ,nil, SW_SHOWNORMAL);
 
Sem problemas nenhum, nenhum, nenhum
 
Eu posso estar muito equivocada, mas acredito q é mais complicado esta função ai do q usar o Shellexecuters
 
Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
www.moked.com.br http://www.moked.com.br/ 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior
Enviada em: quinta-feira, 1 de junho de 2006 10:31
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??


O .chm é mais complicado de usar ele. Estou disponibilizando esta função que
achei uma vez lá no delphi3000. Mas já vou antecipando que nunca usei ela.
Portanto é por conta e risco de cada um.


--

Do you long to move from WinHelp to HTML Help in your programs? The unit
below converts all WinHelp calls to HTML Help enabling you to upgrade with
the minimum of effort. 
Answer:


Save this unit to a directory on your Environment Options|Library|Library
Path and add to your project uses clause, all WinHelp requests will now be
translated to HTML Help. Specify your *.chm file in the Project
Options|Application|Help file setting. Context sensitive help will work as
normal, use TApplication.HelpCommand to send help commands. eg.
Application.HelpCommand(HELP_KEY, DWORD(keyData)) 



unit dmHTMLHelp; 
{Unit to translate WinHelp requests into HTML Help and call the API.} 
{Written by Dave Murray, October 2001. [EMAIL PROTECTED] 
{NOTES: 
This unit assigns its own handler to the Application.OnHelp event. 
DO NOT assign your own handler to Application.OnHelp. 
Also, this unit ignores any form's HelpFile property. (Delphi 4+)} 

interface 

uses 
 Windows, Messages, SysUtils, Forms; 

const 
 {commands to pass to HtmlHelp(), see HTML Help API Reference} 
 HH_DISPLAY_TOPIC = $; {open help topic} 
 HH_HELP_FINDER = $; {backwards compatibility,use
HH_DISPLAY_TOPIC instead} 
 HH_DISPLAY_TOC = $0001; {select Contents tab in nav pane} 
 HH_DISPLAY_INDEX = $0002; {select Index tab + search for keyword} 
 HH_DISPLAY_SEARCH = $0003; {select Search tab in nav pane} 
 HH_SET_WIN_TYPE = $0004; 
 HH_GET_WIN_TYPE = $0005; 
 HH_GET_WIN_HANDLE = $0006; 
 HH_ENUM_INFO_TYPE = $0007; 
 HH_SET_INFO_TYPE = $0008; 
 HH_SYNC = $0009; 
 HH_RESERVED1 = $000A; {not currently implemented} 
 HH_RESERVED2 = $000B; {not currently implemented} 
 HH_RESERVED3 = $000C; {not currently implemented} 
 HH_KEYWORD_LOOKUP = $000D; 
 HH_DISPLAY_TEXT_POPUP = $000E; {display string resource/text in a popup}

 HH_HELP_CONTEXT = $000F; {display topic for context number} 
 HH_TP_HELP_CONTEXTMENU = $0010; {text popup help, same as
HELP_CONTEXTMENU} 
 HH_TP_HELP_WM_HELP = $0011; {text popup help, same as HELP_WM_HELP} 
 HH_CLOSE_ALL = $0012; {close all windows opened by caller} 
 HH_ALINK_LOOKUP = $0013; {ALink version of HH_KEYWORD_LOOKUP} 
 HH_GET_LAST_ERROR = $0014; {not currently implemented} 
 HH_ENUM_CATEGORY = $0015; 
 HH_ENUM_CATEGORY_IT = $0016; 
 HH_RESET_IT_FILTER = $0017; 
 HH_SET_INCLUSIVE_FILTER = $0018; 
 HH_SET_EXCLUSIVE_FILTER = $0019; 
 HH_INITIALIZE = $001C; 
 HH_UNINITIALIZE = $001D; 
 HH_PRETRANSLATEMESSAGE = $00FD; 
 HH_SET_GLOBAL_PROPERTY = $00FC; 

function HtmlHelp(hwndCaller: THandle; pszFile: PChar; uCommand: cardinal;
dwData: longint): THandle; stdcall; 

implementation 

function HtmlHelp(hwndCaller: THandle; pszFile: PChar; uCommand: cardinal;
dwData: longint): THandle; stdcall; external 'hhctrl.ocx' name 'HtmlHelpA';
{external API call} 

type 
 TdmHTMLHelp = class(TObject) {encapsulates function} 
 function ApplicationHelp(Command: Word; Data: Longint; var CallHelp:
Boolean): Boolean; 
 end; {TdmHTMLHelp..} 

function TdmHTMLHelp.ApplicationHelp(Command: Word; Data: Longint; var
CallHelp: Boolean): Boolean; 
{translates WinHelp commands to HTMLHelp commands + calls API} 
var 
 HCommand : word; 
begin 
 {make sure VCL doesn't activate WinHelp + function succeeds} 
 CallHelp := false; 
 result := true; 
 {translate WinHelp  HTMLHelp} 
 case Command of 
 HELP_CONTENTS : begin 
 HCommand := HH_DISPLAY_TOC; 
 Data := 0; 
 end; {HELP_CONTENTS..} 
 HELP_CONTEXT : HCommand := HH_HELP_CONTEXT; 
 HELP_CONTEXTPOPUP : HCommand := HH_HELP_CONTEXT; 
 HELP_FINDER : HCommand := HH_DISPLAY_TOPIC; 
 HELP_KEY : HCommand := HH_DISPLAY_INDEX; 
 HELP_QUIT : begin 
 HCommand := HH_CLOSE_ALL; 
 Data := 0; 
 end; {HELP_QUIT..} 
 else begin {default} 
 HCommand := HH_DISPLAY_TOPIC; 
 Data := 0; 
 end; {default..} 
 end; {case Command..} 
 {call HTML Help API} 
 HtmlHelp(Application.MainForm.Handle, PChar(Application.HelpFile),
HCommand, Data); 
end; {function 

RE: [delphi-br] Tradução de header em C para Del phi

[Eduardo Alves]

Posso dar uma olhada em casa.

Se vc puder esperar me add no msn q te ajudo.

[EMAIL PROTECTED]


 
 
Eduardo Castro Alves
Analista de Sistemas
-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Tiago Moraes (Fortes Informática)
Sent: quinta-feira, 1 de junho de 2006 09:13
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Tradução de header em C para Delphi

Estou tentando utilizar a biblioteca OpenCV da Intel para detectar faces, mas estou com problemas traduzindo os headers para Delphi, na página do grupo OpenCV tem alguns headers traduzidos mas são apenas para calibrar cameras, procurei em diversos lugares e não achei outras referências para OpenCV com Delphi, pedi ajuda na lista OpenCV e ainda não obtive resposta por isso peço ajuda a lista. 

http://opencvlibrary.sourceforge.net

coloquei meu projeto(junto com os headers em C e .pas) disponíveis para se alguem puder me ajudar a traduzir.
http://geocities.yahoo.com.br/tiagoefmoraes/DelphiOpenCV.zip - Fontes

as Dlls estão disponíveis em 
http://geocities.yahoo.com.br/tiagoefmoraes/Bin.zip - dlls
está compilando mas na execução da linha

 cvGetSeqElem(faces, 1);

na UnitMain acontece um AV:
Project OpenCVTest.exe raised exception class EAccessViolation with message 'Access violation at address 004A6CE7 in module 'cxcore097.dll'. Read of address 830C'. Process stopped. Use Step or Run to continue.

acredito ser algum erro de tradução para Delphi pois o exemplo do OpenCV funciona normalmente.

Obrigado pela ajuda.

Tiago Moraes

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 









-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Executar ALTER TABLE via IBQuery

[troliveira_net]

Pessoal, estou tentando fazer um ALTER TABLE via componente IBQuery, 
mas não estou obtendo sucesso.
Estou utilizando o seguinte comando:
with dmtaltal.qryTal do
 begin
 Close;
 SQL.Clear
 SQL.Add('ALTER TABLE BASE_IDENTIFICADOR');
 SQL.Add('DROP '+chr(39)+'IDENTIFICADOR'+chr(39) );
 Open;
 end;

Só que ele me retorna um erro: Token unknown -line2 char 
4 'IDENTIFICADOR''

Alguém com mais experiência poderia me dizer aonde estou errando??? Ou 
não é possível fazer ALTER TABLE com componente IbQuery?? (certeza que 
dá né :-))

Agradeço desde já a atenção dos colegas










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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Delphi para Diagrama UML, é possível?

[Fellipe Henrique]

Obrigado Andreano, no caso falha minha esqueci de dizer qual eu estou
mexendo... estou usando o architect... eh o mesmo procedimento? e justaente,
preciso desses tudo que você falou...
[]s


Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:


 Fellipe,

 no Delphi Pro você faz diagrama de classe e no Enterprise todos os outros
 como: Use Case, Seguence, Collaboration, Component etc...

 É só clicar no Model View do Project Manager e selecionar a classe ou com
 o botão direito para criar outros diagramas.

 []'s
 Andreano

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br em nome de Fellipe Henrique
 Enviada: qui 01/06/2006 08:29
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Delphi para Diagrama UML, é possível?


 Olá, estou utilizando o BDS2006 em meu projeto de conclusão de curso, pois
 é
 necessário apresentar o UML do sistema no final do processo... eis que vem
 minha pergunta, como faço isso no BDS2006? tenho q ter outro programa pra
 vincular!?

 []s

 --
 _
 Fellipe Henrique
 [EMAIL PROTECTED]

 Borland Developer Studio 2006 Certified

 Venham até a borda, ele disse.
 Eles disseram: Nós temos medo.
 Venham até a borda, ele insistiu.
 Eles foram, Ele os empurrou...
 E eles voaram.
 (Guillaume Apollinaire)


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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE
 
 http://br.ard.yahoo.com/SIG=12fenac2n/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149168701/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs


 

 Links do Yahoo! Grupos


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

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

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




 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fnqs5j6/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149173617/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 --
 *Links do Yahoo! Grupos*

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

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

 - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
 Serviço do Yahoo! http://br.yahoo.com/info/utos.html.




-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] Delphi para Diagrama UML, é p ossível?

[Andreano Lanusse]

Sim



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique
Enviada em: quinta-feira, 1 de junho de 2006 10:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?


Obrigado Andreano, no caso falha minha esqueci de dizer qual eu estou
mexendo... estou usando o architect... eh o mesmo procedimento? e justaente,
preciso desses tudo que você falou...
[]s


Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:


 Fellipe,

 no Delphi Pro você faz diagrama de classe e no Enterprise todos os outros
 como: Use Case, Seguence, Collaboration, Component etc...

 É só clicar no Model View do Project Manager e selecionar a classe ou com
 o botão direito para criar outros diagramas.

 []'s
 Andreano

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br em nome de Fellipe Henrique
 Enviada: qui 01/06/2006 08:29
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Delphi para Diagrama UML, é possível?


 Olá, estou utilizando o BDS2006 em meu projeto de conclusão de curso, pois
 é
 necessário apresentar o UML do sistema no final do processo... eis que vem
 minha pergunta, como faço isso no BDS2006? tenho q ter outro programa pra
 vincular!?

 []s

 --
 _
 Fellipe Henrique
 [EMAIL PROTECTED]

 Borland Developer Studio 2006 Certified

 Venham até a borda, ele disse.
 Eles disseram: Nós temos medo.
 Venham até a borda, ele insistiu.
 Eles foram, Ele os empurrou...
 E eles voaram.
 (Guillaume Apollinaire)


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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE
 
 http://br.ard.yahoo.com/SIG=12fenac2n/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149168701/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs


 

 Links do Yahoo! Grupos


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

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

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




 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fnqs5j6/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149173617/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 --
 *Links do Yahoo! Grupos*

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

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

 - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
 Serviço do Yahoo! http://br.yahoo.com/info/utos.html.




-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fidqb5a/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149176817/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs  



Links do Yahoo! Grupos


* Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
* Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, 

[delphi-br] Re: Mouse com Net Scrool

[Murillo Proença]

achei isso no google, não testei, vê aí se dá certo

Abraço

Murillo Proença

Insira um TApplicationEvents e no envento OnMessage insira o código 
abaixo:

var
i: SmallInt;
begin
if ( Msg.message = WM_MOUSEWHEEL ) then
begin
if ( ( Screen.ActiveForm.ActiveControl  nil ) and
( Screen.ActiveForm.ActiveControl.ClassName = 'TDBGrid' ) ) then
begin
Msg.message := WM_KEYDOWN;
Msg.lParam := 0;
i := HiWord(Msg.wParam);
if i  0 then
Msg.wParam := VK_UP
else
Msg.wParam := VK_DOWN;

Handled := False;
end;
end;
end;


(Obs.: Coloque isso no seu Form, Principal (Application) e funcionará 
em todo o sistema)


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

 Como faço para o Mouse com Net Scrool funcionar nas minhas
 
 aplicações Delphi 7.
 
 
 
 --
 No virus found in this outgoing message.
 Checked by AVG Free Edition.
 Version: 7.1.394 / Virus Database: 268.8.0/353 - Release Date: 
31/05/2006
 
 
 [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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Numeração de Página no Quick Rep ort

[DelphiStar]

 Olá Roberto, Bom Dia 
 Valeu pela sua colaboração 
 Tirei o 'PAGINA.: do TEXT de QRSysData
 e funcionou perfeitamente 
 Obrigado pela sua atençao
 Abraço
 Ademir

--

 Olá Ademir,
 
 É que no meu caso coloquei um QRLabel para a descrição ( Página.: ) e no
 QRSysData deixei a propriedade
 Text em branco.
 
 Roberto



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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Botões redondos... codigo fonte bo tão de bitmap´s...

[Luiz Escobar]

Valeu Anderson, eu uso o Delphi 7, e nele funcionou legal, mas valeu pela 
dica...
o código não era meu, apenas fiz algumas modificações que estava 
precisando...
como o disabled, e a imagem que cortava um pouco quando clicava... agora 
temos mais uma atualização...

valeu, e obrigado...

Luiz Escobar



- Original Message - 
From: Desenvolvimento (Anderson)
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 01, 2006 8:39 AM
Subject: Re: [delphi-br] Botões redondos... codigo fonte botão de 
bitmap´s...


Olá,

gostei do componente, mas tenho q adicionar uma observação:

estou usando o delphi 5. No 3 ele não aceitou... vou ver porque...
mas no delphi 5, depois q vc solta o botão, ele fica com a imagem rebocada, 
como se mostrasse as 2 imagens...
portanto, fiz uma melhoria no código, e com sua permissão, segue abaixo o 
que deve ser feito:

procedure TjvBitmapButton.MouseUp(Button: TMouseButton; Shift: TShiftState;
 X, Y: Integer);
begin
 inherited;
 FPushDown:=false;
 if Latching then
 FDown:= not FDown
 else
 FDown:=false;
 refresh;   ADICIONE ISSO!!! BY ANDERSON
 Paint;
 if assigned(onmouseup) then
 onmouseup(self,button,shift,x,y);
end;

 - Original Message - 
 From: Luiz Escobar
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, May 31, 2006 9:01 PM
 Subject: RES: [delphi-br] Botões redondos... codigo fonte botão de 
bitmap´s...



 bom sei que vc quer um botão redondo, e isso parece dificil.. bom aqui tem 
um exemplo de um botão
 feito atravez de um bitmap, qualquer bitmap vira um botão...
 ele cria o efeito de Lighter, quando passa o mouse encima, Darker, quando 
clica, acertei esta parte, comia um pedaçinho da imagem quando era justa, 
Disabled, (essa eu implementei, ehehhehe), quando vc disabilita o botão...
 talvez ajude...

 como não sabia o endereço postei o código
 se alguem gostar e implementar algo novo, posta ai

 Luiz Escobar



 //==
 //jvBitmapButton.pas
 // versão 2.1c modify by Luiz Escobar
 //---
 unit jvBitmapButton;

 interface

 uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, 
Dialogs;

 type
 TjvBitmapButton = class(TGraphicControl)
 private
 FBitmap: TBitmap;
 FLighter: TBitmap;
 FDarker: Tbitmap;
 FDisabled: Tbitmap; // by Luiz Escobar
 FPushDown:boolean;
 FMouseOver:boolean;
 FLatching: boolean;
 FDown: boolean;
 FHotTrack: boolean;
 Fenable: boolean; // by Luiz Escobar
 procedure SetBitmap(const Value: TBitmap);
 procedure MakeDarker;
 procedure MakeLighter;
 procedure MakeDisabled; // by Luiz Escobar
 procedure SetLatching(const Value: boolean);
 procedure SetDown(const Value: boolean);
 procedure SetHotTrack(const Value: boolean);
 function GetEnabled : Boolean; // by Luiz Escobar
 procedure SetEnabled( const Value: boolean); // by Luiz Escobar
 { Private declarations }
 protected
 { Protected declarations }
 procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: 
Integer);override;
 procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: 
Integer);override;
 procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
 procedure Click;override;
 procedure CMMouseLeave(var Message:TMessage); message CM_MouseLeave;
 procedure Loaded;override;
 procedure Resize;override;
 public
 { Public declarations }
 constructor Create(AOwner:TComponent);override;
 destructor Destroy;override;
 procedure Paint; override;
 published
 { Published declarations }
 property Bitmap:TBitmap read FBitmap write SetBitmap;
 property Down:boolean read FDown write SetDown;
 property Latching:boolean read FLatching write SetLatching;
 property HotTrack:boolean read FHotTrack write SetHotTrack;
 property Enable:boolean read GetEnabled write SetEnabled; // by Luiz 
Escobar
 property onclick;
 property onmousedown;
 property onmouseup;
 end;

 procedure Register;

 implementation

 procedure Register;
 begin
 RegisterComponents('ESC_UTIL', [TjvBitmapButton]);
 end;

 { TjvBitmapButton }

 function TjvBitmapButton.GetEnabled: boolean; // by Luiz Escobar
 begin
 result := enabled;
 end;

 procedure TjvBitmapButton.SetEnabled( const Value : boolean ); // by Luiz 
Escobar
 begin
 enabled := value;
 fenable := enabled;
 Paint;
 end ;

 procedure TjvBitmapButton.Click;
 begin
 inherited;
 if FPushDown then
 if assigned(onclick) then
 onclick(self);
 end;

 constructor TjvBitmapButton.Create(AOwner: TComponent);
 begin
 inherited;
 width:=24;
 height:=24;
 FPushDown:=false;
 FMouseOver:=false;
 FLatching:=false;
 FHotTrack:=true;
 FDown:=false;
 FBitmap:=TBitmap.create;
 Fbitmap.width:=24;
 Fbitmap.Height:=24;
 Fbitmap.canvas.brush.color:=clgray;
 FBitmap.canvas.FillRect (rect(1,1,23,23));
 FLighter:=Tbitmap.create;
 FDarker:=Tbitmap.create;
 FDisabled:=Tbitmap.create; // by Luiz Escobar
 Fenable := enabled; // by Luiz Escobar
 end;

 destructor 

Re: [delphi-br] chamada de um arquivo .chm apartir de um click do botão??

[Ailton Branco]

Funcionou perfeitamente, agradeço a ajuda


valeu um abraço



- Original Message - 
From: Anderson RB [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 01, 2006 8:21 AM
Subject: Re: [delphi-br] chamada de um arquivo .chm apartir de um click do 
botão??


 Application.HelpFile:='SeuHelp.hlp';
 Application.HelpCommand(parametros, 0);

 Parâmetros:
 HELP_CONTENTS - chama o arquivo de Help como se tivesse dado um 
 duplo-clique
 no arquivo .hlp
 HELP_FINDER - Chama o help a partir do menu Conteúdo.
 HELP_QUIT - Desativa o Help.
 - Original Message - 
 From: Ailton Branco [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, May 31, 2006 3:40 PM
 Subject: [delphi-br] chamada de um arquivo .chm apartir de um click do
 botão??


 fazer uma chamada de um arquivo .chm apartir de um click do botão??

 tenho um arquivo de help que funciona normalmente pela tecla F1 mas
 para me complicar o usuario quer que eu coloque um botao na tela e
 quando ele clicar o help aparece... como faço para chamar este aquivo
 apartir de um click do botao









 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE




 
 Links do Yahoo! Grupos

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

 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]

 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
 Serviço
 do Yahoo!.




 


 No virus found in this incoming message.
 Checked by AVG Free Edition.
 Version: 7.1.394 / Virus Database: 268.8.0/352 - Release Date: 30/05/2006



 ___
 Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
 Registre seu aparelho agora!
 http://br.mobile.yahoo.com/mailalertas/




 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos







 











-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Executar ALTER TABLE via IBQuery

[Eduardo Silva dos Santos]

antes de mais nada, mude o metodo Open; para execSQL; quanto a sintaxe
do comando, teste num editor sql do interbase pra ver se ta ok.

tente assim:

with dmtaltal.qryTal do
begin
 Close;
 SQL.Clear
 SQL.Add( 'ALTER TABLE BASE_IDENTIFICADOR DROP IDENTIFICADOR' );
 ExecSQL;
end;

onde IDENTIFICADOR é o nome do campo que vc deseja apagar..

boa sorte...


Em 01/06/06, troliveira_net [EMAIL PROTECTED] escreveu:

 Pessoal, estou tentando fazer um ALTER TABLE via componente IBQuery,
 mas não estou obtendo sucesso.
 Estou utilizando o seguinte comando:
 with dmtaltal.qryTal do
 begin
 Close;
 SQL.Clear
 SQL.Add('ALTER TABLE BASE_IDENTIFICADOR');
 SQL.Add('DROP '+chr(39)+'IDENTIFICADOR'+chr(39) );
 Open;
 end;

 Só que ele me retorna um erro: Token unknown -line2 char
 4 'IDENTIFICADOR''

 Alguém com mais experiência poderia me dizer aonde estou errando??? Ou
 não é possível fazer ALTER TABLE com componente IbQuery?? (certeza que
 dá né :-))

 Agradeço desde já a atenção dos colegas






 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos











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









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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Dúvida sobre isolamento transacional

[jader_ricarddo]

Amigos

Uso D7 + FB1.5 + IBX

Tenho uma dúvida sobre isolamento transacional. 
Se um usuário coloca o registro 10 em modo de edição na estação 1 e um 
outro usuário coloca o mesmo registro (10) em edição na estação dois. 
O usuário da estação 1 grava um valor x e o usuário da estação 2 grava 
o valor y, quando o usuário da estação 1 for consultar ele vai ver y e 
não x. Como vocês tratam este processo ?

Imagino que avisam ao usuário que o registro está sendo usado por 
outro usuário, mas, como fazem isso ?

Não sei se consegui me expressar, mas, qualquer ajuda é bem vinda.

Jader Ricardo









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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RE: [delphi-br] Delphi para Diagrama UML, é poss ível?

[Zote]

O que você quer dizer que tirar os diagramas?

--
José Henrique (Zote)

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Fellipe Henrique
Sent: quinta-feira, 1 de junho de 2006 13:10
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Delphi para Diagrama UML, é possível?

Valeu Andreano.. mas como eu tiro esses diagramas, fui lá e nao entendi
direito como funciona... :o(


[]s


Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:

 Sim

 

 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] 
 Em nome de Fellipe Henrique Enviada em: quinta-feira, 1 de junho de 
 2006 10:12

 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?



 Obrigado Andreano, no caso falha minha esqueci de dizer qual eu estou 
 mexendo... estou usando o architect... eh o mesmo procedimento? e 
 justaente, preciso desses tudo que você falou...
 []s


 Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:
 
 
  Fellipe,
 
  no Delphi Pro você faz diagrama de classe e no Enterprise todos os
 outros
  como: Use Case, Seguence, Collaboration, Component etc...
 
  É só clicar no Model View do Project Manager e selecionar a classe 
  ou
 com
  o botão direito para criar outros diagramas.
 
  []'s
  Andreano
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br em nome de Fellipe Henrique
  Enviada: qui 01/06/2006 08:29
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Delphi para Diagrama UML, é possível?
 
 
  Olá, estou utilizando o BDS2006 em meu projeto de conclusão de 
  curso,
 pois
  é
  necessário apresentar o UML do sistema no final do processo... eis 
  que
 vem
  minha pergunta, como faço isso no BDS2006? tenho q ter outro 
  programa
 pra
  vincular!?
 
  []s
 
  --
  _
  Fellipe Henrique
  [EMAIL PROTECTED]
 
  Borland Developer Studio 2006 Certified
 
  Venham até a borda, ele disse.
  Eles disseram: Nós temos medo.
  Venham até a borda, ele insistiu.
  Eles foram, Ele os empurrou...
  E eles voaram.
  (Guillaume Apollinaire)
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
 
  Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE
  
 
 http://br.ard.yahoo.com/SIG=12fenac2n/M=396559.7942981.9535540.2369893
 /D=brclubs/S=2137111264:HM/Y=BR/EXP=1149168701/A=3739190/R=0/id=noscri
 pt/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715D
 GC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category
 .aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 
 
 
  
 
  Links do Yahoo! Grupos
 
 
  * Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
 
  * Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED] mailto:
  [EMAIL PROTECTED]http://
  [EMAIL PROTECTED]/?subject=Unsubscribe
 
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! http://br.yahoo.com/info/utos.html .
 
 
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
  *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
  
 http://br.ard.yahoo.com/SIG=12fnqs5j6/M=396559.7942981.9535540.2369893
 /D=brclubs/S=2137111264:HM/Y=BR/EXP=1149173617/A=3739190/R=0/id=noscri
 pt/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715D
 GC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category
 .aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 

  --
  *Links do Yahoo! Grupos*
 
  - Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
 
  - Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
 [EMAIL PROTECTED]http://de
 [EMAIL PROTECTED]/?subject=Unsubscribe
 

 
  - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 


 --
 _
 Fellipe Henrique
 [EMAIL PROTECTED]

 Borland Developer Studio 2006 Certified

 Venham até a borda, ele disse.
 Eles disseram: Nós temos medo.
 Venham até a borda, ele insistiu.
 Eles foram, Ele os empurrou...
 E eles voaram.
 (Guillaume Apollinaire)


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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE
 
 http://br.ard.yahoo.com/SIG=12fidqb5a/M=396559.7942981.9535540.2369893
 /D=brclubs/S=2137111264:HM/Y=BR/EXP=1149176817/A=3739190/R=0/id=noscri
 pt/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715D
 GC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category
 .aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs



 

 Links do Yahoo! Grupos


 * Para visitar o site do seu grupo na web, acesse:
 

[delphi-br] Problemas com Arredondamento de Campo

[Rafael]

Bom dia Galera.

 

Seguinte, estou enfrentando um problema no firebird e não estou conseguindo
solucionar.

 

Estou desenvolvendo um sistema de restaurante, e

 

Eu tenho uma tabela de produtos, e nesta tabela eu tenho os seguintes
campos:

 

- PRODUTO – PK

- CATEGORIAPRODUTO = FK

- NOMEPRODUTO

- PRECOMEDIO

- QUANTIDADE

- LUCRO

- PRECOVENDA



O PRECOVENDA é um campo calculado pelo próprio banco que é PRECOVENDA +
((PRECOVENDA * LUCRO) / 100)

 

Ai eu tenho uma tabela com de Comandas e Itens Comanda

Dentro do Itens Comanda eu tenho 2 campos que podem ser relacionado ao
produto,

Que é o PRODUTO ou pode ser um SERVIÇO

 

Porem na hora que eu vou mostrar os dados na tela eu mostro a Quantidade
pedida do Produto ou Serviço o Valor Unitário e o Valor Total do Produto ou
Serviço

E Quando o a Quantidade é 1 por exemplo o meu registro fica assim

 

Produto 1

Quantidade 1

Valor Item 2,63

Valor Total 2,625

 

O meu campo de Quantidade é Numérico de 8,2 e o campos de valor é numérico
de 13,2

 

A minha select é esta:

 

select

 ic.QUANTIDADE,

 c.COMANDA,

 c.MESA,

 ic.SEQUENCIA,

 ic.SERVICO,

 ic.PRODUTO,

 

 case when ic.SERVICO is NULL then ic.PRODUTO

 when ic.SERVICO is NOT NULL then ic.SERVICO end as Produtos,

 

 case when ic.SERVICO is NULL then p.NOMEPRODUTO

 when ic.SERVICO is NOT NULL then s.DESCRICAOSERVICO end as Nome
Produto,

 

 case when ic.SERVICO is NULL then p.PRECOVENDA

 when ic.SERVICO is NOT NULL then s.PRECOVENDA end as Valor
Unitário,

 

 case when ic.SERVICO is NULL then p.PRECOVENDA * ic.QUANTIDADE

 when ic.SERVICO is NOT NULL then s.PRECOVENDA * ic.QUANTIDADE end
as Total Item,

 

 case when ic.SERVICO is NULL then 'Produto'

 when ic.SERVICO is NOT NULL then 'Serviço' end as Tipo Produto

 

from COMANDAS c

 

INNER JOIN ITENS_COMANDA ic ON ic.COMANDA = c.COMANDA

LEFT JOIN SERVICOS s ON s.SERVICO = ic.SERVICO

LEFT JOIN PRODUTOS p ON p.PRODUTO = ic.PRODUTO



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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Delphi para Diagrama UML, é possível?

[Fellipe Henrique]

Olá.. meu sistema ta pronto no bds2006, queria um diagrama de caso de uso e
tals.. sabe.. automatico, sem ter que ficar fazendo no Rational...

[]s


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] ReportPrinter PRO, erro, alguem sabe?

[André J . J - YAHOO]

estou com um problema na hora de escolher uma impressora que nao seja a padrao, clicando em SETUP


eu seto uma impressora da rede por exemplo, e quando dou OK, a antiga impressora AINDA FICA lá marcada, ele ignora a que eu escolhi nova..

alguem sabe o que pode ser??

alguma dll do windows de impressao talvez?

ps: nao é em todo sistema que ocorre, 98´s e a maioria dos xp´s e 2000´s nao acontece isso, só com alguns..

e com o mesmo sistema ainda... por isso leva a intender que algo fora do sistema de gestao em questao

uso DELPHI 3

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] C# ou Delphi.Net

[Marlon Franco da Costa]

OK, eu sei que este livro é comprado, é que ficou meio confusa a dica do
colega, por isso, fiz este comentário e solicitei o arquivo se é que ele
existia.

Sou favorável que devemos comprar o livro. Agradeço pela ajuda e
compreensão.

 

Marlon

 

 _ 

De: Andreano Lanusse [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 1 de junho de 2006 10:37
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] C# ou Delphi.Net

 

Marlon,

infelizmente não há venda do livro em formato eletrônico.

[]'s


 
Andreano Lanusse
System Engineer - Development Tools
Tel.: +55 (11) 2165-8000 / +55 (11) 8196-5912
[EMAIL PROTECTED] - www.borland.com.br
http://www.borland.com.br/ http://www.borland.com.br/  
Blogs: http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse 
Artigos: http://bdn.borland.com http://bdn.borland.com
http://bdn.borland.com/ http://bdn.borland.com/  

A Borland Software é líder mundial em soluções independentes de plataforma
para a Criação Otimizada de Software (Software Delivery Optimization),
auxiliando nossos clientes a transporem as barreiras atuais do
desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour
http://info.borland.com.br/delphitour 
http://info.borland.com.br/delphi http://info.borland.com.br/delphi  




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marlon Franco da Costa
Enviada em: quinta-feira, 1 de junho de 2006 10:16
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] C# ou Delphi.Net


Ei jovem se existe um arquivo do mencionado livro, gostaria de saber onde
esta o link para download.



Grato, 

Marlon





 _ 

De: Andreano Lanusse [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 31 de maio de 2006 18:34
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] C# ou Delphi.Net



Rodrigo 

olha esse livro
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx 
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx
http://blogs.borland.com/andreanolanusse/archive/2005/10/04/21577.aspx  

[]'s


 
Andreano Lanusse
System Engineer - Development Tools
Tel.: +55 (11) 2165-8000 / +55 (11) 8196-5912
[EMAIL PROTECTED] - www.borland.com.br
http://www.borland.com.br/ http://www.borland.com.br/
http://www.borland.com.br/ http://www.borland.com.br/   
Blogs: http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse 
http://blogs.borland.com/andreanolanusse
http://blogs.borland.com/andreanolanusse  
Artigos: http://bdn.borland.com http://bdn.borland.com
http://bdn.borland.com http://bdn.borland.com 
http://bdn.borland.com/ http://bdn.borland.com/ http://bdn.borland.com/
http://bdn.borland.com/   

A Borland Software é líder mundial em soluções independentes de plataforma
para a Criação Otimizada de Software (Software Delivery Optimization),
auxiliando nossos clientes a transporem as barreiras atuais do
desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour
http://info.borland.com.br/delphitour 
http://info.borland.com.br/delphitour
http://info.borland.com.br/delphitour  
http://info.borland.com.br/delphi http://info.borland.com.br/delphi
http://info.borland.com.br/delphi http://info.borland.com.br/delphi   




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rodrigo Mota
Enviada em: quarta-feira, 31 de maio de 2006 16:41
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] C# ou Delphi.Net


Valew galera.

vô ficar com o Delphi.Net mesmo..assim não preciso mudar de IDE...

não vi nenhum livro ref. a Delphi.Net só C# e VB...tem um curso

la na TDS de .NET, vô ver com Manuel Edesio.

abs.




On Wed, 31 May 2006 14:08:21 -0800, Juliano Carvalho - Folhamatic
[EMAIL PROTECTED] escreveu:

 De: Juliano Carvalho - Folhamatic [EMAIL PROTECTED]
 Data: Wed, 31 May 2006 14:08:21 -0800
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] C# ou Delphi.Net
 
 htmlbodyVB.Net, C# e Delphi.Net são todas excelentes, cada uma a sua
maneira.BRPra desenvolvimento .Net eu prefiro C#.BRBR- Original
Message - BRFrom: Rodrigo Mota [EMAIL PROTECTED]BRTo:
delphi-br@yahoogrupos.com.brBRSent: Wednesday, May 31, 2006 8:55
AMBRSubject: [delphi-br] C# ou Delphi.NetBRBRBR Oi
galera,BRBR eu ja desenvolvo na área Web em PHP, fiz até um curso de
.Net...usandoBR o maldito VB.NET não gostei como a galera do curso ja
conhecia VBe euBR era o unicoque gostava de C a professora
preferiu dar enfase em VB.NETBR faze o que!BRBR Estou para me
aprofundar mais na área .Net ja sou programador Delphi...BR não sou bam
bam bam...mas me viroquero aprenderBR .NET mas tenho sérias
dúvidas...C# ou Delphi.Net?BRBR alguém aí tem uma luz...prós e
contras...?BRBR abs.BRBR Rodrigo.BRBRBRBRBRBR
-- BR  

RES: [delphi-br] Delphi para Diagrama UML, é p ossível?

[Andreano Lanusse]

Como assim tirar?
 
Você clica no nome das units 2 vezes e irá abrir o diagrama.
 
Agora precisa saber uml para entender dos outros diagramas, www.uml.org
 
[]'s
 


Andreano Lanusse
System Engineer - Development Tools
http://info.borland.com.br/borcon Tel.: +55 (11) 2165 - 8000 / Mobile: +55 (11) 8196-5912 
http://info.borland.com.br/borcon [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ 
Blogs: http://blogs.borland.com/andreanolanusse
Artigos: http://bdn.borland.com http://bdn.borland.com/ 

A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour2006 http://info.borland.com.br/delphi http://info.borland.com.br/delphitour http://info.borland.com.br/delphi 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique
Enviada em: quinta-feira, 1 de junho de 2006 13:10
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?


Valeu Andreano.. mas como eu tiro esses diagramas, fui lá e nao entendi
direito como funciona... :o(


[]s


Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:

 Sim

 

 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
 nome de Fellipe Henrique
 Enviada em: quinta-feira, 1 de junho de 2006 10:12

 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?



 Obrigado Andreano, no caso falha minha esqueci de dizer qual eu estou
 mexendo... estou usando o architect... eh o mesmo procedimento? e
 justaente,
 preciso desses tudo que você falou...
 []s


 Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:
 
 
  Fellipe,
 
  no Delphi Pro você faz diagrama de classe e no Enterprise todos os
 outros
  como: Use Case, Seguence, Collaboration, Component etc...
 
  É só clicar no Model View do Project Manager e selecionar a classe ou
 com
  o botão direito para criar outros diagramas.
 
  []'s
  Andreano
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br em nome de Fellipe Henrique
  Enviada: qui 01/06/2006 08:29
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Delphi para Diagrama UML, é possível?
 
 
  Olá, estou utilizando o BDS2006 em meu projeto de conclusão de curso,
 pois
  é
  necessário apresentar o UML do sistema no final do processo... eis que
 vem
  minha pergunta, como faço isso no BDS2006? tenho q ter outro programa
 pra
  vincular!?
 
  []s
 
  --
  _
  Fellipe Henrique
  [EMAIL PROTECTED]
 
  Borland Developer Studio 2006 Certified
 
  Venham até a borda, ele disse.
  Eles disseram: Nós temos medo.
  Venham até a borda, ele insistiu.
  Eles foram, Ele os empurrou...
  E eles voaram.
  (Guillaume Apollinaire)
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
 
  Yahoo! Grupos, um serviço oferecido por:
  PUBLICIDADE
  
 
 http://br.ard.yahoo.com/SIG=12fenac2n/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149168701/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 
 
 
  
 
  Links do Yahoo! Grupos
 
 
  * Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
 
  * Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED] mailto:
  [EMAIL PROTECTED]http://[EMAIL PROTECTED]/?subject=Unsubscribe
 
 
  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! http://br.yahoo.com/info/utos.html .
 
 
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
  *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
  
 http://br.ard.yahoo.com/SIG=12fnqs5j6/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149173617/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 

  --
  *Links do Yahoo! Grupos*
 
  - Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/
 
  - Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
 [EMAIL PROTECTED]http://[EMAIL PROTECTED]/?subject=Unsubscribe
 

 
  - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! http://br.yahoo.com/info/utos.html.
 
 


 --
 _
 Fellipe Henrique
 [EMAIL PROTECTED]

 Borland Developer Studio 

RES: [delphi-br] Delphi para Diagrama UML, é p ossível?

[Andreano Lanusse]

Para criar um diagrama de caso de uso (Uso Case) clica com o botão direito no root do model view e seleciona New Diagram.
 
[]'s


Andreano Lanusse
System Engineer - Development Tools
http://info.borland.com.br/borcon Tel.: +55 (11) 2165 - 8000 / Mobile: +55 (11) 8196-5912 
http://info.borland.com.br/borcon [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ 
Blogs: http://blogs.borland.com/andreanolanusse
Artigos: http://bdn.borland.com http://bdn.borland.com/ 

A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour2006 http://info.borland.com.br/delphi http://info.borland.com.br/delphitour http://info.borland.com.br/delphi 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique
Enviada em: quinta-feira, 1 de junho de 2006 13:50
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?


Olá.. meu sistema ta pronto no bds2006, queria um diagrama de caso de uso e
tals.. sabe.. automatico, sem ter que ficar fazendo no Rational...

[]s


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fktqjsl/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149190295/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs  



Links do Yahoo! Grupos


* Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
* Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Alguem tem ainda o link para assistir on line a Borland Tour

[Andrei Luís]

http://bdn.borland.com/article/33495


Uma dica: você pode pesquisar no site do Yahoo Grupos pelas mensagens
anteriores.

[]
Andrei

Em 01/06/06, Anderson Furtilho[EMAIL PROTECTED] escreveu:
 Olá amigos

 alguém tem o link onde podemos assistir a Borland
 Tour, acho que foi postado pelo Andreano.

 Um abraço

 Anderson






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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: [delphi-br] Alguem tem ainda o link para assistir on line a Borland Tour

[Andreano Lanusse]

No artigo tem o link.
 
Está escrito clique aqui em negrito
 
[]'s


Andreano Lanusse
System Engineer - Development Tools
http://info.borland.com.br/borcon Tel.: +55 (11) 2165 - 8000 / Mobile: +55 (11) 8196-5912 
http://info.borland.com.br/borcon [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ 
Blogs: http://blogs.borland.com/andreanolanusse
Artigos: http://bdn.borland.com http://bdn.borland.com/ 

A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio. 

 http://info.borland.com.br/delphitour2006 http://info.borland.com.br/delphi http://info.borland.com.br/delphitour http://info.borland.com.br/delphi 




De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andrei Luís
Enviada em: quinta-feira, 1 de junho de 2006 15:08
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Alguem tem ainda o link para assistir on line a Borland Tour


http://bdn.borland.com/article/33495


Uma dica: você pode pesquisar no site do Yahoo Grupos pelas mensagens
anteriores.

[]
Andrei

Em 01/06/06, Anderson Furtilho[EMAIL PROTECTED] escreveu:
 Olá amigos

 alguém tem o link onde podemos assistir a Borland
 Tour, acho que foi postado pelo Andreano.

 Um abraço

 Anderson


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fki1mhs/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149192700/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs  



Links do Yahoo! Grupos


* Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
* Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Re: Controlando o Explorer

[relsi_maron]

Valeu pela força Anderson, vou testar hj a noite, um abraço!
Relsi Hur







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

 Amigo segue o Codigo abaixo
 
 procedure TForm1.Timer1Timer(Sender: TObject);
 Var
 WindowName : array[0..MAX_PATH] of char;
 H: THandle;
 begin
 GetWindowText(GetForegroundWindow,WindowName,MAX_PATH);
 Memo1.Lines.Add(WindowName);
 end;
 
 Para voce poder testar essa implementacao ai, coloque um Timer e no 
evendo 
 onTimer coloque o codigo acima, coloque tb um Memo no sue programa, 
como 
 imagino que seu programa ficara oculto ou ao lado do relogio, basta 
voce 
 minimizar ele e ele funcionara da maneira que voce quer...
 
 O primeiro parametro de GetWindowText, GetForeGroundWindow diz que 
é para 
 pegar a janela ativa, neste parametro, voce poderia trocar apenas 
pelo do 
 Internet Explorar, mas tem que passar o handle do aplicativo, ai 
complica em 
 mais algumas linhas de codigo... mas essa solucao acima ja 
ajuda..
 
 - Original Message - 
 From: relsi_maron [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, May 31, 2006 5:39 PM
 Subject: [delphi-br] Controlando o Explorer
 
 
 
 Olá pessoal,
 
 Eu gostaria de saber o seguinte, qual a maneira de implementar um
 programa que rode em background, e quando o Internet Explorer for
 iniciado ele leia o que está escrito na barra de título do mesmo, e
 caso encontre no título a palavra 'Sexo', por exemplo, ele feche o
 navegador.
 
 O que estou tentando implementar é um aplicativo que monitore se a
 pessoa está navegando em uma categoria de sites não permitidos.
 
 Era isso, se alguém puder dar uma força, eu agradeço de antemão.
 
 Um abraço
 
 Relsi Hur
 
 
 
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 
 
 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE
 
 
 
 
 

 Links do Yahoo! Grupos
 
 a.. Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
 
 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]
 
 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos 
do Serviço 
 do Yahoo!.
 
 
 
 
 

 
 
 No virus found in this incoming message.
 Checked by AVG Free Edition.
 Version: 7.1.394 / Virus Database: 268.7.4/351 - Release Date: 
29/05/2006
 
 
   
 ___ 
 Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no 
celular e anti-spam realmente eficaz. 
 http://mail.yahoo.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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] DBGrid - Hint de acordo com campo selecionado

[Joao Paulo EsPyl]

Gostaria de saber como exibir um hint com dados advindos de um determinado campo selecionado em um dbgrid.

Ex.: Tenho vários registros em um DBGrid com minhas contas correntes, onde tem os seguintes dados: CDCTACOR, DSCTACOR, NRCTACOR, CDBANCO, CDAGENCIA.

Quero que quando o cliente click no campo cdagencia de uma das contas correntes, o hint busca na tabela agencia os dados da agencia e mostre no hint. 

O meu proble é pegar justamente o conteudo do campo CDAGENCIA do determinado registro.

Obrigado.


_
 João Paulo Pyl
EsPyl Informática e Sistemas S/C Ltda
Sistemas para Gestão Pública
Site: www.espyl.com.br
Cascavel - Paraná
FoneFax: (45) 3224-7328

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] backup db2

[bene20032004]

Pessoal, o db2 esta fazendo backup nesta pasta com este nome
CATN\01062006\020424.001
Como eu faria para voltar este backup em um outro computador para 
testar se o backup este funcionando mesmo ou não ?
Muito obrigado por enquanto ! 











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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] Delphi para Diagrama UML, é possível?

[Fellipe Henrique]

Vixi cara.. como uma coisa simples passa despecebido neh!? agora sim..
percebi que nao tem como imprimir, e eu consegui exportar pra html.. nao
seria possivel exportar pra doc nao!? aih eh pedir d+ neh?!

[]s


Em 01/06/06, Andreano Lanusse [EMAIL PROTECTED] escreveu:

 Para criar um diagrama de caso de uso (Uso Case) clica com o botão
 direito no root do model view e seleciona New Diagram.


 []'s


 Andreano Lanusse
 System Engineer - Development Tools
 http://info.borland.com.br/borcon Tel.: +55 (11) 2165 - 8000 / Mobile:
 +55 (11) 8196-5912
 http://info.borland.com.br/borcon [EMAIL PROTECTED] -
 www.borland.com.br http://www.borland.com.br/
 Blogs: http://blogs.borland.com/andreanolanusse
 Artigos: http://bdn.borland.com http://bdn.borland.com/

 A Borland Software é líder mundial em soluções independentes de plataforma
 para a Criação Otimizada de Software (Software Delivery Optimization),
 auxiliando nossos clientes a transporem as barreiras atuais do
 desenvolvimento, para maximizar o valor do software para seu negócio.

 http://info.borland.com.br/delphitour2006 
 http://info.borland.com.br/delphi http://info.borland.com.br/delphitour
 http://info.borland.com.br/delphi


 

 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
 nome de Fellipe Henrique
 Enviada em: quinta-feira, 1 de junho de 2006 13:50

 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Delphi para Diagrama UML, é possível?


 Olá.. meu sistema ta pronto no bds2006, queria um diagrama de caso de uso
 e
 tals.. sabe.. automatico, sem ter que ficar fazendo no Rational...

 []s


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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






 Yahoo! Grupos, um serviço oferecido por:
 PUBLICIDADE
 
 http://br.ard.yahoo.com/SIG=12fktqjsl/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149190295/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs



 

 Links do Yahoo! Grupos


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

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

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




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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





 *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
 http://br.ard.yahoo.com/SIG=12fdcolra/M=396559.7942981.9535540.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1149192576/A=3739190/R=0/id=noscript/SIG=154dcqslu/*http://lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BADGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
 --
 *Links do Yahoo! Grupos*

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

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

 - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
 Serviço do Yahoo! http://br.yahoo.com/info/utos.html.




-- 
_
Fellipe Henrique
[EMAIL PROTECTED]

Borland Developer Studio 2006 Certified

Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram.
(Guillaume Apollinaire)


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RE: [delphi-br] DBGrid - Hint de acordo com campo selecionado

[Eduardo Alves]

No onDrawColumnCell verifique o campo selecionado e faça a mudança do hint.

 
 
Eduardo Castro Alves
Analista de Sistemas

-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Joao Paulo EsPyl
Sent: quinta-feira, 1 de junho de 2006 15:31
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] DBGrid - Hint de acordo com campo selecionado

Gostaria de saber como exibir um hint com dados advindos de um determinado campo selecionado em um dbgrid.

Ex.: Tenho vários registros em um DBGrid com minhas contas correntes, onde tem os seguintes dados: CDCTACOR, DSCTACOR, NRCTACOR, CDBANCO, CDAGENCIA.

Quero que quando o cliente click no campo cdagencia de uma das contas correntes, o hint busca na tabela agencia os dados da agencia e mostre no hint. 

O meu proble é pegar justamente o conteudo do campo CDAGENCIA do determinado registro.

Obrigado.


_
 João Paulo Pyl
EsPyl Informática e Sistemas S/C Ltda
Sistemas para Gestão Pública
Site: www.espyl.com.br
Cascavel - Paraná
FoneFax: (45) 3224-7328

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 








-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [trabalho] [delphi-br] backup db2

[JGodoi]

Pessoal,


Tenho um problema que persiste a algum tempo,...
Vez ou outra tenho que importar dados de arquivos texto, dbf, excel,...etc. para o firebird 1.5
O que acontece é que nunca posso importar quantidades de registros maiores que 800 por vez pq dá estouro de memória.

Uso comando básicos dentro de um while do tipo:


 IBDataset1.Open;
 IBDataset1.Insert;
 IBDataSet1NOME.AsString:=nome;
 IBDataSet1CGC.AsString:=cnpj;
 IBDataSet1.Post;
 DM1.IBTransaction1.CommitRetaining;



O que posso fazer para resolver isso ? Alguma sugestão ?


Grato,


JGodoi

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: RES: [delphi-br] [Fora do tópico] Delphi 2006 na caixa e no plástico

[Welson Avelar]

--- Filipe Xavier Ramalho [EMAIL PROTECTED] escreveu:
(...)
80% da população americana ou européia não tem receita superior a US$
8.000,00 mensais, os salários são compatíveis com o custo de vida de cada
local, mas não são exagerados.
(...)

[--x--]

[Welson] Bom, na verdade, a renda per capita no Brasil é de aproximadamente US$
8.000 http://pt.wikipedia.org/wiki/Brasil. De EUA e UE são, respectivamente
(valor aproximado), US$ 42.000
http://pt.wikipedia.org/wiki/Estados_Unidos e € 22.000
http://pt.wikipedia.org/wiki/Uniao_europeia

Ou seja, uma política de preços pra essas localidades é muito diferente da que
deveria ser aplicada aqui.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=

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






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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Decompor Expressão Matemática

[Edilson Gonçalves]

Amigos,

Estou com o seguinte problema: Tenho armazenado no Banco de Dados como uma
string uma expressão matemática, como por exemplo: (100 * 25)/100, INCLUSIVE
COM OS PARENTESES.


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Decompor Expressão Matemática

[Edilson Gonçalves]

Amigos,

Estou com o seguinte problema: Tenho armazenado no banco de bancos em campo
do tipo VARCHAR, uma expressão matemática. Como por exemplo: (100 * 30)/12,
INCLUSIVE COM OS PARENTESES.
O que preciso é: buscar no banco de dados esta expressão e atribuir o seu
resultado a um campo TEdit. Mas nao estou conseguindo converter a string
para que a mesma seja executada.

Se puderem ajudar, agradeço.


Edilson Gonçalves
PlanejarSistemas Ltda
São Gotardo - Minas Gerais


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Usuário Diferente - Quase Lá

[Benn Yahoo]

Camaradas, 

Eu implementei o exemplo, e funcionou sem problemas, uma aplicação chama a outra que roda como um outro usuário.
Duas questões ainda permanecem:
Como rodar o próprio programa, e não chamar outro?
Se crio dois programas (um chamando o outro) o primeiro programa só fecha depois que fechar o segundo!

Será que não tem como fazer isso com threads? 
Será que não dá para colocar isso na dpr?
Alguém consegue implementar isso?

Um Abração,
Benn

//
Abaixo o Exemplo:

unit UFrmStarter;
interface
uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls;
type
 TFrmStarter = class(TForm)
 Button1: TButton;
 EdUser: TEdit;
 EdPassword: TEdit;
 EdPath: TEdit;
 procedure Button1Click(Sender: TObject);
 private
 { Private declarations }
 public
 { Public declarations }
 end;
var
 FrmStarter: TFrmStarter;
implementation
{$R *.dfm}
function CreateProcessWithLogonW(
 lpUsername,
 lpDomain,
 lpPassword:PWideChar;
 dwLogonFlags:dword;
 lpApplicationName: PWideChar;
 lpCommandLine: PWideChar;
 dwCreationFlags: DWORD;
 lpEnvironment: Pointer;
 lpCurrentDirectory: PWideChar;
 const lpStartupInfo: tSTARTUPINFO;
 var lpProcessInformation: TProcessInformation
 ): BOOL; stdcall; external 'advapi32.dll';

function RunAsUser(const Filename, Domain, Username, Password: string):Boolean;
var
 StartupInfo: TStartupInfo;
 ProcessInfo: TProcessInformation;
 wFilename, wDomain, wUsername, wPassword: PWideChar;
begin
 FillChar (StartupInfo, SizeOf(StartupInfo), #0);
 StartupInfo.cb := SizeOf(StartupInfo);
 StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
 StartupInfo.wShowWindow := SW_SHOWNORMAL;

 GetMem(wFilename, Length(Filename) * SizeOf(WideChar) + SizeOf(WideChar));
 GetMem(wDomain, Length(Domain) * SizeOf(WideChar) + SizeOf(WideChar));
 GetMem(wUsername, length(Username) * SizeOf(WideChar) + SizeOf(WideChar));
 GetMem(wPassword, length(Password) * SizeOf(WideChar) + SizeOf(WideChar));
 StringToWideChar(Filename, wFilename, Length(Filename) * SizeOf(WideChar) + SizeOf(WideChar));
 StringToWideChar(Domain, wDomain, Length(Domain) * SizeOf(WideChar) + SizeOf(WideChar));
 StringToWideChar(Username, wUsername, Length(Username) * SizeOf(WideChar) + SizeOf(WideChar));
 StringToWideChar(Password, wPassword, Length(Password) * SizeOf(WideChar) + SizeOf(WideChar));
 Result := CreateProcessWithLogonW(wUsername,wDomain,wPassword,0,wFilename,nil,0,nil,nil,StartupInfo,ProcessInfo);
 if Result then
 begin
 WaitForSingleObject(ProcessInfo.hProcess, INFINITE);
 CloseHandle(ProcessInfo.hProcess);
 CloseHandle(ProcessInfo.hThread);
 end
 else
 RaiseLastOSError
 {end if};
 FreeMem(wFilename);
 FreeMem(wDomain);
 FreeMem(wUsername);
 FreeMem(wPassword);
end;
procedure TFrmStarter.Button1Click(Sender: TObject);
begin
 RunAsUser(EdPath.Text,'',EdUser.Text,EdPassword.Text);
end;
end.



- Original Message - 
From: Benn Yahoo 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, June 01, 2006 1:58 PM
Subject: Fw: Usuário Diferente - Uma Luz no fim do túnel 3


http://coding.derkeiler.com/Archive/Delphi/borland.public.delphi.nativeapi/2003-12/0427.html
- Original Message - 

Camaradas

A um tempo eu enviei uma questão pra lista, porém ninguém respondeu, pedi alguma dica, mas ninguém respondeu, agora achei uma pista. Será que alguém consegue implementar isso em delphi? 
Acho que isso vai ser muito útil para o pessoal que desenvolve sistemas em rede, ou seja quase todos.
O link para dar uma olhada é:
http://msdn.microsoft.com/library/default.asp?url="">

Um Abração,
Benn 

- Original Message - 
No WinXP eu posso executar criar um atalho e executar o programa com uma credencial diferente (Como outro usuário), para poder ter acesso à pastas que o usuário logado não tem acesso. Até aqui, muito bom, funcionou! 
Agora a naba
Não tem a opção para salvar o usuário e a senha da credencial, e também não sei se ao fazer isso o usuário tendo a credencial salva no computador poderia acessar a pasta diretamente do explorer, uma vez que ficaria disponível pelo sistema. 
Alguém sabe se existe alguma forma de fazer isso pelo programa? Para que ele use um usuário e senha do windows diferente do que ele está logado, e que não faça com que ele possa acessar esta pasta diretamente pelo explorer

Valeu a força,
Benn


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso 

[delphi-br] Fw: Usuário Diferente - Quase Lá 2

[Benn Yahoo]

trocando-se
WaitForSingleObject(ProcessInfo.hProcess, INFINITE);
por
WaitForSingleObject(ProcessInfo.hProcess, 1000);
Ele fecha o programa sem esperar terminar o outro que foi executado a partir do primeiro.


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] RE: CRIAR FORM DINAMICAMENTE !!! RESOLVIDO !!!

[Flavio]

Olá de novo pessoal,

Felizmente descobri o erro...

OBRIGADO

Flávio

  
-
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora!

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










-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [trabalho] [delphi-br] backup db2

[Danilo Valente]

Mande a sua rotina completa que aí fica mais fácil dizer... Deve ter algum 
vazamento de memória acontecendo...

Danilo Valente

- Original Message - 
From: JGodoi [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 01, 2006 5:35 PM
Subject: Re: [trabalho] [delphi-br] backup db2


Pessoal,


Tenho um problema que persiste a algum tempo,...
Vez ou outra tenho que importar dados de arquivos texto, dbf, excel,...etc. 
para o firebird 1.5
O que acontece é que nunca posso importar quantidades de registros maiores 
que 800 por vez pq dá estouro de memória.

Uso comando básicos dentro de um while do tipo:


 IBDataset1.Open;
 IBDataset1.Insert;
 IBDataSet1NOME.AsString:=nome;
 IBDataSet1CGC.AsString:=cnpj;
 IBDataSet1.Post;
 DM1.IBTransaction1.CommitRetaining;



O que posso fazer para resolver isso ? Alguma sugestão ?


Grato,


JGodoi

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos



















-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Utilizando o XMLDocEmail

[bsilvaweb]

Olá!!

Estou com um pequeno probleminha ao utilizar o componente XMLDocEmail 
para envio de email.

Pois bem, criei um aplicativo de envio de email, onde o usuario 
preenche os campos corretamente e etc...
O arquivo XML e para configuracao com SMTP e POP3, dados esses que sao 
gravados no momento do envio do email pelo usuario.

O meu problema é, uma vez o arquivo já criado, quando o usuario manda 
outro email , da erro com a seguinte mensagem:
 
  ONLY ONE TOP LEVEL ELEMENT IS ALLOWED IN A XML DOCUMENT 













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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Fw: Usuário Diferente - Uma Luz no fim do túnel 2

[Benn Yahoo]

http://www.swissdelphicenter.ch/torry/showcode.php?id=1689
- Original Message - 
From: Benn Yahoo 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, June 01, 2006 1:53 PM
Subject: Usuário Diferente - Uma Luz no fim do túnel


Camaradas

A um tempo eu enviei uma questão pra lista, porém ninguém respondeu, pedi alguma dica, mas ninguém respondeu, agora achei uma pista. Será que alguém consegue implementar isso em delphi? 
Acho que isso vai ser muito útil para o pessoal que desenvolve sistemas em rede, ou seja quase todos.
O link para dar uma olhada é:
http://msdn.microsoft.com/library/default.asp?url="">

Um Abração,
Benn 

- Original Message - 
No WinXP eu posso executar criar um atalho e executar o programa com uma credencial diferente (Como outro usuário), para poder ter acesso à pastas que o usuário logado não tem acesso. Até aqui, muito bom, funcionou! 
Agora a naba
Não tem a opção para salvar o usuário e a senha da credencial, e também não sei se ao fazer isso o usuário tendo a credencial salva no computador poderia acessar a pasta diretamente do explorer, uma vez que ficaria disponível pelo sistema. 
Alguém sabe se existe alguma forma de fazer isso pelo programa? Para que ele use um usuário e senha do windows diferente do que ele está logado, e que não faça com que ele possa acessar esta pasta diretamente pelo explorer

Valeu a força,
Benn


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [trabalho] [delphi-br] backup db2

[Eduardo Silva dos Santos]

mostra exatamente o o seu código, pelo que vi abaixo, deixar o open dentro
do while pode causar isso. o ideal seria:

 IBDataset1.Open;
 while not TblOrigen.Eof do begin
 IBDataset1.Insert;
 IBDataSet1NOME.AsString:=nome;
 IBDataSet1CGC.AsString:=cnpj;
 IBDataSet1.Post;
 end;
 IBDataset1.Close;
 DM1.IBTransaction1.CommitRetaining;


tenta assim pra ver...


Em 01/06/06, JGodoi [EMAIL PROTECTED] escreveu:

 Pessoal,


 Tenho um problema que persiste a algum tempo,...
 Vez ou outra tenho que importar dados de arquivos texto, dbf,
 excel,...etc. para o firebird 1.5
 O que acontece é que nunca posso importar quantidades de registros maiores
 que 800 por vez pq dá estouro de memória.

 Uso comando básicos dentro de um while do tipo:


 IBDataset1.Open;
 IBDataset1.Insert;
 IBDataSet1NOME.AsString:=nome;
 IBDataSet1CGC.AsString:=cnpj;
 IBDataSet1.Post;
 DM1.IBTransaction1.CommitRetaining;



 O que posso fazer para resolver isso ? Alguma sugestão ?


 Grato,


 JGodoi

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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos










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









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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] [ODBC URGENTE] ODBC em tempo de excução com firebird

[Gustavo Sequeira]

Boa tarde pessoal, gostaria de saber com faço para conexoes ODBC com drivers
firebird em tempo de excucao

-- 
Gustavo Sequeira
Analista de Sistemas
IEADPE - Igreja Assembléia de Deus / Pernambuco
Respondeu-lhe Jesus Cristo: Eu sou o caminho, e a verdade, e a vida;
ninguém vem ao Pai, senão por mim.


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] Componente LED

[Arthur Souza]

Ola pessoal, baixei um unit de um componente tLed, obviamente me cria um led
em minha alicalção ... Pois já o importei para meu projeto mas não consegui
utilizá-lo e trá zelo para modo visual ...como criar ester obketo de forma
que possa visualizar em minha form?o código do constutor segue abaixo:

--

constructor TLEDR.Create(AOwner: TComponent);
 begin
 inherited Create(AOwner);
{ If this is the first LED then create the LED Bitmap and List object }
 if LEDBitmap = nil then LEDBitmap := TLEDBitmap.Create;
 LEDBitmap.LED_LIST.Add(Self); { Add this new LED instance to the list }
 fLit := False; { Default = not Lit }
 fColor := lcRed; { Default = clRed }
 ControlStyle := ControlStyle + [csOpaque] + [csDoubleClicks]
 + [csFixedHeight] + [csFixedWidth];
end;


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] DBImage com VCLSkin

[Bruno]

Pessoal, estou com dificuldades para exibir uma imagem usando DBImage 
com o componente VCLSkin, alguem sabe como fazer, porque até agora não 
consegui e toda ajuda é bem vinda.
Obrigado.
bruno Rafael









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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] StringGrid

[Ilton Vieira Junior]

Boa Noite a todos.

Pessoal, estou desenvolvendo um projeto onde necessito de vários 
StringGrid ou algo parecido. Porém gostaria de cria-los em tela em tempo 
de execução. Isso se faz necessário, pois preciso que cada um dos 
StringGrids funcionacem como uma especie de linha mestre, pode poderia 
incluir outras N linhas e colunas, mantendo um titulo para cada coluna, 
dentro dessa linha mestre.
Ex
Primeira LinhaGrupo, uma coluna e uma linha
Segunda LinhaGrupo, duas colunas e cinco linhas,

Assim, poir diante. Porém gostaria que isso fosse dinamico, como uma 
especie de Array de StringGrid.
Em memória teria que criar um Array, porem como coloco isso na tela???

Um Grid que possua essas caracteristicas, também é bem vindo.

Obrigado,

Ilton







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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] DBExpress x ADO x BDE

[Rodrigo Mota]

Oi galera

A parada é a seguinte...

Como estou montando uma apresentação sobre o tema do Assunto
Para convencer um pessoal Xiita aqui...de que o DBExpress é melhor

Alguém tem algum material de apresentação dos beneficios do DBExpress
Prós e contras..comparação com outras tecnologias de acesso a dados,
Se alguém tiver algo para eu complementar com minha apresentação eu 
Já agradeço de antemão.

Abs.

Rodrigo Mota.







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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RES: RES: [delphi-br] [Fora do t ópico] Delphi 2006 na caixa e no plástico

[Filipe Xavier Ramalho]

Welson,

Esta renda é annual, ou seja, americanos tem uma média de rendimento de US$ 3.500,00 de salário, bem diferente dos 8000 que havia sido mencionado. Isto não é tão exagerado nem para os padrões de um bom analista no Brasil, que dirá para uma empresa.

Att,

Filipe

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Welson Avelar
Enviada em: quinta-feira, 1 de junho de 2006 18:06
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] [Fora do tópico] Delphi 2006 na caixa e no plástico

--- Filipe Xavier Ramalho [EMAIL PROTECTED] escreveu:
(...)
80% da população americana ou européia não tem receita superior a US$
8.000,00 mensais, os salários são compatíveis com o custo de vida de cada
local, mas não são exagerados.
(...)

[--x--]

[Welson] Bom, na verdade, a renda per capita no Brasil é de aproximadamente US$
8.000 http://pt.wikipedia.org/wiki/Brasil. De EUA e UE são, respectivamente
(valor aproximado), US$ 42.000
http://pt.wikipedia.org/wiki/Estados_Unidos e € 22.000
http://pt.wikipedia.org/wiki/Uniao_europeia

Ou seja, uma política de preços pra essas localidades é muito diferente da que
deveria ser aplicada aqui.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=

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


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 




-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.394 / Virus Database: 268.8.0/353 - Release Date: 31/5/2006
 








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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: RES: [delphi-br] Gerar PDF

[Marcelo Alves]

Ronaldo,

Instalei o componente, ele criou uma paleta chamada Util que tem um
componente chamado PDFDocument. Como uso ele com o Quickreport?


Em 24/05/06, Ronaldo Sousa [EMAIL PROTECTED] escreveu:

 pegue o componente pdf em http://www.imperasystem.com.br/net/pdf.zip ele
 vai com fonte.
 ele adiciona um componente no QR


 ronperso




 Yahoo! Grupos, um serviço oferecido por:





 PUBLICIDADE

 Links do Yahoo! Grupos

 Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
 Para sair deste grupo, envie um e-mail
 para:[EMAIL PROTECTED]
 O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
 Yahoo!.
 _
 MSN Busca: fácil, rápido, direto ao ponto.
 http://search.msn.com.br

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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos











-- 
Marcelo A. 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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: RES: [delphi-br] [Fora do tópico] Delphi 2006 na caixa e no plástico

[Welson Avelar]

--- Valfrid-Ly Silva Couto [EMAIL PROTECTED] escreveu:
Welson,

Em uma parte eu tenho que discordar. O que você compra é uma licensa de uso do
software, não o software em si. Essa licensa vem acompanhada de manual e mídia
para instalação, coisas essas que te pertencem. Se você quiser, pelas leis
brasileiras você pode vendê-las, porém ao aceitar a licensa você está
concordando com os termos da Borland e portanto não pode repassar a licensa de
uso para outra pessoa.
[--x--]

[Welson] Mas tipo, o que é licença de uso ? É algo abstrato certo !?
E o cd/dvd é algo concreto. Sendo assim, isso é meu também, e posso sim fazer o
que quiser com ele, uai.

[]s.

=
O que me preocupa não é o grito dos maus. É o silêncio dos bons.
Martin Luther King.
=
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=

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






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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] LEIA ATE O FINA.... MUITO BOA

[ELIO BONA]

 
MUITO BOA, VALE A PENA RIR UM POUCO. AFINAL...!

Um caboclo do interior, bem do interior mesmo, tinha o melhor touro da região. 
O touro era seu único patrimônio. 
Os fazendeiros locais descobriram que o tal touro era o melhor animal reprodutor das redondezas, e começaram a alugar o bicho para cruzar com suas vacas, pois com esse touro, sempre nasciam os melhores bezerros. Era só colocar uma vaca perto dele e o touro não perdoava uma. 
O único sustento do cabloco vinha da posse desse touro. 
Os fazendeiros da região se reuniram e decidiram comprar o touro. 
Um representante foi escolhido e foi até a casa do caboclo falar com o mesmo e sua esposa: 
- Põe preço no seu bicho que vamos comprá-lo! 
O caboclo, aproveitando a situação, falou um preço absurdo. 
Os fazendeiros não aceitaram a proposta e foram se queixar com o prefeito da cidade. 
Este, sensibilizado com o problema, comprou o animal com o dinheiro da prefeitura, o registrou como patrimônio da cidade, e resolveu fazer uma festa para apresentar o touro para a população. 
No dia da festa os fazendeiros trouxeram suas vacas para o touro cobrir, afinal, seria tudo de graça. 
Na hora da primeira vaca, o touro esbravejou, pulou, cheirou a vaca e nada! 
- Deve ser culpa da vaca - disse um fazendeiro. - Ela é muito magra! 
Trouxeram uma vaca holandesa, a mais bonita da região. 
O touro esbravejou, pulou, cheirou a vaca e nada! 
O prefeito, puto da vida, chamou o ex-dono do animal e lhe perguntou o que estava acontecendo. 
- Não sei... - disse o caboclo. - Ele nunca fez isso antes! Deixa que eu vou conversar com o touro. 
E o caboclo, aproximando-se do bicho, foi logo perguntando: 
- O que há com você? Não tá mais a fim de trabalhar? 
E o touro, dando uma espreguiçada, respondeu: 
- Não me enche o saco! Agora eu sou funcionário público... 


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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

RE: [delphi-br] Utilizando o XMLDocEmail

[Rubem Nascimento da Rocha]

XMLDocEmail??? Que componente é esse???
Sds.

From: bsilvaweb [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Utilizando o XMLDocEmail
Date: Thu, 01 Jun 2006 19:07:49 -

Olá!!

Estou com um pequeno probleminha ao utilizar o componente XMLDocEmail
para envio de email.

Pois bem, criei um aplicativo de envio de email, onde o usuario
preenche os campos corretamente e etc...
O arquivo XML e para configuracao com SMTP e POP3, dados esses que sao
gravados no momento do envio do email pelo usuario.

O meu problema é, uma vez o arquivo já criado, quando o usuario manda
outro email , da erro com a seguinte mensagem:

  ONLY ONE TOP LEVEL ELEMENT IS ALLOWED IN A XML DOCUMENT 








_
MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] DBExpress x ADO x BDE

[Eduardo Silva dos Santos]

DbExpress é melhor que ADO e BDE sim, mas vc usar acesso nativo ainda é
melhor que DBExpress, Zeos por exemplo é uma ótima tecnologia, pois
trabalho direto com as bibliotecas de cada banco.

Em 01/06/06, Rodrigo Mota [EMAIL PROTECTED] escreveu:

 Oi galera

 A parada é a seguinte...

 Como estou montando uma apresentação sobre o tema do Assunto
 Para convencer um pessoal Xiita aqui...de que o DBExpress é melhor

 Alguém tem algum material de apresentação dos beneficios do DBExpress
 Prós e contras..comparação com outras tecnologias de acesso a dados,
 Se alguém tiver algo para eu complementar com minha apresentação eu
 Já agradeço de antemão.

 Abs.

 Rodrigo Mota.



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos










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










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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

[delphi-br] DBMemo com mais de 255 caracteres

[thiago]

Boa Noite!

To precisando gravar no SQL mais de 255 caracteres mas o DBMemo não 
grava, alguém sabe alguma solução?

no SQl tenho um campo varchar com 7000 de tamanho e quando dou um 
select no delphi ele vem com 255, já alterei manualmente e nada.

Obrigado

Thiago
 











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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.

Re: [delphi-br] CRIAR FORM DINAMICAMENTE !!! T Á DANDO ERRO !!!

[Rodolfo mendes]

Acho que o problema não esta neste código, mais sim no oncreate ou onshow do seu form.
 
 Tem alguma coisa em um desses dois eventos? Acho que o problema deve estar no seu código do Onshow.
 
 

Flavio [EMAIL PROTECTED] escreveu:
 Olá pessoal,

Essa é minha primeira dúvida aqui no fórum. Entrei recentemente.

O que acontece é o seguinte: Estou tentando criar um form dinamicamente através do click em um botão. o código está a seguir:

{ * Este procedimento abrirá uma caixa de diálogo que
* que permite a especificação de um registro a ser
* pesquisado na tabela. Note que o formulário é criado
* dinamicamente e depois destruído. Dessa forma ele
* ocupa recursos do sistema somente enquanto estiver
* sendo utilizado. }
procedure TfCadastroNovo1.spdbtnLocalizarClick(Sender: TObject);
begin
inherited;

Application.CreateForm(TfLocalizacaoRegistro1,fLocalizacaoRegistro1);
fLocalizacaoRegistro1.ShowModal;
fLocalizacaoRegistro1.Destroy;
DBebNumero.SetFocus;

end;


Quando clico no botão 'spdbtnLocalizar', aparece uma mensagem de erro: Project Projeto.exe raised exception class EListError with message  List index out of bounds (-1)  e aponta a linha ' fLocalizacaoRegistro1.Destroy; ' do código que passei...

Também tirei da lista de auto-create na opções de projeto o form q estou tentando criar dinamicamente fLocalizacaoRegistro1...

Alguém sabe me dizer o q está acontecendo !?!?

Obrigado !

Flávio


-
Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 

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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










  
-
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora!

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










-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

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






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




  
Links do Yahoo! Grupos

Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.