Fórum Canvas no Listview #335069
21/12/2006
0
como altero a cor dos columnsheader no modo vsreport de um listview?
procedure TFPesqDados.ListView1AdvancedCustomDraw(Sender: TCustomListView;
const ARect: TRect; Stage: TCustomDrawStage; var DefaultDraw: Boolean);
begin
Sender.Canvas.Brush.Color := clBlack;
Sender.Canvas.Rectangle(1,1,1,1);
end;
tava tentando assim apenas por teste e nao funcionou..
seriam todos os columnsheaders.
passando o ARect nao rolou tmbm
[]´s e feliz natal pra qm souber me ajudar :p
procedure TFPesqDados.ListView1AdvancedCustomDraw(Sender: TCustomListView;
const ARect: TRect; Stage: TCustomDrawStage; var DefaultDraw: Boolean);
begin
Sender.Canvas.Brush.Color := clBlack;
Sender.Canvas.Rectangle(1,1,1,1);
end;
tava tentando assim apenas por teste e nao funcionou..
seriam todos os columnsheaders.
passando o ARect nao rolou tmbm
[]´s e feliz natal pra qm souber me ajudar :p
Nightshade
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)