Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.11.16;
Скачать: [xml.tar.bz2];

Вниз

Как найти все главные Окна и распредилить их по заголовку ?   Найти похожие ветки 

 
ЛамоРщщук   (2008-10-05 15:34) [0]

Привет всем , надеюсь на вашу помошь =))))нужно найти все Главные окна и добавить их в листбокс , причём имя добавляемой записи в лист бокс должна соответсвовать заголовку окна , а не хэндла =)))
например
function EnumProc (Wd: HWnd; Param: LongInt): Boolean; stdcall; // Обязательно stdcall !!!
Begin

if GetClassName(Wd,"mainwindow",30)=1 then begin
   form1.ListBox1.Items.Add(IntToStr(Wd));        // Добавляем текущий описатель окна
   EnumProc := TRUE;
   end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
   ListBox1.Items.Clear;         // Очистим список перед началом поисков
   EnumWindows (@EnumProc, 0); // и скажем - искать
end;


Этот код ищет все Окна , в том числе не нужные нам =) и добавляет их по хендлу а нам

нужно найти все главные окна .

как это правельно сделать ?Функцией GetClassName ?
Что писать в ClassName ? какие бывают классы ?


 
Anatoly Podgoretsky ©   (2008-10-05 15:57) [1]

Что такое главные Окна

Насчет классов - классы равные бывают и ни чем не ограничены.


 
@!!ex ©   (2008-10-05 16:05) [2]

EnumWindows
GetWindowText


 
@!!ex ©   (2008-10-05 16:07) [3]

отправил не полностью:
EnumWindows
GetWindowText
Дают только ГЛАВНЫЕ окна.

EnumChildWindows
дает не главные.


 
DVM ©   (2008-10-05 19:30) [4]


> нужно найти все Главные окна

главные - это те кнопки к которым появляются на панели задач?


 
Плохиш ©   (2008-10-06 11:38) [5]


> главные - это те кнопки

Хм, в вопросе вроде про окна спрашивали...


 
clickmaker ©   (2008-10-06 16:55) [6]

> имя добавляемой записи в лист бокс должна соответсвовать
> заголовку окна , а не хэндла

а у хэндла есть заголовок?


 
Leonid Troyanovsky ©   (2008-10-06 21:42) [7]


> ЛамоРщщук   (05.10.08 15:34)  

> нужно найти все главные окна .

А окна бывают главными?

--
Regards, LVT.



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

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

Наверх




Память: 0.46 MB
Время: 0.005 c
4-1200404732
Lamer666
2008-01-15 16:45
2008.11.16
FindWindowEx не находит кнопку в ОКНЕ


2-1223358330
feel
2008-10-07 09:45
2008.11.16
как открыть в Delphi таблицу Excel?


8-1187552645
leonidus
2007-08-19 23:44
2008.11.16
OCR & Delphi


2-1222265965
Добежал
2008-09-24 18:19
2008.11.16
Наследники TList


2-1222942248
Сергей
2008-10-02 14:10
2008.11.16
индексы в базе dbf





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский