powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Странности с TreeView
10 сообщений из 10, страница 1 из 1
Странности с TreeView
    #32348706
AndreyBond
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В TreeView у меня более 300 узлов....
В заполненом TreeView меняю цвет в ходе выполнения программы
Код: plaintext
TreeView.Color:=$xxxxxxxx
. В итоге во время смены цвета TreeView изчезает и через секунды 2 появляется с новым цветом, в чём может быть дело??? С мылым кол-вом узлов, такое не наблюдается...
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348792
StarWind
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тормозит однако-с...
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348796
Фотография mv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не мучайтесь, возьмите TVirtualTreeView - бесплатно, быстро, супер-функционально...
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348824
Berg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вряд ли поможет с цветом, но на всякий случай:
BeginUpdate/EndUpdate конечно, имеются?
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348836
AndreyBond
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Конечно имеются.... :-((((
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348844
AndreyBond
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Никто не может попробовать, может это меня глючит?? У меня Delphi 5.
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348914
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Delphi6 + TTreeView + 200 узлов
полет нормальный
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348957
AndreyBond
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот простенькая прожка, там видно (в Delphi 5 покрайней мере) как странно цвет меняется:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
unit Unit1;

interface

uses
  Classes, Forms, StdCtrls, Controls, ComCtrls, SysUtils;

type
  TForm1 = class(TForm)
    TreeView1: TTreeView;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure Button2Click(Sender: TObject);

  private

  public

  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  p: Pointer;

begin
  TreeView1.Items.BeginUpdate;
  Application.ProcessMessages;
  for i:= 0  to  300 - 1  do
  begin
    new(p);
    TreeView1.Items.AddChildObject(nil,FloatToStr(random* 100 ),p);
  end;
  TreeView1.Items.EndUpdate;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  TreeView1.Color:=$FFFFFF;
  TreeView1.Color:=$00FFFF;
end;

end.
...
Рейтинг: 0 / 0
Странности с TreeView
    #32348981
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
без проблем
...
Рейтинг: 0 / 0
Странности с TreeView
    #32349010
srf2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в Delphi 5 действительно тормозит, особенно если нод сделать тысяч пять :)
а в Delphi 7 все нормально...
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Странности с TreeView
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]