Seite 1 von 1

die empfangroutine für daten die mit sendmessage ...

Verfasst: 12.11.2006 20:05
von super_castle
SendMessage_(Handle, #WM_MYMESSAGE, 7, 1), ich möchte diese daten von einem anderen fenster empfangen lassen, wie mache ich das mit der routine "getmessage"

wer kann mir mal ein einfaches beispiel geben ?

danke.

mfg

Verfasst: 12.11.2006 20:19
von ts-soft

Code: Alles auswählen

Procedure CallBack(hWnd.l, uMsg.l, wParam.l, lParam.l)
  Select uMsg
    Case #WM_MYMESSAGE
      If wParam = 7
        If lParam = 1
          Debug "Hallo"
        EndIf
      EndIf
  EndSelect
EndProcedure
In etwa

Verfasst: 12.11.2006 23:17
von super_castle
hallo, schönen dank für deine mühe.

ich brauche eine hilfe für "getmessage".
ich möchte dies in eine event einbauen.
ich brauche das windowswort für die untere "Case WM_...."

Code: Alles auswählen

BEGIN_EVENTS

	select case CBMSG
    
	case WM_COMMAND
		
	case WM_CLOSE
		DestroyWindow (Form1)
		exit function
        
    Case WM_HSCROLL 
        If lParam = c1 then 
            sli_wert = SendMessage(c1, TBM_GETPOS, 0, 0)
            Select Case Clip_Content_Enum()
                Case ccNone    : Clip_Copy_Str_To( "links "+str(sli_wert) )
            End Select
        end if

  	End Select 
	END_EVENTS

Verfasst: 12.11.2006 23:25
von ts-soft
Tut mir leid, verstehe nicht was Du willst. Sieht nach BCX aus :freak:
GetMessage entspricht in etwa WindowEvent()