Delphi	Material erste Schritte Variablen Typen Datenstruktur Zuweisung Komponenten StyleGuide Kontrollstrukturen Fehler Debuggen Funktionen Prozeduren Grafik Ereignisse Programme Unit OOP Benutzung einer Klasse Projektverwaltung Muster Format String-Operationen Datei Dialoge Menü Datenbank WinAPI Zufallszahlen RE Exceptions alte Delphiseite Pfad: Startseite / Fächer / Informatik / Delphi / WinAPI
Autor: mk 16.10.2006 15:30:54 2022	WinAPI

Nachrichten

Unter Windoes treten laufend Ereignisse ein, die in einer Nachrichtenschleife verarbeitet werden. In diese Nachrichtenverarbeitung kann man eingreifen, wie das folgende kleine Beispiel zeigt. Button 2 wird zusammen mit Button 1 eingedrückt und wieder losgelassen.

Die Delphi-Hilfe zur Win32-API ist zunächst die naheliegendeste Informationsquelle.

procedure TForm1.b2Click(Sender: TObject);
begin
  windows.Beep(440,100);
end;

procedure TForm1.b1Click(Sender: TObject);
begin
  PostMessage(b2.Handle,cn_Command,bn_Clicked,0);
end;

procedure TForm1.b1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  PostMessage(b2.Handle,BM_SETSTATE,1,0);
end;

procedure TForm1.b1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  PostMessage(b2.Handle,BM_SETSTATE,0,0);
end;

nachricht0.zip

Literatur

• Delphi7, Fortgeschritte Programmierung - www.herdt.de
• Max Kleiner, UML mit Delphi
• Charles Petzold, Windows-Programmierung - Das Entwicklerhandbuch zur Win32-API

Links

• WinAPI - wikipedia
• WinAPI - Dokumentation von Microsoft

lokal