Koodia ReplaceAll - napin alle?

ReplaceDialog

Delphin (Turbo 2006) ReplaceDialogin eventsien OnFind ja OnReplace avulla olen saanut koodia sijoitettua Find(Etsi) ja Replace (Korvaa)-nappien alle. Mutta miten saadaan sijoitettua koodia ReplaceAll (Korvaa kaikki)-napin alle?

PS. tietysti olisi kiva saada kattavat täydelliset koodit FindDialogille ja ReplaceDilaogille (sattuisiko kellään olemaan vinkkiä ;)), mutta on ollut hauska yrittää itsekin sompailla. Tuo Replace All on vielä ratkaisematta. Koodi on mulla valmiina, mutta miten saan sen 'Korvaa kaikki'-napin alle?

1

416

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ...

      if frReplaceAll in ReplaceDialog1.Options then

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

    Luetuimmat keskustelut

    1. Donald Trump joutui ammutuksi vaalitilaisuudessaan

      Näin se näyttää olevan, että Trumpilla on niin kannattajia kuin vastustajiakin. Hengissä käveli pois, ilmeisesti jokin
      Maailman menoa
      509
      4585
    2. Rakastan sua nainen vieläkin

      mut aion pysyy hiljaa 😔
      Ikävä
      57
      1979
    3. IS Viikonloppu 13.-14.7.2024

      3- -merkitty kovis Antti Skytältä. Ratkaisulauseita sai kunnolla miettiä senkin jälkeen kun niistä pääsi jyvälle. Jotkut
      Sanaristikot
      116
      1723
    4. Kova oli pauke!

      Kyllä oli viime yönä kova pauke Iisalmessa. Koko kaupunki taisi herätä ja säikähtää moista pauketta. Eikö tämä riko jo
      Iisalmi
      48
      1471
    5. Tänään rohkaisin

      Mieleni (tai siis eilen jos tarkkoja ollaan ja kävelin ihan sun kodin ohi molemmin puolin 😂😆🤭 katelin tarkkaan ympäri
      Ikävä
      103
      1397
    6. Kerro kolme hyvää asiaa

      kaivatustasi :)
      Ikävä
      73
      1349
    7. Nykynuoret puhuu nolosti englantia suomen sekaan, hävetkää!

      Kamalan kuuloista touhua. Oltiin ravintolassa ja viereen tuli 4 semmosta 20-25v lasta. Kaikki puhui samaan tyyliin. Nolo
      Maailman menoa
      83
      1235
    8. Sunnuntain kirjainleikkejä

      Kuinka monta kirjainta kaivattusi etu- ja sukunimissä on yhteensä? Ap vastaa 11 ja miehen nimi alkaa heheee Jiillä 🧑‍🍳
      Ikävä
      20
      1212
    9. Sitä vielä...

      Että tiedätkö olisiko meidän suhde jotenkin kiellettyä/laitonta?
      Ikävä
      54
      1136
    10. Tässä nyt kummallakaan ei ole

      Mennyt ihan putkeen kommunikointi. Tiet on vienyt meidät erilleen. Onko nyt hyvä, näinkö toivoit mies kaiken päättyvän?
      Ikävä
      61
      967
    Aihe