Einzelnen Beitrag anzeigen

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.429 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: Kreuzworträtsel

  Alt 31. Mai 2012, 07:50
Zumindest in Delphi ist diese Variante denkbar:
Delphi-Quellcode:
type
  TMyGridHelper = class helper for TCustomGrid
    procedure Select(ACol, ARow: Longint);
  end;

  procedure TMyGridHelper.Select(ACol, ARow: Longint);
  begin
    FocusCell(ACol, ARow, True);
  end;

{...}
SGridKreuzwort.Select(i + Horizontal, j + Vertikal);
Alternativ könnte man auch eine Klasse von TStringGrid ableiten und diese Methode implementieren.
  Mit Zitat antworten Zitat