Auf eine SendMessage-Nachricht antworten?

[Rastaman]

Nabend! Gibt es eine Möglichkeit auf eine inkommende Nachricht zu antworten?
So wie z.b wie Winamp. Man sendet eine Nachricht und erhält dann die Infos, die Winamp zurückgibt.
Beispiel:

Delphi-Quellcode:

var
  i: Integer;
begin
  i := SendMessage(wndWinAmp, WM_USER, 1, 105);
end;

Und schon hat man die Länge des Aktuellen Songs in Sekunden in der Variable i.
Wie kann man sowas machen?

(Am besten wär n nonVCL-Beispiel)

Thx schonma!

[marabu]

Hallo Rastaman,

VCL oder non-VCL ist da gerade egal. Schau mal in die Unit Messages. Am Ende eines message record ist ein DWORD Result, das den Rückgabewert deines message handlers aufnimmt.

Grüße vom marabu

[Rastaman]

Man kann da rein schauen
Also ich hab nur .dcu Dateien. Alles was .pas in meinem D2k5 Ordner is, sind die Beispielanwendungen von Borland die dabei waren

[marabu]

Wenn du mit der PE arbeitest, dann kannst du leider nicht reinschauen - sorry. Du kannst dann aber über Code Insight die Felder der Struktur TMessage betrachten. Du weißt wie das geht?

marabu

[Rastaman]

Öhhhhh ... Nein
Wär es nicht einfacher (sofern du es weisst), wenn du mir einfach sagst, wie man auf eine Nachricht antworten kann.
Wird ja nun nicht grad kompliziert sein

[marabu]

Delphi-Quellcode:

uses
  Messages;

var
  msg: TMessage;
begin
  msg.Result := 0; // hier kannst du jeden 32-bit Wert zurückgeben
end;

Solltest du in Zukunft nachschauen wollen, welche Felder dir ein Record bereit hält oder welche Methoden ein Objekt, das du nur dem Namen nach kennst, dann deklariere eine Variable und gib irgendwo in deinem Code den Variablen-Namen gefolgt von einem Punkt an. Code Insight wird dir dann weiter helfen - oder fehlt das bei der PE auch?

marabu