F�rum Componente com uma Propriedade TForm #295227

12/09/2005

Estou desenvolvendo um componente para trabalhar com o Terminal Service, onde, se ele estiver conectado eu fa�o a troca das cores do Form e de seus componetes internos.
Criei a propriedade

property Form : TForm read fForm write SetForm;
.
.
procedure SetForm(aForm: TForm);
begin
  if aForm <> nil then fForm:=aForm;
end;

At� ai tudo bem, eu digito o nome do Form e ele aceita. Porem eu gostaria que ele qdo eu clica-se na propriedade Form j� estive dispon�vel para que eu selecionasse os forms existentes assim como acontece, por exemplo, com o TDataSource que qdo eu clico na propriedade DataSet ele me mostra todos que est�o na tela para eu selecionar.

Obrigado pela ajuda.

Os1000r

Curtir t�pico

+ 0

Responder