TADODataSet -> Datensatz über Symbol löschen

[hirnstroem]

'loha Folks,

folgende Situation:

In einem IWDBGrid werden zusätzlich zu den angezeigten Spalten, Spalten mit Symbolen (auf allen Zeilen ausser der Titelzeile) eingefügt. Diesen Symbolen sollen Funktionen hinterlegt werden, welche den jeweiligen Datensatz betreffen (Delete, Edit, Insert, etc.).

Und hier beginnen meine Schwierigkeiten. Mit der folgenden Prozedur wird ein Symbol hinzugefügt, in diesem Fall zum Löschen:

Delphi-Quellcode:

procedure TfrmRightManagementSelect.grdLoginUserRenderCell(ACell: TIWGridCell;
  const ARow, AColumn: Integer);
begin
  if ARow <> 0 then
  begin
    if AColumn = 4 then
    begin
      with ACell do
      begin
        Control := TIWImageFile.Create(Self);
        with TIWImageFile(Control) do
        begin
          ImageFile.Filename := './delete.gif';
//          OnClick := ;
        end;
      end;
    end;
  end;
end;

Dem bisher auskommentierten OnClick Ereignis möchte ich folgende Prozedur zuweisen:

Delphi-Quellcode:

procedure TfrmRightManagementSelect.grdLoginUserColumns4Click(ASender: TObject;
  const AValue: string);
begin
  DataSet.Delete;
end;

OnClick := grdLoginUserColumns4Click; ^^ dies Funktioniert nicht. Die Fehlermeldung beim Kompilieren lautet:
[Pascal Fehler] URightManagementSelect.pas(201): E2009 Inkompatible Typen: 'Liste der Parameter ist unterschiedlich'

Nun leuchtet dies an und für sich auch noch ein, da das OnClick Ereignis nur den Parameter "Sender: TObject" kennt.

Wie kann ich nun über dieses Symbol die Prozedur aufrufen? Den Wert AValue müsste man irgendwie ja noch übergeben...aber irgendwie schnall ich da ab.

Grüsse
hirnstroem