|
Платные хостинги
Раскрутка сайта
Книги по программированию
Замена названия окон
- procedure TForm1.Button5Click(Sender: TObject);Var Wnd:THandle; beginWnd:=findWindow(0,PChar(Edit1.text)); if (Wnd<>0) then SetWindowText(Wnd,PChar(Edit2.text)) else MessageBox(Application.handle,'Нет такого окна','Ошибка',MB_OK);end;Как сделать так чтобы любое окно , вернее текс окна менялся ЛЮБОЕ ОКНО!
- Чето я не понял.А разве этот код не пашет?
- Че значи ЛЮБОЕ?
- Wnd присваивается дескриптор окна , а находим мы его по названию в Edit1.text!И SetWindowText идет замена если окно найдено по названию меняем из Edit2.text!А мне нужно чтобы все окно меняли название не обращая внимание на их заголовки!
- Простейшая WinAPI программа. Почитай и сам сделаешь:XPortal
- Ну дык EnumDeskTopWindows() или просто EnumWindows() с соответсвующим parent'ом+WM_SETTEXTКакие проблемы-то?
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|