2. Fórumok
  3. Szoftverfejlesztés
  4. Delphi programozás
Keresés

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

  • #1726 vz12 tag Yodafon #1723
    Új Válasz #1726
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    vz12

    tag

    válasz Yodafon #1723 üzenetére

    Azt hiszem hogy egy kis hibát vétettem, ezt korrigálom:

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

    Helyesen tehát "OnSelectCell" kell ide ahogy Fire példáján is látszik, ezt tévesztettem el. Ha az értékadás jobb oldalaira azonos eljárás nevet írsz be akkor szerintem megvalósul amit szeretnél, tehát közös OnSelectCell eljárása lesz minden példánynak.

    Egyébként ez is belerakható ám a ciklusba, így lesz biztosítva a legegyszerűbben a közös OnSelectCell, tehát:
    mezo[i].OnSelectCell:=Sajat_SelectCell; // paraméterek NÉLKÜL

    A többi rész viszont változatlan, tehát a Sajat_SelectCell eljárást szigorúan a definiálandó eljárás paraméterlistájával (OnSelectCell) deklarálni és definiálni (kifejteni) kell.

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

    Meghíváskor át kell adni a paramétereket is!
    Pl. mezo[1].OnSelectCell(Sender,1,1,bValtozo);
    Figyelj rá hogy a 4. paraméternek logikai változónak kell lennie a "VAR" miatt!
    Ez át fog irányítódni a form Sajat_SelectCell eljárásába és továbbadja a paramétereket is. Viszont a Sajat_SelectCell-t meg kell írni !!! Tehát le kell reagálni a cella kiválasztódás eseményét, ha nem írsz bele semmit akkor ilyenkor nem fog történni semmi. Legalábbis úgy gondolom, mert ezt sem próbáltam ki. :)

  • #1724 Fire/SOUL/CD félisten Yodafon #1723
    Új Válasz #1724
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Fire/SOUL/CD

    félisten

    válasz Yodafon #1723 üzenetére

    Hali!

    Oks, akkor figyu. Írd le légyszives, hogy mit szeretnél megvalósítani, de sima hétköznapi nyelven. pl
    "Ha rákattintok a stringgrid1-re, akkor formázza le a HDD-t, ha meg a stringgrid2-re, akkor elötte kérdezze is meg, hogy leformázhatja-e...." :DDD

    Szívesen segítek, de most elvesztettem a fonalat pl ezért:

    "Pont azt szeretném elkerülni hogy minden mezönek saját SelectCell-je legyen."
    A TStringGrid objektunak nincs ilyen tulajdonsága, függvénye, procedúrája, stb
    onSelectCell eseménye(event) az van, na ezt meg nem a programozó dönti el, hogy az objektummal létrejöjjön-e vagy sem. Csak azt, hogy felprogramozod vagy sem.

    Szóval hétköznapi nyelven írd le, hogy mit szeretnél, abból majd rájövök(remélem) :DDD

    Fire.

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