Überprüfen ob ein Ergeigniss existiert?

[Karstadt]

oh oh...

Eine weitere Frage... Wenn ich schon bei ONCLICK was eingegeben haben kann ich das per code erweitern.

Delphi-Quellcode:

var I : Integer;
begin
  With Formular do
  begin
    for i:= 0 to ComponentCount-1 do
    begin
      IF (Components[i] is TDBGrid) Then
      begin
        //TDBGrid(Components[i]).Font.Size := 15;
        IF not Assigned(TDBGrid(Components[i]).OnDrawColumnCell) Then
        TDBGrid(Components[i]).OnDrawColumnCell := DbGrib_DrawColumnCell_Einstellung
        //elseOnDrawColumnCell + DbGrib_DrawColumnCell_Einstellung geht das?
      end;