Otsikko kertoneekin jo kaiken. Eli formin background olisi mukava osata vaihtaa. Ottaisin kernaasti vastaan osaavilta apua, kiitos.
Backgroundin vaihto
Delphi-aloittelija
5
458
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
Asiakkaalle ei myyty energiajuomaa - tuomio tuli syrjinnästä
Vaikka oli ilmeisesti täysi-ikäinen. Tosin ei lapsiakaan saisi syrjiä, koska oppivat helposti itsekin syrjimään, jos koh402474Miksi aina pitää kilpailla parhaudesta?
Mua ärsyttää se, että kaikki kilpailut ja visailut keskittyvöt aina siihen, kuka on paras missäkin. Tänäkin aamuna tuli601825Pakkoruotsista luopumalla kymmenien miljoonien säästöt
Pakkoruotsin opiskelun kustannuksista ei ole juurikaan tehty kustannusselvityksiä, mutta joidenkin arvioiden mukaan siit521689- 911523
Luterilaisen kirkon koko kastekaava on väärä
Uudessa testamentissa on kaksi täysin ristiriidassa olevaa kastekäskyä Matt 28:19 ja Ap. t. 2:38. Matteuksen evankeluimi411364Kerro minulle
Miksi teit niinkuin teit? Miksi kielsit tunteesi minua kohtaan. Miksi et halunnut että tiedän oikeasti mitä tunnet. Etkö62955Seksuaalinen ahdistelu, naisten vähättely ja törkeä käytös naisia kohtaan kukkii rakennustyömailla
Tällainen lienee ihan tavallisista kaikilla "äijävaltaisilla" työpaikoilla. Kaikki miesvaltaiset alat eivät ole toksise121905Miten Yxäri iskettiin?
Voisin tässä unta odotellessani kertoa, miten mieheni lähestyi minua. Tunsimme entuudestaan. Hän kyseli minulta aina j165868Kristinuskossa Isän ja Pojan ja Pyhän Hengen nimessä
Jeesuksen kehoitus kastamiseksi Isän ja Pojan ja PH:n nimeen. Matt 28:19: "Menkää siis ja tehkää kaikki kansat minun378845Rakkaalle J miehelle.
Hitto mulla on sua ikävä. Haluisin heti nyt tulla sun syliin ja suudella sua.ja, ja ja... Hirveä ikävä.64825