FindWindow('NOT_EXISTS', nil) возвращает не ноль, а текущее активное окно

@Postscripter · Регистрация: 04.07.2012

Студворк — интернет-сервис помощи студентам

Что за хрень, не пойму!!!...

Code
1
2
3
4
5
6
7
procedure TForm1.FormCreate(Sender: TObject);
var
 h:hwnd;
begin
 h:=windows.FindWindow('any text here', nil);
 sleep(h);
end;

Ставлю бряк на sleep, ctrl+F7, вычисляю FindWindow('some text here', nil) - возвращается хендл текущего активного окна (того что в фокусе). Я в ступоре! Хелп... - - - ...

D7@XPsp3x86

31.08.2013, 03:32

Не по теме:

Вот и читай внимательно, тогда и поймёшь смысл этой фразы.

Добавлено через 14 минут
Справедливости ради нужно сказать, что не всегда достаточно приведения типов. Если используется PChar с 2-мя терминальными нулями, а некоторые структуры в WinAPI требуют такие, то требуется явное преобразование.

@Postscripter · 31.08.2013, 08:21 **[ТС]**

Code
1
2
3
4
5
6
const
 sConst = 'строка';
 pConst:pchar = 'пэчар';
var
 sVar:string;
 pVar:pchar;

В отладчике (evaluate):

FindWindow(pConst, nil) - работает как положено
FindWindow(sConst, nil) - передаёт nil, nil
FindWindow('t e x t', nil) - передаёт nil, nil

FindWindow(pVar, nil) - работает
FindWindow(pchar(sVar), nil) - не может вычислить
FindWindow(@sVar[1], nil) - работает

FindWindow(pointer(@sConst) {sic!}, nil) - ошибок нет, но перестают работать F7..F9

Добавлено через 14 минут

Сообщение от angstrom

Скорее с преобразованием string -> PChar

Не существует такого преобразования

Иногда, всё же, существует. Например pchar(a+b) выделит новый кусок памяти памяти и скопирует данные из строк a и b. Имхо в этом трабла... хотя хз)

Новые блоги и статьи Все статьи Все блоги /
сукцессия 43. Вторая научная статья за месяц- прайминг и гатгил anaschu 25.07.2026 две стороны одной монеты	Более приземисто - Эстафету хвоста в .cdl (деревья эстафеты в сад). Hrethgir 24.07.2026 В будущем, после написания блока инверсии обхода дерева (эстафеты хвоста), я планирую вернуться к нашему прошлому разговору о том, обладают ли знания целеполаганием. Тогда я пришел к выводу, что. . .	Вот представьте что вам дали бессмертие. kumehtar 24.07.2026 Вот представьте что вам дали бессмертие, ничего более не меняя. Вообще ничего, только бессмертие в нынешнем виде. Рады были бы? Что бы вы тут делали всё это время? Никакой пенсии. Никакого нового. . .	сукцессия 41 anaschu 24.07.2026 Численная верификация бифуркации в агентной модели лесной сукцессии: от одного параметра к ансамблю Автор: пользователь @Shumilov_AS \| Раздел: Прикладная математика / Численные методы Кратко. . .
сукцессия 40. Ансамблевая кластерная параметризаци, часть 1. anaschu 24.07.2026 Пр# Сопровождение научной статьи ИИ-ассистентом: подготовка публикации и калибровка агентно-ориентированной модели сукцессии микоризных систем Полевые заметки о двухнедельной совместной работе. . .	Теория всего 12. ВГК на планете в стратегической игре "терра" anaschu 21.07.2026 ### Главные семантические изменения и дешифровка новой физики 1. `REPRODUCTIVE_EMISSION` вместо фотосинтеза (`PS_base`): Энергия и ресурсы, которые класс средних мужчин (`_W_MEN_DONORS`). . .	Публикация отклонённая на хабре. Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование задачи и целеполагание Hrethgir 21.07.2026 https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11948&stc=1&d=1784657928 Привет Хабр. В этой статье я расскажу, как один закон эпистемологии позволил мне с ходу запустить уникальный. . .	Теория всего 11. Основные параметры anaschu 21.07.2026 Дешифровка тензорного ядра Soil Chemistry 2. 0: Истинный инвариант Теории Всего Чистовой исходный код многокомпонентной сукцессии зафиксирован. Модель оперирует единым вектором состояния. . .

angstrom
	31.08.2013, 03:32
	Не по теме: Вот и читай внимательно, тогда и поймёшь смысл этой фразы. Добавлено через 14 минут Справедливости ради нужно сказать, что не всегда достаточно приведения типов. Если используется PChar с 2-мя терминальными нулями, а некоторые структуры в WinAPI требуют такие, то требуется явное преобразование.