Como faço para identificar um objeto???

Delphi

20/01/2004

:?: Como faço para identificar um objeto, quando passo o mouse ou clico nele??

Exemplificando: Se eu clico em um label, aparece o nome do label, se eu clico em um Shape, aparece o nome do Shape, (aparece em um Edit por exemplo).

Desde já agradeço a todos.

Rafael de Andrade Silva
rafael@topocart.com.br


Rafael Silva

Rafael Silva

Curtidas 0

Respostas

Maxsoftware

Maxsoftware

20/01/2004

Propriedade ShowHint coloque como true.
Propriedade Hint - escreva o texto a ser apresentado.


Ass: Max...


GOSTEI 0
Regisjj

Regisjj

20/01/2004

Utilize o Seguinte Código

Declare a função:

procedure IdentificaObjeto(Sender: TObject);

logo abaixo ao código de declaração dos componentes do Form:

Ex:
TForm1 = class(TForm)
EditNome: TEdit;
Button1: TButton;
Label1: TLabel;
RadioGroup1: TRadioGroup;
Panel1: TPanel;
procedure IdentificaObjeto(Sender: TObject);
private...

Implementação da Rotina:

procedure Form1.IdentificaObjeto(Sender: TObject);
begin
EditNome.Text := Sender.Name;
end;

Pronto: Agora para cada componente que vc colocar no Form, e se o mesmo tiver o evento OnClick, vc ira relacionar o evento OnClik a esta rotina: Note no ObjectInspector estará disponivel para vc a rotina.


GOSTEI 0
POSTAR