Delphi API: GET_X_LPARAM

[martine]

Trong Help của Delphi có ghi hai hàm sau:
xPos = GET_X_LPARAM(lParam);
yPos = GET_Y_LPARAM(lParam);
dùng để lấy vị trí của chuột (ví dụ mình làm với thông điệp WM_MOUSEMOVE), nhưng sao mình ko dùng được.

[huyphuc1981_nb]

Mục tiêu là để làm gì.
Đấy là windows proc để sử lý windows message. Pascal đã cjho một đống tiện ích, cần gì phải dùng cấp thấp như thế.
Các event move, down, up.....đầy kiểu integer ra kia mà.

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin

end;

[martine]

Mục tiêu là để làm gì.
Đấy là windows proc để sử lý windows message. Pascal đã cjho một đống tiện ích, cần gì phải dùng cấp thấp như thế.
Các event move, down, up.....đầy kiểu integer ra kia mà.

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin

end;

Ý mình là đang muốn viết API dùng delphi, còn dùng cái trên thì nói làm gì.
He he, tìm được câu trả lời rồi, dùng hai hàm HIWORD và LOWORD.