Otsikko kertoneekin jo kaiken. Eli formin background olisi mukava osata vaihtaa. Ottaisin kernaasti vastaan osaavilta apua, kiitos.
Backgroundin vaihto
5
396
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
Hengenvaaralliset kiihdytysajot päättyivät karmealla tavalla, kilpailija kuoli
Onnettomuudesta on aloitettu selvitys. Tapahtuma keskeytettiin onnettomuuteen. Tapahtumaa tutkitaan paikan päällä yhtei1986938- 1592046
- 1131688
- 511390
Suureksi onneksesi on myönnettävä
Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️551248Möykkähulluus vaati kuolonuhrin
Nuori elämä menettiin täysin turhaan tällä järjettömyydellä! Toivottavasti näitä ei enää koskaan nähdä Kauhavalla! 😢501108Älä mies pidä mua pettäjänä
En petä ketään. Älä mies ajattele niin. Anteeksi että ihastuin suhun varattuna. Pettänyt en ole koskaan ketään vaikka hu1001074Reeniähororeeniä
Helvetillisen vaikeaa työskennellä hoitajana,kun ei kestä silmissään yhtään läskiä. Saati hoitaa sellaista. Mitä tehdä?71006Tarvitsemme lisää maahanmuuttoa.
Väestö eläköityy, eli tarvitsemme lisää tekeviä käsiä ja veronmaksajia. Ainut ratkaisu löytyy maahanmuutosta. Nimenomaan253961- 41939