Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Sendmessage - Probleme .... (https://www.delphipraxis.net/138358-sendmessage-probleme.html)

TERWI 8. Aug 2009 13:45


Sendmessage - Probleme ....
 
Die Aufgabenstellung:
Ich habe für eine DVB-Soft (DVBDream) schon so einiges erfolgreich als Plugin/Modul und externen Sachen geproggt.
Nun soll es ein externer Stand-Alone-Scheduler werden, welcher prüft, ob die DVB-Soft läuft, einige Daten von dort holt (akt. Programm, Rec-Status, etc.) und auch div. Dinge setzt (dito).
Dazu bietet das Prog eine recht gute API, mit der man reichlich Kommunikation via SendMessage treiben kann.
Man benötigt nur den Fensterhandle - den ermittle ich jeweils entsprechend zur Laufzeit.

Das Problem:

A)
Meine kleine Testanwendung als Plugin für o.g. Prog funktioniert (wie viele andere) absolut einwandfrei.
Ich bekomme bei initialisieren den WinHandle und kann via Sendmessage alles abfragen undsteuern.
Schicke ich von diesem Plugin an meine externe, unabhängige Anwendung (auch den WinHandle ermittle zur Laufzeit) via Sendmesage entsprechende Daten/Info/Kommando's, klappt das auch einwandfrei.

B)
Verlege ich die gleichen Routinen in das externe Proggie und versuche es von dort direkt ohne den Umweg über das Plugin (mit dem gleichen / richtigen FensterHandle), schmiert mir die DVB-Soft spätestens nach der 2. Sendmessage kommentarlos ab und / oder gibt mir völlig Blödsinnige Werte in zurück.
Einfache Messages, welche keine Parameter benötigen funktionieren jedoch in Richtung der DVB-Soft normal.

Sehe ich hier die Bytes vor lauter Bits nicht mehr ?
Hab ich was vergessen, was ich noch nicht kenne ?
Woran liegt's ?

Luckie 8. Aug 2009 13:55

Re: Sendmessage - Probleme ....
 
Werden auch Zeiger auf Zeichenketten gesendet? Wenn ja, kann das nicht funktionieren, da Zeiger nur im eigenen Prozess gültig sind.

TERWI 8. Aug 2009 14:07

Re: Sendmessage - Probleme ....
 
Nicht wirklich.
Ich versuche z.B. das aktuelle Programm und Signalstärke/Qualität auszulesen.
In der API ist u.a. das so definiert:

Delphi-Quellcode:
const
  WM_MODULE_MSG = WM_USER + 321;
  ...
  DDMODAPI_GET_SIGNALINFO = $00100001;
  DDMODAPI_GET_CHANNEL_INFO = $00100015;
  ...
type
  PSignalInfo = ^TSignalInfo;
  TSignalInfo = packed record
    dwSize: DWORD;
    Level: BYTE;
    Quality: BYTE;
    Locked: BYTE;
  end;
  ...
  PChannelInfo = ^TChannelInfo;
  TChannelInfo = packed record
    dwSize: DWORD;
    wNID: WORD;
    wSID: WORD;
    wSatPos: WORD;
    dwChId: DWORD;
    ChName: packed array[0..63] of char;
    Provider: packed array[0..63] of char;
    ChType: BYTE;
    Scrambled: BYTE;
    wVideo: WORD;
    wPMT: WORD;
    wPCR: WORD;
    wTTX: WORD;
    Audio: TAudioInfo;
    ECM: TCAInfo;
    EMM: TCAInfo;
    wChNo: WORD;
  end;
  ...
var
  ChannelInfo : TChannelInfo;
  SignalInfo : TSignalInfo;
  hdl        : HWND;
  ...

  ChannelInfo.dwSize = sizeof(TChannelInfo); // define the size of record
  SendMessage(hdl, WM_MODULE_MSG, DDMODAPI_GET_CHANNEL_INFO, integer(@ChannelInfo));

  SignalInfo.dwSize := sizeof(TSignalInfo); // define the size of record
  SendMessage(hdl, WM_MODULE_MSG, DDMODAPI_GET_SIGNALINFO, integer(@SignalInfo));
  ...
ChannelInfo und SignalInfo auslesen ergibt nur murks, bzw. weg ist DVBDream ...
Als Modul schon zig mal so eibgesetzter Code.

Luckie 8. Aug 2009 14:27

Re: Sendmessage - Probleme ....
 
Und was ist das:
Delphi-Quellcode:
@SignalInfo
Auch nur ein Zeiger, der nur in deinem Prozess gültig ist. Mit dem Plugin funktioniert es, weil die DLL natürlcih in dem Parentprozess geladen wird.

TERWI 8. Aug 2009 14:32

Re: Sendmessage - Probleme ....
 
Und nu ? Irgendeine Idee / Link / Tipp, wie so was zu realisieren ist ?

Bernhard Geyer 8. Aug 2009 14:42

Re: Sendmessage - Probleme ....
 
Such mal nach WM_COPYDATA. Mit dieser Message kann man auch einiges an Daten per Messages übertragen.

Luckie 8. Aug 2009 14:46

Re: Sendmessage - Probleme ....
 
Zitat:

Zitat von Bernhard Geyer
Such mal nach WM_COPYDATA. Mit dieser Message kann man auch einiges an Daten per Messages übertragen.

Das wird ihm nicht helfen, da das Zielfenster mit der Nachricht wohl nicht viel anfangen kann. Deswegen gibt es ja die API mit den selbst definierten Nachrichten.

Eine Kommunikation wird damit nur über die Plugins und der eigenen API möglich sein.

TERWI 8. Aug 2009 14:55

Re: Sendmessage - Probleme ....
 
Problem ist / wird sein, das die DVB-Soft WM_COPYDATA in der Message nicht (richtig) versteht.
Da ich das Programm nur so wie in dessen API nutzen und nichts ändern kann, hilft das nicht wirklich.
Dazu müsste ich dann ja doch ein extra Plugin machen, was die Kommunikation mehr oder weniger 'übersetzt'.
Wie Luckie es andeutete.
Und gerade das wollte ich eigentlich nicht .... komme ich aber wphl nicht drumherum ?

Bernhard Geyer 8. Aug 2009 15:55

Re: Sendmessage - Probleme ....
 
Zitat:

Zitat von Luckie
Das wird ihm nicht helfen, da das Zielfenster mit der Nachricht wohl nicht viel anfangen kann. Deswegen gibt es ja die API mit den selbst definierten Nachrichten.

Muss zugeben das ich nicht den gesamten Thread durchgelesen habe :oops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:49 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz