Скачать: CL | DM;

Странно. Почему Delphi это не хавает?   Найти похожие ветки 

← →
}|{yk ©   (2004-03-12 16:48) [0]

var
FinishMessage: UINT;
begin
FinishMessage:=RegisterWindowMessage("FINISH_LOADING_DATA");
BroadcastSystemMessage(BSF_NOHANG,BSM_APPLICATIONS,FinishMessage,0,0);
end;
Ошибка несовместимости PDWORD и Interger

При том что функция имеет вид
long BroadcastSystemMessage(          DWORD dwFlags,
   LPDWORD lpdwRecipients,
   UINT uiMessage,
   WPARAM wParam,
   LPARAM lParam
);

---

← →
clickmaker ©   (2004-03-12 16:53) [1]

Разницу между константой и указателем сечешь? :)

var Recipients: cardinal;
Recipients := BSM_APPLICATIONS;
BroadcastSystemMessage(BSF_NOHANG,@Recipients,FinishMessage,0,0);

---

← →
MBo ©   (2004-03-12 16:55) [2]

введи переменную, присвой нужных Recipients и с @ используй

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.03 c