Grid durchlaufen + Zählen (Array)

Dhakiyah · Beiträge: 327 Erhaltene Danke: 5 Windows 7 Delphi XE2

Hallo!
Ich habe einen Kalender in dem Buchstaben drin stehen. Die sollen gezählt werden und in ein dynamisches Array gepackt werden. Aber ich weiß gar nicht wie ich das machen soll.

Eine extra Procedure soll ich machen.

Kann mir jemand helfen?

Ich hab mal versucht erstmal nur einen Buchstaben zu lesen, aber nix passiert...

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

procedure Tfrm_mdi_kalender.zaehlen(Sender: TObject);
var zaehler: array of array of string;
    i: word;
    j: integer;
    buchstabe: string;
begin
  SetLength(zaehler, 1, 2);
  buchstabe:= fg_kalender.GetCellText(2,2);
  zaehler[1,2]:= buchstabe;
  fg_zaehler.SetCellText(0,0, zaehler[1,2]);
end;

_________________
Es ist soooo flauschig !!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme