ďťż

Ładny brzuch

Witam!

Jaką funkcję należy użyć, aby po podaniu uchwytu do danego okan stało się aktywne (na wierzchu).


var h:integer; r:trect; begin h:=Handle; GetWindowRect(h,r); SetWindowPos(h,HWND_TOPMOST,r.Left,r.Top,r.Right-r.Left,r.Bottom-r.Top,0); SetWindowPos(h,HWND_NOTOPMOST,r.Left,r.Top,r.Right-r.Left,r.Bottom-r.Top,0);
Użytkownik Cyrkiel edytował ten post 10 wrzesień 2005, 12:37
jezeli jest jedno z okien twojego programu to wystarczy:

NazwaFormy->SetFocus();

Mam jeszcze jeden problem. Chciałbym aby wyświetlić na wierzch (aktywować) okno, która nazwa jest wpisana w pole Edit. Miałem taki pomysł ale nie działa
var h:integer; c : string; r:trect; begin c := Edit1.Text; h:=FindWindow(nil, c); GetWindowRect(h,r); SetWindowPos(h,HWND_TOPMOST,r.Left,r.Top,r.Right-r.Left,r.Bottom-r.Top,0); SetWindowPos(h,HWND_NOTOPMOST,r.Left,r.Top,r.Right-r.Left,r.Bottom-r.Top,0);
wiecie w czym jest problem?



h:=FindWindow(nil, c);

dzięki

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •