Ereignisroutine OnDrawCell(...) in eine Komponente auslagern

[EccoBravo]

Hallo,

wie kann ich eine Ereignisroutine OnDrawCell aus dem StringGrid1 eines TForm1

Delphi-Quellcode:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState; Farbe:TColor);
begin
...
end;

in eine von TStringGrid abgeleitete Komponente TEB_StringGrid

Delphi-Quellcode:

TEB_StringGrid = Class(TStringGrid);
...
end;

verschieben?

Ich möchte nämlich in einer neuen Komponente TEB_StringGrid die Zellfarbgebung und die Typenwandlung von Single in String usw. mit übernehmen

Ich habe folgendes Problem dabei:

In dem TForm1.StringGrid1 heißt diese Ereignisroutine

TForm1.StringGrid1DrawCell(...) aber in der Komponente müßte diese als

TEB_StringGrid.DrawCell(..) aufgelöst werden, und dann wäre da noch die Parameterliste.

Würde dieses der Compiler verstehen?

Vielen Dank für Hilfe

E. B.

[mkinzler]

.OnDrawCell ist eine Event-Property, also eine Referenz auf eine Methode, diese Methode ist ja im Standardfall auch keine Methode des Grids sondern der Form.

[EccoBravo]

Danke, danke!

Ja, und was mache ich da?

Gruß eb

[mkinzler]

TEB_StringGrid1.onDrawwCell := Form1.StringGrid1DrawCell; bzw. durch Setzen im OI

[EccoBravo]

Danke,

und TEB_StringGrid1.onDrawwCell kann ich dann im Code der Komponente ausimplementieren?

Hmm, in der Komponente habe ich aber keinen OI.

Grüße

E. B.

[mkinzler]

In diesem Falle wäre es besser .DrawCellzu Überschreiben.