Ohjelmointivinkkejä (C#)

C# ja Visual Studio

Vain yksi sovellusikkuna (WPF)

Sovellukseni etenee tyypillisesti näkymästä toiseen, esimerkiksi: päävalikon sisältämä näyttö -> Kasvin haku (hakuehdot ja taulukko hakutuloksista) -> Katsotaan kasvin tiedot. Tähän asti jokainen näkymä on minulla avautunut omaan ikkunaansa. Tämä tekee yleisvaikutelman sekavaksi ja joskus se aktiivinen ikkuna on hukassa.

Löysin syksyllä WPF:n elementin "UserControl". Se voi sisältää kaikkia osaelementtejä mitä ikkunassakin on eli buttoneita, tekstikenttiä, taulukoita jne. Ensin tehdään edellämainittu päävalikon sisältämä näyttö. Siinä on Window-elementti ja sen sisällä UserControl, jossa on tarpeelliset buttonit ym. Muissa näkymissä (xaml-tiedostoissa) ei ole ollenkaan Window-elementtiä, vaan se on yksi UserControl buttoneineen ym.

Kun aloitusikkunassa esimerkiksi klikataan buttonia haluten siirtyä seuraavaan näkymään (UserControlliin) nimeltä Kasvihaku, niin aloitusikkunan sisältö korvataan uudella näkymällä:
Window win = Window.GetWindow(this);    // saadaan taustaikkuna
win.Content = new Kasvihaku();   // sisältö vaihdetaan

Ohjelmallisesti tämä merkitsee myös sitä, että näkymää avatessa sen sisältö määritellän kokonaan uudestaan. Jos olemme tehneet kasvihaun näkymässä Kasvihaku(), ja siellä klikataan katsomaan jonkun kasvin tietoja, niin näkymää Kasvihaku() ei enää ole "alla". Ja kun palataan kasvin tietoja katsomasta, niin avautuu tyhjä Kasvihaku. Yleensä tässä tilanteessa haluaa nähdä samat hakuehdot ja tulokset kuin hetki sitten.

Jokaisen avattavan näkymän alkuarvojen on siis oltava olemassa. Tämän olen toteuttanut listarakenteella:
public static List<Tila> seurx = new(); // usercontrollien input

Eli meillä on listana avattavien "päällekkäisten" usercontrollien lähtödata. Kun esimerkiksi Kasvihaku-näytöllä kirjoitetaan hakuehtoja, ne tallennetaan myös alkuarvojen listaan. Edellämainittu Tila on esimerkiksi seuraavaa:
public class Tila
{
   public string Seurx { get; set; } = "";   // seuraava näkymä, esim "KASVIHAKU"
   public KashakuKent Kkent { get; set; } = new();  // Kasvihaku
   // ....
   public string Kpolkuz { get; set; } = "";  // kuvan koko polku mm  -> Kuvaikku
   public string Kinfoz { get; set; } = "";  // kuvaan ym liittyvä info
   // ...
   public int IDkohde { get; set; } = EIOO;
   public int IDkasvi { get; set; } = EIOO;
}

Aina kun avataan seuraava näkymä (usercontrol), se tapahtuu näin:
Window win = Window.GetWindow(this);  // tallennetaan oma ikkunakoko poistumishetkellä
seurx[0].Wheight = win.Height;
seurx[0].Wwidth = win.Width;
// kerätään seuraavan ikkunan data:
Tila tila = new(); 
tila.Seurx = "KASVIKATSO";  // seuraavan ikkunan nimi
tila.IDkasvi = 55;  // esimerkki inputista
tila.Wheight = 400;  // seuraavan ikkunan koon vakioarvot
tila.Wwidth = 700;
seurx.Add(tila);        // lisätään avattavan näkymän tiedot pinoon
seurx.Insert(0, tila);
// ikkunan koko on annettava ennen näkymän avaamista
win.Height = tila.Wheight;
win.Width = tila.Wwidth; 
win.Content = new Kasvikatso();  // avataan seuraava näkymä

Ja kun palataan takaisinpäin, niin tarvitaan tällaisia vaiheita:
// katsotaan edellisen, nyt avattavan ikkunan mitat
Window win = Window.GetWindow(this);
win.Height = seurx[1].Wheight;
win.Width = seurx[1].Wwidth;  // ikkunalle koko ennen näkymän avaamista
seurx[1].IDkuva = ... // voidaan viedä tietoa nyt avattavalle näkymälle
seurx.RemoveAt(0);  // poistetaan pinosta suljettava näkymä
win.Content = ValitseNakyma(seurx[0].Seurx); // edellinen näkymä avataan

Edellä oleva funktio ValitseNakyma nimensä mukaan suorittaa kutsun, jolla haluttu näkymä avataan. Funktion olennainen sisältö on switch-rakenne, esimerkiksi (C# 8.0):
return nimiz switch
{
    "KUVAIKKU" => new Kuvaikku(),
    "PAAIKKU" => new Paaikku(),
    "KAIKIKKU" => new Kaikikku(),
}

Näkymässä muutettuja arvoja (edellä kasvihaun hakuehtoja) voi xaml-rivillä määritellä meneväksi haluttuu paikkaan, esimerkiksi:
<TextBox x:Name="txtSunimi" Text="{Binding Kkent.Sunimi}"  Margin="3" Width="100" />

Tämä ei ole täydellinen ratkaisu, koska binding-paikkaan vietäessä avatun luokan (näkymän) sisällä, tekstikenttä ei päivity. Lisäksi ComboBox toimii hieman eri logiikalla. Yksinkertaisinta voi olla:
- juuri ennen seuraavaan näkymään menemistä kerätään ilman bindingeja kentissä olevat arvot talteen pinon Tila-muuttujaan
- heti näkymän avaamisen jälkeen viedään Tila-muuttujasta arvot tekstikenttiin tyyliin
   txtSunimi.Text = "Valkovuokko";

Näillä periaatteilla olen päivittänyt Herbaariosovellukseni onnistuneesti. Loppuviimeistelyaikaa meni ikkunakokojen ja värien määrittelyyn.

Kartan näyttäminen ja koordinaatit

Koordinaattipisteiden keskinäisen etäisyyden laskeminen

Sovelluksessa voi olla tarpeen selvittää kuinka kaukana jokin paikka on toisesta paikasta, kun molempien koordinaatit tunnetaan. Minulla tämä tuli eteen, kun halusin löytää tietokannasta kuvat, joiden ottopaikat on tietyn ympyrän sisällä tietystä koordinaattipisteestä. Tietokannassa on kuvien koordinaatit. Seuraava funktio laskee onko kahden pisteen etäisyys alle vai yli annetun etäisyyden ja tarvittaessa myös pisteiden etäisyyden kilometreinä. Funktion sisällä on nopea karkealaskenta ja lisäksi noin 7 kertaa hitaampi tarkka laskenta:

//-----------------------------------------------------------------------
// (Windows C#)
// Lasketaan etäisyys näiden välillä: koord_1 ja koord_2. Outputtina
//   etäisyys metreinä tai
//   -1 jos oli ongelma tai
//   detmax + 1000.0, jos pikalaskenta antoi, että etäisyys > detmax
// Jos detmax < 0.0, tuloksena aina etäisyys metreinä käyttäen tarkempaa laskentaa
// Jos detmax > 0.0, tehdään ensin nopea karkealaskenta ja sen jälkeen tarvittaessa tarkempi
// Jos detmax > 0.0 ja etäisyys sitä suurempi, tuloksena joko -1, detmax + 1000 tai todellinen etäisyys
// Käytetään etäisyyden laskentaan Pythagooran teoreemaa
// Ennen kutsua tulee olla tarkastettu, että koordinaateissa vain numeroita ja piste
public static long KoordEtaisyys(double dlat1, double dlon1, string lat2, string lon2, double detmax)
{
    long R = 6371000;  // maapallon säde metrejä
    if ((detmax > 1000000.0) || (detmax < 0.0 && detmax != -1.0)) // yli 1000 km ei kelpaa  
    {
        MessageBox.Show($"Input etmax virheellinen: {detmax}", "(M25-01) Ohjelmointivirhe");
        return -1;
    }
    if (lat2.IsEmpty() || lon2.IsEmpty())
    {
        MessageBox.Show("Input-koordinaateissa tyhjää", "(M25-02) Ohjelmointivirhe");
        return -1;
    }
    double dlat2 = double.Parse(lat2, CultureInfo.InvariantCulture);
    double dlon2 = double.Parse(lon2, CultureInfo.InvariantCulture);

    // Tarkastetaan ovatko koordinaatit identtiset
    double ero1 = dlat1 - dlat2;
    double ero2 = dlon1 - dlon2;
    if (ero1 < 0.0001 && ero1 > -0.0001 && ero2 < 0.0001 && ero2 > -0.0001)
        return 0;

    // Muunnetaan inputit radiaaneiksi
    double fii1 = (Math.PI / 180) * dlat1;
    double fii2 = (Math.PI / 180) * dlat2;
    if (detmax > 0.0)  // Pikalaskenta leveyspiiriä pitkin:
    {
        double ddlat = Math.Abs(R * (fii2 - fii1));
        if (ddlat > detmax)
            return (long)detmax + 1000;   // liian kaukana toisistaan
    }

    double lan1 = (Math.PI / 180) * dlon1;
    double lan2 = (Math.PI / 180) * dlon2;
           
    if (detmax > 0.0)  // Pikalaskenta pituuspiiriä pitkin:
    {
        double ddlon = Math.Abs(R * (lan2 - lan1) * Math.Cos((fii1 + fii2) / 2));
        if (ddlon > detmax)
            return (long)detmax + 1000;     // liian kaukana toisistaan
    }

    // Lasketaan etäisyys tarkemmalla kaavalla
    double x = (lan2 - lan1) * Math.Cos((fii1 + fii2) / 2);
    double y = fii2 - fii1;
    double dd = Math.Sqrt(x * x + y * y) * R;
    return (long)dd;
}

Ovatko koordinaatit Suomessa

Onko meillä nettiyhteyttä

Videoleikkeet

Macista haetun tiedostonimen skandit

Exif-koodit

Muutamia koodiesimerkkejä  C# WPF