|
Das deutsche QBasic- und FreeBASIC-Forum Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
|
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Eternal_pain
Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
|
Verfasst am: 15.08.2011, 15:55 Titel: Mauscursor |
|
|
Moin,
hatte zwischenzeitlich mal eine kleine Mausroutine geschrieben gehabt um eigene Mauszeiger benutzen zu können und war später dann auf dieses Beispiel gestoßen was das ganze eindeutig vereinfacht:
http://www.freebasic-portal.de/code-beispiele/maus-tastatur/neuer-mauscursor-winapi-98.html
hab inzwischen ein wenig damit rumgespielt und funktioniert ja soweit ganz gut. Leider hab ich mit der WinAPI nie viel erfahrungen gesamelt und mich nun ein klein wenig versucht durchzulesen konnte aber nichts genaueres finden.
Da es um 'eigene' Mauscursor geht, bliebe eigentlich nur die
LoadCursorFromFile Funktion für mich, da ich nun aber nicht immer
endlos viele extra files verwenden wollte stellt sich hier die Frage ob
es auch eine Möglichkeit gibt den cursor aus einem Image oder ähnlichem neu zu setzen.
So eine art, Loadfrommemory oder sowas... ? _________________
|
|
Nach oben |
|
|
28398
Anmeldungsdatum: 25.04.2008 Beiträge: 1917
|
Verfasst am: 15.08.2011, 17:52 Titel: |
|
|
Du kannst mit LoadCursor() einen Cursor aus einer Resource laden.
Dazu musst du nur eine .rc Datei erstellen, die die entsprechende Datei einbindet; Mit Tools wie ResEdit oder FBEdit geht das ganze etwas leichter von der Hand.
Code: | LoadCursor(GetModuleHandle(), MAKEINTRESOURCE(resource_id)) |
So in der Richtung |
|
Nach oben |
|
|
Eternal_pain
Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
|
Verfasst am: 16.08.2011, 08:03 Titel: |
|
|
Danke Dir, funktioniert perfekt so
Test.rc:
Code: | #define Mouse1 999
Mouse1 CURSOR DISCARDABLE "E:/FreeBASIC/fedora-left-ptr.cur" |
Beispiel:
Code: | '"<$fbc>" "<$file>" Maus-test.rc
#Include Once "windows.bi"
Dim Shared WindowCursor As HCURSOR
Dim Shared OldWinProc As WNDPROC
Dim Shared hwnd As HWND
Declare Function CursorWinProc(ByVal hwnd As HWND, ByVal uMsg As UINT, ByVal wParam As WPARAM, ByVal lParam As LPARAM) As LRESULT
Function CursorWinProc(ByVal hwnd As HWND , ByVal uMsg As UINT, _
ByVal wParam As WPARAM, ByVal lParam As LPARAM) As LRESULT
If uMsg = WM_SETCURSOR Then
SetCursor(WindowCursor)
Return 1
End If
Return CallWindowProc(OldWinProc, hwnd, uMsg, wParam, lParam)
End Function
Screen 19,32
hwnd = GetForegroundWindow
OldWinProc = Cast(WNDPROC, SetWindowLong(hwnd, GWL_WNDPROC, CLng(@CursorWinProc)))
'WindowCursor = LoadCursor(NULL, IDC_HAND )
'WindowCursor = LoadCursorFromFile("fedora-left-ptr.cur")
WindowCursor = LoadCursor(GetModuleHandle(NULL), MAKEINTRESOURCE(999))
Do
If Multikey(&h01) Then Exit Do
Loop
SetWindowLong hwnd, GWL_WNDPROC, CLng(OldWinProc)
End
|
Hier gibts übrigens eine Menge netter Mauszeiger
http://www.rw-designer.com/cursor-library _________________
|
|
Nach oben |
|
|
Badru Gast
|
Verfasst am: 14.08.2012, 16:09 Titel: |
|
|
Der Link für die Mauszeiger is ja cool, danke! Auch wenn das Thema hier wahrscheinlich eh tot ist... Ich dachte mir, sich bedanken is höflicher |
|
Nach oben |
|
|
MOD Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007 Beiträge: 1003
|
Verfasst am: 14.08.2012, 16:12 Titel: |
|
|
Badru: du bist ja recht neu im Forum, magst du nicht etwas zu Projekten erzählen, eventuell hast du ja was interessantes in Arbeit, für das du diese Mauszeiger brauchst.
Stell dich und deine Projekte doch mal vor. |
|
Nach oben |
|
|
Badru Gast
|
Verfasst am: 20.08.2012, 15:03 Titel: |
|
|
Hey, ich bin noch ganz am Anfang und am Planen und hol mir erstmal einige Anregungen und Infos. Wenn ich etwas Vorzeigbares habe, worauf ich stolz sein kann, werd ichs sofort mit euch teilen |
|
Nach oben |
|
|
MOD Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007 Beiträge: 1003
|
Verfasst am: 20.08.2012, 15:13 Titel: |
|
|
Das Vorgehen ist ein wenig zweischneidig. Wir haben hier des Öfteren Neuzugänge, die erstmal kreuz und quer auf andere Posts ohne Sachbezug antworten und so Posts sammeln und den Zähler hochtreiben. Sobald eine gewisse Anzahl an Meldungen abgesetzt wurden, fängt das Spammen von diesem Account an.
Wir löschen sowas immer sehr zeitig und waren uns nach deinen ersten Posts nicht sicher. Einzig deine deutsche IP hat bisher eine Löschung des Accounts verhindert.
Ein bisschen mehr Informationen zu deinem Kenntnissstand/Plänen gibt uns natürlich mehr Sicherheit, sodass wir nicht befürchten müssen, bald eine Reihe von Spamnachrichten löschen zu müssen.
Dieser Grundverdacht tut mir zwar Leid, aber Foren haben heutzutage wirklich viel mit Spammern zu tun, nicht nur automatisierten sondern auch menschlichen, die dafür letztlich Provision kassieren. |
|
Nach oben |
|
|
|
|
Du kannst keine Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum nicht antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen.
|
|