Problem mit GridPanel

[himitsu]

Da das GridPanel die Komponenten selber ausrichtet, wirst du immer Probleme bekommen, wenn man da versucht selber was einzuordnen.
Vorallem dann, wenn die Position wo was einsortiert wird, mit denen von dir kollidiert.

Füge mal diesen Code ans Ende deiner inneren Schleife. (hinter die derstellte CheckBox)

Delphi-Quellcode:

Application.ProcessMessages;
Sleep(1000);

Und schau dir an, was da passiert.
Genau auf die Position der neuen und "alten" CheckBox achten.

So, und nun dreh mal die Erstellungsreihenfolge um, so daß keine Kollitionen mehr entstehen.

Delphi-Quellcode:

for i := 6 downto 2 do
  for j := 6 downto i do

Wenn du später nicht via FindComponent auf die Komponenten zugreifen willst/mußt, dann kannst du den .Name auch leer lassen.

PS: Der [delphi]-Code macht sich bestimmt besser.

[himitsu]

Erst AddControl und dann der Parent geht scheinbar auch.

Delphi-Quellcode:

for i := 2 to 6 do
  for j := i to 6 do
  begin
    RB[i,j] := TCheckbox.Create(TG);
    RB[i,j].caption := inttostr(i) + ' if ' + inttostr(j);
    RB[i,j].enabled := false;
    TG.ControlCollection.AddControl(RB[i,j], j-2, i-2);
    RB[i,j].Parent := TG;
  end;

[Gutelo]

Hallo Himitsu,

ja per "slow motion" hatte ich inzwischen auch gesehen dass er beim Fuellen der 3. Zeile die Elemente in der zweiten Zeile nach links verschiebt. Allerdings macht er das bei den weiteren Zeilen nichtmehr.

Dass Gridpanel die Objekte selber sortiert ist meines Erachtens eine hirnlose Funktion, vorallem wenn man dem User explizit die Moeglichkeit gibt die properties row und column zu setzen. Kontrolle der Platzierung sollte meines Erachtens beim User liegen und nicht beim Grid.

Vielen Dank fuer deine Hilfe,

Gutelo

PS: Das war erstmal eine Proof-of-Principle Schnellimplementierung