[HTTqp]

Всем привет. У меня 2 вопроса по курсору listview:



1 вопрос:Я делаю listview курсор бесцветным следующим кодом:

Код:

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
   if Item.Focused=true then
     begin
      item.Selected:=false;
      Sender.Canvas.Brush.Color := clWindow;
     end;
end;

но мне надо чтобы контур был не пунктирной обводкой(на картике это цифра 1) а сплошной черной линией, как это сделать?


2 вопрос:
Как убрать курсор на рисунке он под цифрой 2, он появляется когда ты еще не выбрал строку а лишь водишь по строкам, как от его убрать?

[HTTqp]

Или подскажите как отрисовать рамку вместо пунктирной обводки? Я раньше не сталкивался, а в интернете мало что объясняется про отрисовку.

[Тролль]

HTTqp, а почему Вы не используете скины? alphaskins.com

[HTTqp]

Сообщение от Тролль

HTTqp, а почему Вы не используете скины? alphaskins.com

Зачем пользоваться им когда есть отрисовка, но правда про нее мало описано(

[Admin]

Сообщение от Тролль

...

Вечный БАН - за ТУПОСТЬ.