Otsikko kertoneekin jo kaiken. Eli formin background olisi mukava osata vaihtaa. Ottaisin kernaasti vastaan osaavilta apua, kiitos.
Backgroundin vaihto
Delphi-aloittelija
5
456
Vastaukset
- 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
Eutanasia?
Kertokaas omia mielipiteitä eutanasiaan liittyen. Onko mielestäsi oikein vai väärin ja miksi?1012427Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?
Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä511193Riikka Purran kaudella nousi bensan hinta yli 2 euron
Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal1775112Veli Sofia teki urosmehiläisen työn
Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa313726Mitäs nyt sijoittajat?
Pörssit laskevat maailmalla Iranin sodan takia ja muutenkin ovat olleet Trumpin vallan alla epävarmat. Ainoa, mikä on no1963564Hjallis Harkimon, 72, Jasmine-rakas, 37, paljastaa suhteen alusta: "Vähän..."
Liikemies, kansanedustaja Hjallis Harkimo ja tuottaja-juontaja Jasmine Pajari ovat pariskunta. He asuvat yhdessä Sipooss503149Unisex-vessat
Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu1092874Jäit kiinni siitä
että katselet minua. Käänsin pääni, minäkin etsin sinua, ja meidän katseemme kohtasivat. Eikä se haittaa - molemmat ky132448Sosiaalidemokratia romahtanut kautta maailman
nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie532185Jutta Larm, 52, haluaa kumota tämän piintyneen ikämyytin
Oletko samaa mieltä? Jutta Larm on 52-vuotias ja tehnyt pitkän uran yrittäjänä. Hän haluaa kumota tämän piintyneen ikämy191975