Определение положения курсора на Image

@Vova92 · Регистрация: 16.04.2016

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

Приветствую! Реализовывал на Delphi такую замечательную штуку:

Delphi
1
2
GetCursorPos(pt);
pt := image1.ScreenToClient(pt);

Будьте добры, подскажите как осуществить подобное на С++, есть такое, но оно работает не должным образом:

C++
1
2
GetCursorPos(&pt);
Image1->ScreenToClient(Form1->Handle,&pt);

Спасибо большое!

@Maluda · 11.10.2016, 15:41

C++
1
2
3
TPoint ACursorPt;
GetCursorPos(&ACursorPt);
ACursorPt = Image1->ScreenToClient(ACursorPt);

@Vova92 · 11.10.2016, 15:48 **[ТС]**

Спасибо огромное, скопировал в тему немного не тот код, была реализация как у вас, компилятор выдавал ошибку несовместимости типов, проблема оказалось в том, что я переменную обозначил как POINT.

@BOGG ART · 11.10.2016, 17:11

Не надо смешивать VCL и API.

C++
1
2
3
4
void __fastcall TForm1::Image1Click(TObject * Sender) {
        TPoint P = Image1->ScreenToClient(Mouse->CursorPos);
        ShowMessage(IntToStr(P.x) + " | " + IntToStr(P.y));
}

_{И на Делфи аналогично.}

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

C++
1
((TImage*) Sender)->...

@Maluda · 11.10.2016, 17:42

Сообщение от BOGG ART

Не надо смешивать VCL и API

Вот лишь бы что-то ляпнуть

Исходник файла Controls.pas

Delphi
1
2
3
4
5
function TMouse.GetCursorPos: TPoint;
begin
  if not Windows.GetCursorPos(Result) then
    Result := Point(0, 0);
end;

@BOGG ART · 11.10.2016, 17:53

Реализация метода VCL тут не при чём. При разработке надо считать её чёрным ящиком. Реализация может меняться в зависимости от версии VCL и от целевой платформы.
Используем VCL - не используем API.

@Maluda · 12.10.2016, 10:05

BOGG ART,

Сообщение от BOGG ART

Используем VCL - не используем API.

Во-первых, не API, a Windows API.
Во-вторых, VCL - это библиотека визуальных компонентов, которая работает только под Windows и только используя WinAPI. И конечно она не охватывает (не оборачивает) 100% всех функций WinAPI. Я уверен, что и в твоих приложениях полно не обернутых функций таких как CreateProcess, StretchBlt и т.д.

Пруф из доки:

Visual Component Library (VCL) is an object hierarchy of visual components that are supported on Windows only (in Win32 and Win64 applications). The VCL framework does not use RTL cross-platform messaging solution; instead, it uses the Windows API messaging solution. This means that the VCL does not translate Windows messages into RTL messages for you, and VCL components communicate with each other using the Windows API as well.
For a cross-platform solution you need to migrate from VCL to FireMonkey.

Новые блоги и статьи Все статьи Все блоги /
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .

@Vova92 0 / 0 / 0 Регистрация: 16.04.2016 Сообщений: 6
	11.10.2016, 15:48 [ТС]
	Спасибо огромное, скопировал в тему немного не тот код, была реализация как у вас, компилятор выдавал ошибку несовместимости типов, проблема оказалось в том, что я переменную обозначил как POINT. 0

@BOGG ART 592 / 459 / 147 Регистрация: 09.12.2013 Сообщений: 2,385 Записей в блоге: 2
	11.10.2016, 17:53
	Реализация метода VCL тут не при чём. При разработке надо считать её чёрным ящиком. Реализация может меняться в зависимости от версии VCL и от целевой платформы. Используем VCL - не используем API. 0