Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi StringGrid Komponente erweitern (https://www.delphipraxis.net/98751-stringgrid-komponente-erweitern.html)

Texas 31. Aug 2007 18:47


StringGrid Komponente erweitern
 
Ich versuche im Moment eine Komponente zu erstellen die ich von StringGrid ableite.
Diese soll sich um die Verwaltung von Ihm zugewiesene Objects[x,y] kümmern.
Mit Werten füllen wenn ich RowCount oder CelCount erhöhe bzw den Speicher wieder freigeben
wenn ich Spalten oder Reihen entferne.

Kann man dazu irgenwie die Property RowCount überschreiben/erweitern oder deren Methode ?

Soweit ich das gesehen habe ist aber die Procedure SetRows in TCustomGrid im Bereich Privat.
Da ich mich erst seit kurzem mit der Entwickelung von Komponenten beschäftige bin
ich noch nicht so fit mit dem überschreiben von Methoden..

Ich denke mir aber das es sinn macht bei RowCount anzusetzen, da ja hier die Zeilen neu angefügt bzw
entfernt werden .


:gruebel: ist es überhaupt möglich eine property zu überschreiben ?

Gruß Texas

berens 3. Sep 2007 10:24

Re: StringGrid Komponente erweitern
 
Delphi-Quellcode:
type
  TMyStringGrind = class(TStringGrid)
  private
    FRowCount: integer;
    SetRowCount(Value: integer);
  public
    property RowCount: integer read FRowCount write SetRowCount;
  end;
 

...

procedure TMyStringGrind.SetRowCount(Value: integer);
begin
  FRowCount := Value;
  inherited RowCount := Value; // den Wert tatsächlich ändern
  // weitere Befehle hier
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz