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

Hirdetés

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

  • #2060 Tomi_78 tag
    Új Válasz #2060
    Ú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

    Tomi_78

    tag

    Segítség ismét...! Most meg a képpont színének cseréje nem működik valamiért!
    Egy cikluson belül szeretném váltogatni a fehér és kék színeket. Ez a kódom hozzá Lazarusban:
    if (random(100)=1) and (palyakep.canvas.GetPixel(vsz,vm)=TColor($FF0000)) then
                             palyakep.canvas.SetPixel(vsz,vm,TColor($000000))
                           else
                             palyakep.canvas.SetPixel(vsz,vm,TColor($FF0000));
    de nem jó, mert ezeket a hibákat írja ki:
    unit1.pas(98,64) Error: identifier idents no member "GetPixel"
    unit1.pas(99,42) Error: identifier idents no member "SetPixel"
    unit1.pas(101,42) Error: identifier idents no member "SetPixel"

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