Erika, bom dia!

Utilize o evento "onmousemove" do speedbotton.
Coloque uma Label no seu form e:

procedure TForm1.SpeedButton1MouseMove(Sender: TObject; Shift: 
TShiftState;
  X, Y: Integer);
begin
     Label1.Caption := 'Teste de Mensagem';
end;

e para apagar a mensagem, utilize o mesmo evento, só que agora no Form

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
     Label1.Caption := '';
end;


Espero que lhe seja útil.

José de Moura


--- Em delphi-br@yahoogrupos.com.br, Erika Lemes <[EMAIL PROTECTED]> 
escreveu
> Oi pessoal
>  
> Eu gostaria de saber como faço para aparecer uma mensagem quando 
usuário passar o mouse em cima de um speedbutton!
>  
> Obrigado!!!
> 
> __________________________________________________
> Converse com seus amigos em tempo real com o Yahoo! Messenger 
> http://br.download.yahoo.com/messenger/ 
> 
> [As partes desta mensagem que não continham texto foram removidas]





-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> 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:
    http://br.yahoo.com/info/utos.html

 



Responder a