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

Вниз

Найти быстро место в исходнике   Найти похожие ветки 

← →
Bluejohn   (2012-05-30 10:14) [0]

Допустим понадобилось найти как реализован Form1.Width:= 200.
Для этого я удерживаю контрол, кликаю на Width, перехожу в TForm.
А там дальше ищу GetWidth/GetHeight.
Как можно быстро находить нужный кусок кода?
Я помню раньше находил это место, где изменяются размеры, SetWindowPos.

Сейчас не могу найти.

Дошел до, но нигде не могу найти SetWindowPos.

procedure TControl.SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
begin
 if CheckNewSize(AWidth, AHeight) and
   ((ALeft <> FLeft) or (ATop <> FTop) or
   (AWidth <> FWidth) or (AHeight <> FHeight)) then
 begin
   InvalidateControl(Visible, False);
   FLeft := ALeft;
   FTop := ATop;
   FWidth := AWidth;
   FHeight := AHeight;
   UpdateAnchorRules;
   Invalidate;
   Perform(WM_WINDOWPOSCHANGED, 0, 0);
   RequestAlign;
   if not (csLoading in ComponentState) then Resize;
 end;
end;


---

← →
Palladin ©   (2012-05-30 10:18) [1]

https://www.google.ru/search?q=setwindowpos

---

← →
Bluejohn   (2012-05-30 10:40) [2]

Нет. Я не нашел в коде эту функцию

---

← →
RWolf ©   (2012-05-30 10:43) [3]

ясное дело, это же функция WinAPI.

---

← →
Palladin ©   (2012-05-30 10:44) [4]

Perform(WM_WINDOWPOSCHANGED, 0, 0);

---

← →
Palladin ©   (2012-05-30 10:48) [5]

Я не пойму, что ты ищешь, вызов или код. Кода нет см[3], вызова тоже нет, идет вызов оконной функции напрямую, минуя системную очередь сообщений.

---

← →
Bluejohn   (2012-05-30 10:49) [6]

Я ищу вызов этой функции в исходниках.
Ведь именно так изменяются размеры контрола.

---

← →
Anatoly Podgoretsky ©   (2012-05-30 10:56) [7]

Поиск по содержимому в проводнике

---

← →
Inovet ©   (2012-05-30 11:14) [8]

> [7] Anatoly Podgoretsky ©   (30.05.12 10:56)
> в проводнике

FAR рулит сильнее.

---

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

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

Наверх

Память: 0.46 MB
Время: 0.109 c