Fórum Desenha no Canvas de outro aplicativo #321185
11/05/2006
0
Tentei usar as funções FrameRect, DrawFocusRect e DrawEdge, mas nenhum dele fez o retângulo, alguém tem alguma idéia?
Rodc
Curtir tópico
+ 0Posts
11/05/2006
Marcelo Saviski
Gostei + 0
11/05/2006
Marcelo Saviski
var r: TRect; begin GetWindowRect(Handle, R); with TCanvas.Create do try Handle := GetDC(0); Rectamgle(r); //por exemplo finally Free; end; end;
não testei...
Gostei + 0
12/05/2006
Rodc
Na verdade eu estou pintando o retângulo no Canvas, aguado um Sleep(100) e depois envio a função abaixo para o componente ser repintado
RedrawWindow(HandleObjeto, Rect, nil, RDW_INVALIDATE);
Isto, dentro de um timer, dá a sensação do retângulo estar piscando. Na maioria dos componentes funciona normal, mas quando é um TMenu, TForm ou TToolBar não funciona, o componente continua com a borda que eu fiz.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)