Backgroundin vaihto

Delphi-aloittelija

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

5

498

    Vastaukset 5

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

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

    Luetuimmat keskustelut

    1. Mikä sun salaisuus on,kun näytät niin nuorelta..

      Vaikka oot jo noin vanha!?
      Ikävä
      116
      1366
    2. MiltäKaivattusi

      Näyttää? !
      Ikävä
      45
      911
    3. Myönnetään, tunnen lämpimiä tunteita kohtaasi

      Vaikutat tosin liian hyvältä ollaksesi totta. Komeita miehiä on maailma pullollaan mutta sinussa on jotain.....
      Ikävä
      50
      746
    4. Perhoseni (miehelle)

      Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r
      Ikävä
      132
      697
    5. Mitä meidän välillämme

      On käynyt näiden vuosien aikana?
      Ikävä
      70
      666
    6. Uskaltaisitko

      Tavata kaivattusi tässä tilanteessa?
      Ikävä
      67
      616
    7. Olen tavattavissa

      tänään klo 17-02 siinä ravintolassa. Tulethan sinäkin?
      Ikävä
      53
      607
    8. Halaus juuri sinulle

      Kaikki järjestyy kyllä. Luota vain. ❤️🫶
      Ikävä
      55
      565
    9. Onko Sofia jälleen jätetty?

      Moni asia viittaisi siihen, että hän on jälleen sinkku.
      Kotimaiset julkkisjuorut
      100
      499
    10. Mies, näetkö minut myös

      Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?
      Ikävä
      20
      490
    11. Rekat seisovat dieselin hinnan takia . Ala ei kestä tällaista hintatasoa, sanoo yrittäjä .

      EU:n kallein diesel on kova paikka kuljetusalalle. Ajoja on jätetty ajamatta kannattavuus­ongelmien vuoksi, sanoo alan e
      Kajaani
      98
      470
    12. Voiko se ikinä toimia

      Voiko meistä ikinä tulla mitään? Näin kauan aikaa on kulunut ja mitään ei tapahdu... En usko, että sinä mietit minua het
      Ikävä
      32
      468
    13. Meneekö unohtamis

      Projektisi hyvin??
      Ikävä
      34
      467
    14. Nainen, mitä mieltä olet kodittomista?

      Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?
      Ikävä
      115
      463
    15. Kuka se on

      Kuhmon komein aikamies?
      Kuhmo
      5
      458
    16. Mitä jos...

      Susta tykätään poikana enemmän, kun tyttönä? Miten asian käsittelet tai otat tiedon vastaan? T nainen gubetellija herät
      Sinkut
      142
      453
    17. Uskallatko paljastaa

      Millä nimellä löydyn puhelimestasi?
      Ikävä
      49
      447
    18. Voin tulla

      Sisustamaan sulle 🤭
      Ikävä
      51
      445
    19. Et sinä mitään

      Oikeasti halua
      Ikävä
      52
      413
    20. Miksi jätit vastaamatta mies

      Silloin kauan sitten 😔
      Ikävä
      42
      410
    Aihe