Re: [delphi-br] Form com BorderIcons = biHelp execut ar alguma ação
Ótimo... muito obrigado... fico aguardando. Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br Sent: Friday, July 04, 2008 8:14 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Eu tenho um componente que manipula isso, e vem com um DEMO. Vou mandar para seu e-mail. Blz. Leandro escreveu: Pessoal, Alguém sabe como eu posso executar uma determinada ação ao clicar no botão de interrogação que aparece quando eu coloco BorderIcons = biHelp? Obrigado, Leandro [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Form com BorderIcons = biHelp execut ar alguma ação
Valeu cara... Eu queria usar o do form mesmo, mas se não tiver jeito, vou dar uma olhada nesse do Jedi. Muito obrigado. Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br Sent: Friday, July 04, 2008 9:19 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Tenho outra alternativa. Procurei e não achei, mas eu tenho pois já usei. Outra alternativa: Instale os componentes da JEDI, são 333 componentes. Após instalação, copie o texto abaixo e cole no seu form: object JvCaptionButton1: TJvCaptionButton Alignment = taCenter ButtonHeight = 18 ButtonLeft = -31 ButtonTop = -2 ButtonWidth = 25 ShowHint = True ParentShowHint = False Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ImageIndex = 2 Images = ImageList1 Margin = 0 Spacing = 0 Left = 5 Top = 258 end Se os componetes estiverem instalados aparecerá o componente no seu form. São tantos componentes que não achei onde ele tava, então, copiando o texto acima dá no mesmo e é logo direto. Este componente cria um botão na barra e tem uma opção no Object Inspector que cria o de Help, fechar, minimizar, etc... e tem o customizado que você vai dizer no evento onClique o que ele vai fazer. Se mesmo assim vc quiser os componentes para capturar o do próprio Formulário me dê um tempo para procutrar na minha estufa. (me avise). Blz. Leandro escreveu: Ótimo... muito obrigado... fico aguardando. Leandro -- [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Form com BorderIcons = biHelp execut ar alguma ação
Onjahyr... O componente funcionou legal, mas não resolveu meu problema. Isso por quê eu queria executar uma determinada ação minha quando clicassem na ?, e não chamar o help. Por exemplo, mostrar uma mensagem para o usuário. De qualquer forma, vou dar uma estudada no código do componente. Talvez eu consiga implementar algo através dele. Muito obrigado, Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br Sent: Friday, July 04, 2008 10:10 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Acabei de enviar o componente para seu e-mail... Se funcionar para o que deseja dê um retorno! Blz. Leandro escreveu: Valeu cara... Eu queria usar o do form mesmo, mas se não tiver jeito, vou dar uma olhada nesse do Jedi. Muito obrigado. Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, July 04, 2008 9:19 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Tenho outra alternativa. Procurei e não achei, mas eu tenho pois já usei. Outra alternativa: Instale os componentes da JEDI, são 333 componentes. Após instalação, copie o texto abaixo e cole no seu form: object JvCaptionButton1: TJvCaptionButton Alignment = taCenter ButtonHeight = 18 ButtonLeft = -31 ButtonTop = -2 ButtonWidth = 25 ShowHint = True ParentShowHint = False Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ImageIndex = 2 Images = ImageList1 Margin = 0 Spacing = 0 Left = 5 Top = 258 end Se os componetes estiverem instalados aparecerá o componente no seu form. São tantos componentes que não achei onde ele tava, então, copiando o texto acima dá no mesmo e é logo direto. Este componente cria um botão na barra e tem uma opção no Object Inspector que cria o de Help, fechar, minimizar, etc... e tem o customizado que você vai dizer no evento onClique o que ele vai fazer. Se mesmo assim vc quiser os componentes para capturar o do próprio Formulário me dê um tempo para procutrar na minha estufa. (me avise). Blz. Leandro escreveu: Ótimo... muito obrigado... fico aguardando. Leandro -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Form com BorderIcons = biHelp execut ar alguma ação
valeu... pelo sofrimento... rsrsrs :) t+ - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br Sent: Friday, July 04, 2008 4:22 PM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Então usa o componente da JEDI que resolve teu problema. Aliás, vou logo te passar o código abaixo prá não prolongar teu sofrimento (hahahaha): Aparecer uma mensagem ao clicar no botão Help do Form: *type* TForm1 = *class*(TForm) *private* *procedure* WMNCLBUTTONDOWN(*var* Msg: TWMNCLButtonDown) ; *message* WM_NCLBUTTONDOWN; *procedure* WMNCLBUTTONUP(*var* Msg: TWMNCLButtonUp) ; *message* WM_NCLBUTTONUP; *end*; *var* Form1: TForm; *implementation */{$R *.dfm}/ *procedure* TForm1.WMNCLBUTTONDOWN(*var* Msg: TWMNCLButtonDown) ; *begin* *if* Msg.HitTest = HTHELP *then* Msg.Result := 0 *else* *inherited*; *end*; *procedure* TForm1.WMNCLBUTTONUP(*var* Msg: TWMNCLButtonUp) ; *begin* *if* Msg.HitTest = HTHELP *then* *begin* Msg.Result := 0; ShowMessage('O botão Help foi clicado!') ; *end* *else* *inherited*; *end*; Pronto problema resolvido. Era para ter dito antes, mas enrolei para facilitar o teu lado. Blz Onjahyr Leandro escreveu: Onjahyr... O componente funcionou legal, mas não resolveu meu problema. Isso por quê eu queria executar uma determinada ação minha quando clicassem na ?, e não chamar o help. Por exemplo, mostrar uma mensagem para o usuário. De qualquer forma, vou dar uma estudada no código do componente. Talvez eu consiga implementar algo através dele. Muito obrigado, Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, July 04, 2008 10:10 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Acabei de enviar o componente para seu e-mail... Se funcionar para o que deseja dê um retorno! Blz. Leandro escreveu: Valeu cara... Eu queria usar o do form mesmo, mas se não tiver jeito, vou dar uma olhada nesse do Jedi. Muito obrigado. Leandro - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Friday, July 04, 2008 9:19 AM Subject: Re: [delphi-br] Form com BorderIcons = biHelp executar alguma ação Tenho outra alternativa. Procurei e não achei, mas eu tenho pois já usei. Outra alternativa: Instale os componentes da JEDI, são 333 componentes. Após instalação, copie o texto abaixo e cole no seu form: object JvCaptionButton1: TJvCaptionButton Alignment = taCenter ButtonHeight = 18 ButtonLeft = -31 ButtonTop = -2 ButtonWidth = 25 ShowHint = True ParentShowHint = False Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ImageIndex = 2 Images = ImageList1 Margin = 0 Spacing = 0 Left = 5 Top = 258 end Se os componetes estiverem instalados aparecerá o componente no seu form. São tantos componentes que não achei onde ele tava, então, copiando o texto acima dá no mesmo e é logo direto. Este componente cria um botão na barra e tem uma opção no Object Inspector que cria o de Help, fechar, minimizar, etc... e tem o customizado que você vai dizer no evento onClique o que ele vai fazer. Se mesmo assim vc quiser os componentes para capturar o do próprio Formulário me dê um tempo para procutrar na minha estufa. (me avise). Blz. Leandro escreveu: Ótimo... muito obrigado... fico aguardando. Leandro -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]