Показать сообщение отдельно
  #6  
Старый 21.09.2011, 21:28
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Не работает потому, что в Win используется PChar, в TEdit находится String. Перепиши так:
Код:
var
  h: HWND;
begin
  h := FindWindow(PChar(Edit1.Text), nil);
  ShowWindow(h, SW_MINIMIZE);
end;
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием