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

• #1726 vz12 tag Yodafon #1723

  Új Válasz 2009-06-06 01:02:19 #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 2009-06-05 18:43:00 #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...."

  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)

  Fire.

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