Hirdetés

Új hozzászólás Aktív témák

  • vz12

    tag

    válasz Yodafon #1720 üzenetére

    Próbáld meg valahogy így:

    mezo[1].SelectCell:=Sajat_SelectCell; // paraméterek NÉLKÜL

    mezo[2].SelectCell:=Sajat_SelectCell; // paraméterek NÉLKÜL

    Valamint szigorúan "eredeti" paraméterlistával:

    procedure TForm1.Sajat_SelectCell(Sender: TObject; ACol,
    ARow: Integer; var CanSelect: Boolean);

    Ezt a deklarációs résszel összhangban a kódba is bele kell tenni (természetesen ott kifejtve).

    Hozzáteszem hogy nem próbáltam ki, ezen a gépen nincs Delphi sem, de elvileg így kell és ez gyakorlatilag semmiben nem különbözik a "normál" esettől, annak jobb könyvekben benne kell lennie.

    Ha már ilyen előrelátó módon tömbbe szervezted az objektumokat akkor azok közös adatait (itt majdnem mind az) én a ciklusban inicializáltam volna a "parent"-hez hasonlóan, tehát pl. mezo[i].Top:=20;

    [ Szerkesztve ]

Új hozzászólás Aktív témák