Форум: "Начинающим";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];

Вниз

Проблема с ActionToolBar: кнопка выглядит нажатой.   Найти похожие ветки 

← →
AlexanderMS ©   (2006-07-08 18:55) [0]

Я использую ActionToolBar. (Панель инструментов в стиле XP). После нажатия на кнопку появляется новое окошко (OpenDialog или AboutBox - не имеет значения), а кнопка выглядит так, как будто она находится в нажатом состоянии. После закрытия окошка "рамка и прозрачный синий квадратик" с кнопки не исчезают (а всё должно было сразу исчезнуть). После наведения мышкой и последующего перемещения мышки кнопка выглядит нормально. Но, тем не менее, это похоже на баг, и выглядит не очень красиво. Подскажите, пожалуйста, как самостоятельно вернуть
кнопку в первоначальное состояние?

Пробовал Repaint, Invalidate панели, ProcessMessages перед открытием окошка и после - ничего не помогает.

---

← →
Footballer ©   (2006-07-08 19:17) [1]

А ты пробывал открывать окошко в событии OnMouseUp?

---

← →
Footballer ©   (2006-07-08 19:55) [2]

Ой, я уже понял, что так не выйдет, сам раньше с этим сталкивался, я так оставил, но если тебе это очень надо, то вот:
........................................

var
 Form1: TForm1;
 i:boolean;

implementation

{$R *.dfm}

procedure TForm1.DsFancyButton1Click(Sender: TObject);
Begin
 i:=true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 if i then
 begin
   i:=false;
   OpenDialog1.Execute;
 end;
end;

end.

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.013 c