| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ToolBar [D7, WinXP]

djone ©   (2004-08-14 21:52:00) 

Ребята в инете очень мало инфы по тулбару.
Подскажите как узнать  состояние допустим 3 кнопки?

---

GuAV   (2004-08-16 01:38:00) [1]

У тебя тогда ошибка.
или то не ToolBar

Вот пример работает (другое приложение)

procedure TForm1.FormCreate(Sender: TObject);
var h: Hwnd; I: Integer;
begin
 h:=FindWindowEx(FindWindow('TfrmMain',nil),
    0, 'TCoolBar',nil);
 h:=FindWindowEx(h, 0,'TToolBar','');
 Assert(h<>0);
 for I:=0 to 10 do
   ShowMessage(IntToStr(
     SendMessage(h, TB_GETSTATE, I, 0)));
end;

---

djone   (2004-08-16 00:12:00) [2]

Я вродибы в раздел WinAPI попал?
Такто я знаю как, а как у чужого тулбара?
TB_GETSTATE - Не пашет.

---

GuAV   (2004-08-15 14:22:00) [3]

> Попробовал на тебя нажать и F1 и Ctrl+C  Ctrl+Alt+C - и
> нифига :).

Не на меня а на тулбар надо.
А про меня знать - нефиг!

---

TUser   (2004-08-15 11:16:00) [4]

> а вообще море инфы - смотри мою анкету.

Попробовал на тебя нажать и F1 и Ctrl+C  Ctrl+Alt+C - и нифига :).

---

GuAV   (2004-08-14 23:10:00) [5]

ToolBar1.Buttons[3].Down.
а вообще море инфы - смотри мою анкету.

---

Наверх