Backgroundin vaihto

Delphi-aloittelija

Otsikko kertoneekin jo kaiken. Eli formin background olisi mukava osata vaihtaa. Ottaisin kernaasti vastaan osaavilta apua, kiitos.

5

451

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • vaikeamman kautta

      Joskus asiat voidaan tehdä vaikeamman kautta.

      Tehdään nyt vaikka niin (Tarkoituksena on
      että saat muitakin ideoita)


      Eli laita lomakkeelle (form) ensin TImage-komponentti.

      Laita sen Align ominaisuus arvoon alClient.


      Tuo sen päälle painonappi (TButton).

      Tee painonapille onClick -tapahtuma.

      Muokkaa onClick tapahtuma tälläiseksi:

      procedure TForm1.Button1Click(Sender: TObject);
      var StartX, StartY:integer;
      begin
      With Image1.Canvas do
      begin
      Brush.Color:= clRed;
      StartX := 0;
      StartY := 0;
      Rectangle(StartX, StartY,StartX Width, StartY Height);
      end;
      end;


      Tämän kokeilun jälkeen voit vaikkapa
      laittaa tuon koodin lomakkeen luontitapahtumaan (eli onCreate)
      Eli luot tuollaisen tapahtuman jolloin sen nimeksi tulee
      procedure TForm1.FormCreate(Sender: TObject);

      • Tänks

        Mutta herää vielä vain kysymys, että miten tungen jonkun kuvatiedoston sinne taustalle? Ja missä tiedostomuodossa sen pitää olla?

      • on tarjolla
        Tänks kirjoitti:

        Mutta herää vielä vain kysymys, että miten tungen jonkun kuvatiedoston sinne taustalle? Ja missä tiedostomuodossa sen pitää olla?

        Käytännössä png (bmp tai xpm )-kuva.
        Tosin muitakin formaatteja on tuettuna.

      • Helpoin tapa
        Tänks kirjoitti:

        Mutta herää vielä vain kysymys, että miten tungen jonkun kuvatiedoston sinne taustalle? Ja missä tiedostomuodossa sen pitää olla?

        Helpoin tapa:

        TImage- komponentti ikkunaan. Komponenttimuokkaimessa menet Picture kohtaan. Painat kolme pistettä (...) nappia, jonka jälkeen avautuu tuo kuva -ikkuna. Kuvan haet tuo-napilla ja
        ok-lla hyväksyt sen.

      • asddfghjlkä'
        Helpoin tapa kirjoitti:

        Helpoin tapa:

        TImage- komponentti ikkunaan. Komponenttimuokkaimessa menet Picture kohtaan. Painat kolme pistettä (...) nappia, jonka jälkeen avautuu tuo kuva -ikkuna. Kuvan haet tuo-napilla ja
        ok-lla hyväksyt sen.

        Tarkemmin täällä:

        http://wiki.mureakuha.com/wiki/Valmiin_kuvan_tuominen_omaan_ohjelmaan

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Arman Alizadin viesti puna-aktivisteille: "Pitäkää lärvinne nytkin kiinni"

      Arman Alizad kritisoi vasemmiston kaksinaismoralismia. Iranissa syntynyt suosikkijuontaja Arman Alizad pakeni perheensä
      Maailman menoa
      234
      3992

    2. Minja Koskela nostanut vasemmistoliiton kannatuksen ennätykseen

      Koskela valittiin puolueen johtoon lokakuussa 2024, ja silloin Ylen kysely antoi puolueelle 9,3 prosentin kannatuksen.
      Maailman menoa
      123
      2307

    3. Antti johtaa Petteriä jo 7,1 prosenttiyksiköllä

      Tällä menolla sdp menee kokoomuksesta kierroksella ohi jo tällä vaalikaudella. https://yle.fi/a/74-20213575
      Maailman menoa
      82
      1996

    4. Harmi nainen kun

      olet niin elähtäneen näköinen. Miestä et koskaan löydä itelles. j
      Ikävä
      141
      1461

    5. Mistä kehon osasta

      Pidät minussa eniten?
      Ikävä
      77
      929

    6. Seuraavakin hallitus joutuu leikkaamaan

      Sitähän tämä hallitus nyt höpöttää, kun itse on ajanut tilanteen katastrofaaliseksi. Orpon hallitus lähti suurin puhein
      Maailman menoa
      127
      927

    7. Hotelli kainuu

      Mietityttää, hotelli Kainuussa, se, että asiakkaat voivat valita ketä saa olla ja ketä ei, Illan aikana asiakkaina!
      Kuhmo
      37
      920

    8. Ovatko vastasyntyneet vauvat syntisiä?

      Se ihmisten keksimä järjetön perisynti, jos ovat!
      Luterilaisuus
      330
      849

    9. Pitäis vaan lopettaa

      Sinun kanssa yhteydenpito. Alkaa vaan haluamaan enemmän ja tuskin lopulta mikään kohtaisi. Ja ikävä vaan kasvaa ja lähei
      Ikävä
      8
      847

    10. J. Rinta-Joupilla jättimäinen veropetosvyyhti

      Seinäjoen keskustan kiinteismiljonäärit olleet jo pitkään ahtaalla ja liittykö J. Rinta-Jouppikin rintamaan? https://yl
      Seinäjoki
      61
      756
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt