CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede fireworld Nybegynder
19. marts 2002 - 19:42 Der er 3 kommentarer

mouse?

hej jeg sidder og læser lidt om mouse events?

denne her kode skulle sætte ens cursor et bestemt X / Y sted

procedure SetMousePos(x, y: longint);
var pt: TPoint;
begin
  pt := ClientToScreen(point(x, y));
  SetCursorPos(pt.x, pt.y);
end;


jeg får denne error

[Error] Unit1.pas(28): Incompatible types: 'HWND' and 'TPoint'

hvad betyder deT?
Avatar billede dkn Nybegynder
19. marts 2002 - 19:48 #1
procedure SetMousePos(x, y: longint);
begin
  SetCursorPos(x, y);
end;
Avatar billede doc404 Novice
19. marts 2002 - 23:04 #2
Du bliver "snydt" :-)

ClientToScreen er en TControl metode, men i dit tilfælde kalder du istedet ClientToScreen i Windows som definitionsmæssigt ser sådan ud:

function ClientToScreen(hWnd: HWND; var lpPoint: TPoint): BOOL; stdcall;

Derfor fejlen med hwnd og tpoint
Avatar billede delax Nybegynder
31. maj 2002 - 13:06 #3
Altså HWND er et windows handle(pointer) og TPoint er ikke nogen pointer men en X/Y koordinat-type.

pt := self.ClientToScreen(point(x, y)); //
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Flere spørgsmål fra Andet programmering kategorien

Titel Indlæg Oprettet Seneste aktivitet
ASP Classic fil fra subfolder Af bsn i Andet programmering 3 07/05/202416:14 08/05/202401:00
Session Variable Af bsn i Andet programmering 3 01/05/202409:44 02/05/202409:29
Modifyed Field for all Records in Access Af ingeman i Andet programmering 2 29/04/202416:05 30/04/202407:19
Delphi - Parser JSON Fil Af juzas i Andet programmering 4 25/02/202407:13 28/02/202420:56
Bat fil Af sjass i Andet programmering 5 15/01/202417:45 15/01/202420:35
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
20 min siden Nulstilling af iPhone - tracking? Af Peter S i iOS, iPhone & iPad
I dag 12:34 Book et mødelokale ved en invitation Af Hek i E-mail programmer
I dag 10:26 Formel med tre kriterier Af Pletz123 i Excel
I dag 10:13 Hvide streger langs kanter i tabel Af Stine i Word
I går 23:05 Kan ikke udvide C drevet. Af valby i Windows
White papers
Flere white papers »


Premium
Teaser billede
Efter kåring som Danmarks bedste Microsoft-partner for andet år i træk: "Der kom sindssygt mange reaktioner"
Læs mere »
AWS's omdømme får tæsk i årets Image-undersøgelse - og selskabet nægter at kommentere på hvorfor
Nye detaljer om EU-Parlamentets datalæk: Straffeattester og pas var blandt lækkede data
Datatyveriet mod Netcompany rammer selskabets omdømme: "Det kan være enormt svært at betale af"
Se alle »
Computerworld
Teaser billede
Så nemt er det at knække et kodeord på otte tegn
Læs mere »
Første resultater: Så meget bedre er de særlige ’Copilot+’ pc’er
Test: Motorolas lækre nye toptelefon er skarpt prissat – men den gemmer på en gevaldig bommert
Microsofts udfordrer Apples Macbook med en helt ny generation af Surface-enheder: Bliver 90 procent hurtigere
Se alle »
CIO
Teaser billede
Sådan har Coop sagt farvel til mainframen - sparer et to-cifret millionbeløb årligt på licenser
Læs mere »
De bedste i Danmark: Se vinderne af de 15 kategorier ved Microsoft Partner Awards
I sidste øjeblik: Danmarkshistoriens største GDPR-retssag mod det offentlige udskydes på ubestemt tid
Har fået nok af kunders ringe sikkerhed: Nu skal alle Azure-brugere tvinges til multifaktor-login
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Google fyrer hele sit Python-team
Får du den løn, du fortjener? Få overblikket over hvor meget dine kolleger tjener hver måned
Se alle »
White paper
Teaser billede
Optimering af Source-to-Pay: Identificér oplagte gevinster og skær omkostninger
Læs mere »
Whitepaper: Komplet sikkerhedsguide til Kubernetes
Vejen væk fra WAN: Sådan skifter du til en moderne infrastruktur
SASE: Træf det rette valg – første gang
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »