Backgroundin vaihto

Delphi-aloittelija

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

5

458

    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ä.

    Luetuimmat keskustelut

    1. Kuhmossa rallit alkoi ennen aikojaan

      Paettiin polliisia törkeästi? Se tuo rallikiima on näemmä saavuttanu paikalliset tommi mäkiset kiljupäissään auton rat
      Kuhmo
      33
      1339
    2. Kaste tulisi tehdä apostolisella tavalla Ap. t. 2:38 mukaan

      Apostolit eivät kastaneet kolminaisuuden nimellä vaan Jeesuksen alkuperäisen käskyn mukaisesti: Ap. t. 2:38 Niin Pietar
      Kaste
      69
      1105
    3. Tuleeko tästä

      Enää mitään. Voiko mitään enää korjata?
      Ikävä
      105
      965
    4. 41000 kavallettu rahaa

      uutisoi Kaleva ja iltasanomat vuosina 2020-2022 välisenä aikana hävinnyt toi summa tuomittu nainen 1971 syntynyt.
      Pyhäjärvi
      43
      933
    5. Mitä muutoksia tekisit

      kaivatullesi? Miten on? Muista olla REHELLINEN 📸
      Ikävä
      66
      765
    6. Kerro minulle

      Miksi teit niinkuin teit? Miksi kielsit tunteesi minua kohtaan. Miksi et halunnut että tiedän oikeasti mitä tunnet. Etkö
      Ikävä
      56
      749
    7. Tietäisitpä vain mitä se

      yksikin on susta puhunut :) j
      Ikävä
      42
      746
    8. Fantasioista

      Suurimmalla osalla meistä on jonkinlaisia eroottisia fantasioita. Miten sinä suhtaudut fantasioihin? Ruokitko niitä vai
      Sinkut
      117
      735
    9. Se riisuu suosimasi paatoksen, paljastaa egosi tyhjäksi

      Idän fisosofian vihaaja kirjoitti: "Muuten tämä idän-uskontojen mekaniikka hävitää ja hautaa tästä kaiken hyvän paatoks
      Hindulaisuus
      302
      676
    10. Olet sinä ihana

      Muttei sua taida kiinnostaa muu kuin sun työ:(
      Ikävä
      29
      655
    Aihe