Skip to content
This repository has been archived by the owner on Mar 19, 2023. It is now read-only.

Commit

Permalink
Editor: Draw hint over a rectangle
Browse files Browse the repository at this point in the history
  • Loading branch information
binarymaster committed Jun 6, 2015
1 parent 7b6d5c7 commit 1a37f42
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions Editor2 Source/f_main.pas
Expand Up @@ -2506,6 +2506,11 @@ procedure TMainForm.Draw();
Abs(Bottom-Top) div Height, 0, True, False);
end;

// Ïðÿìîóãîëüíèê âûäåëåíèÿ:
if DrawRect <> nil then
with DrawRect^ do
e_DrawQuad(Left, Top, Right-1, Bottom-1, 255, 255, 255);

// ×åðòèì ìûøüþ ïàíåëü/òðèããåð èëè ìåíÿåì ìûøüþ èõ ðàçìåð:
if (MouseAction in [MOUSEACTION_DRAWPANEL, MOUSEACTION_DRAWTRIGGER, MOUSEACTION_RESIZE]) and
(DrawPanelSize) then
Expand Down Expand Up @@ -2541,12 +2546,7 @@ procedure TMainForm.Draw();
end;
end;

// Ïðÿìîóãîëüíèê âûäåëåíèÿ:
if DrawRect <> nil then
with DrawRect^ do
e_DrawQuad(Left, Top, Right-1, Bottom-1, 255, 255, 255);

// Áëèæàéøàÿ ê êóðñîðó ìûøè òî÷êà íå ñåòêå:
// Áëèæàéøàÿ ê êóðñîðó ìûøè òî÷êà íà ñåòêå:
e_DrawPoint(3, MousePos.X, MousePos.Y, 0, 0, 255);

// Ìèíè-êàðòà:
Expand Down

0 comments on commit 1a37f42

Please sign in to comment.