Ongelmia stringien kanssa

MiTen se nyt On

Miten merkkijonoluettelo pitäisi tuoda näihin monirivisiin käyttöliittymäkomponentteihin. xx.AddStrings( ) ? xx.Assign( )? xx.text := vai joku muu? (Miksi tämä) Olisi hienoa jos olisi pieni selventävä esimerkki myös

3

760

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • example_dk6

      Eli jos nyt oikein ymmärsin kysymyksesi, niin alla oletettava vastaus: procedure TForm1.Button1Click(Sender: TObject); var sl : TStringList; begin sl := TStringList.Create; try sl.Add('1'); sl.Add('2'); sl.Add('3'); //Memo1.Lines.AddStrings(TStrings(sl)); //Memo1.Lines.Assign(sl); //Memo1.Lines.Text := sl.Text; finally sl.free; end; end; Vaihtoehdot kommentoituna, onnistuu vielä eri tavoinkin, mutta tuskinpa tarvitset lisää esimerkkejä.

      • high power

        Eri vaihtoehtoja on tarjolla mutta onko näiden suorituskyvyssä eroja ?


      • Delphiguru
        high power kirjoitti:

        Eri vaihtoehtoja on tarjolla mutta onko näiden suorituskyvyssä eroja ?

        Ensinnäkin:

        nopeuden maksimomiseksi, tee näin:

        guiComponent.addStrings(SomeStrings);

        eityisesti TMemo:on lisäys saattaa olla nopein näin:

        memo1.Text := memo1.Text ^M^J SomeStrings.Text;

        jos lisäät "käsin" yksittäisiä merkkijonoja, niin:

        guiComponent.BeginUpdate;
        try

        // lisää 1 tai useampia merkkijonoja tässä, esim: guiComponent.Lines.Add('jotakin');

        finally

        guiComponent.EndUpdate;

        end;


        tuo addStrings -metodi kutsuu sisäisesti BeginUpdate / EndUpdate -paria nopeuden maksimoimiseksi.

        huomaa myös: vanhoissa Win95/Win98/winME -käyttöjärjestelmissä niin memoissa kuin TListBoxeissakin on maksimi rivi/merkkimääräraja aika alhaalla.


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

    Luetuimmat keskustelut

    1. Perussuomalaiset kirjoittaa vain positiivisista uutisista

      Ei tarvitse palstaa paljon seurata, kun sen huomaa. Joka ainoa positiivinen uutinen Suomen taloudesta tai ylipäätään, ni
      Maailman menoa
      109
      6746
    2. Kuka on UMK-suosikkisi? UMK26 paljastuksia lauantai 28.2.

      UMK26 tänä lauantaina! UMK26 tulee suorana Tampereelta ja nyt selviää, kuka pääsee edustamaan Suomea Euroviisuihin. M
      Euroviisut
      88
      4381
    3. L/over ja Jani Volanen! Minkä arvosanan 4-10 annat roolityöstä?

      Psykologinen trilleri L/over - ikuisesti minun on koukuttanut tv-katsojat ruudun ääreen. Kun Roosa (Krista Kosonen) tapa
      Tv-sarjat
      45
      3699
    4. TTK:n jättänyt Vappu Pimiä rehellisenä MasterChef-kuvauksista: "Höh..."

      Vappu Pimiä on uusi MasterChef Suomi -tuomari. Viime vuonna Tanssii Tähtien Kanssa jäi taakse, ja nyt vuorossa on uusi a
      Suomalaiset julkkikset
      13
      3100
    5. Natomaa hyökkäsi Iraniin

      Näemme nyt tällä hetkellä Natomaan nimeltä Yhdysvallat, joka toimii aika pitkälti perinteisen kansainvälisen lain ulkopu
      NATO
      628
      1698
    6. Miksi et nainen halua

      minua, kuten minä sinua?
      Ikävä
      66
      1108
    7. Rakas tiedät, että toivoisin

      Kuulevani sinusta. Tiedät, että viestisi tekisi minut ihan onnelliseksi. Että äänesi kuuleminen saisi minut leijumaan ja
      Ikävä
      55
      1083
    8. teemu samuli

      käykäähän lukemassa uusin alibi lehti 3/26 mitä tämä ihmissaasta satuilee..
      Suomussalmi
      9
      1079
    9. Trump aloitti III maailmansodan tänään.

      Narsisti ja mielipuoli Trump pitäisi saada pois, miten se onnistuisi parhaiten?
      Maailman menoa
      199
      1074
    10. Osaako kukaan sanoa?

      Mikä on syy siihen, että apulaisidiootti yrittää kaikin keinoin haitata kaikkea yrittämistä Ähtärissä? Nyttkin pilkkaa j
      Ähtäri
      47
      1039
    Aihe