Einzelnen Beitrag anzeigen

sancho1980

Registriert seit: 7. Feb 2006
429 Beiträge
 
#6

Re: datensätze mit events aktualisieren (fibplus)

  Alt 6. Aug 2006, 16:34
Zitat von Bernhard Geyer:
Delphi-Quellcode:
procedure TDataModule1.DicentriesAlerterEventAlert(Sender: TObject;
  EventName: String; EventCount: Integer);
begin
  // Evtl. in Liste speichern da mehrere EventAlert kommen könnten vor abarbeitung
  FEventname := EventName;
  FEventCount := EventCount;
  PostMessage(self.Handle, WM_DicentriesAlerterEventAlert);
end;

procedure TDataModule1.DicentriesAlerterEventAlert(...)
begin
  // Ursprünglicher Code von DicentriesAlerterEventAlert
end;

Danke, ich wollt das direkt mal ausprobieren, aber da gibt's ein Problem: self.Handle gibt es nur für TForms und nicht für Datenmodule..was mach ich da? Und was hat es mit WM_DicentriesAlerterEventAlert auf sich??
Um Rekursion zu verstehen, muss man zunächst Rekursion verstehen.
  Mit Zitat antworten Zitat