Hallo Robert,
Sichtbarkeiten kannst du nicht verringern, nur erweitern.
Über eine Redimensionierung deines Grids informiert dich die dafür vorgesehene Methode SizeChanged():
Delphi-Quellcode:
unit MoreGrids;
interface
uses
SysUtils, Classes, Controls, Grids;
type
TStringGridEx =
class(TStringGrid)
protected
procedure SizeChanged(OldColCount, OldRowCount: Longint);
override;
end;
procedure Register;
implementation
procedure TStringGridEx.SizeChanged(OldColCount, OldRowCount: Longint);
begin
inherited SizeChanged(OldColCount, OldRowCount);
// ...
end;
procedure Register;
begin
RegisterComponents('
marabu', [TStringGridEx]);
end;
end.
Wenn du selbst die Dimensionen des Grids änderst, hast du doch die volle Kontrolle - auch zur Laufzeit. Worüber also zerbrichst du dir denn da den Kopf?
Grüße vom marabu