febc6ef940 Posted December 27, 2015 Share Posted December 27, 2015 I'm having problems getting my script to work. When I run [k := PregMatch(bla, c);] the script outputs an empty line with WriteLn() but if I run [k := PregMatch('/^(?!(.).\1)[uitiedåhwtritnåtoiirsrmce]{3}$/im', c)] the script runs as expected giving me the first RegEx match in the loaded file. When I use WriteLn(bla); it will output the exact same string as used successfully above. There must be a hidden difference between the two strings but I cannot see it. Code below. var f: Integer; c: string; b: Integer; bla: String; k: string; begin f := OpenFile(IncludesPath + 'done.txt', True); ReadFileString(f, c, FileSize(f)); for b := 3 to 15 do begin bla := '''/^(?!(.).\1)[uitiedåhwtritnåtoiirsrmce]{' + IntToStr(b) + '}$/im'''; k := PregMatch(bla, c); //k := PregMatch('/^(?!(.).\1)[uitiedåhwtritnåtoiirsrmce]{3}$/im', c) WriteLn(k); end; Closefile(f); end. Quote Link to comment Share on other sites More sharing options...
Wanted Posted December 27, 2015 Share Posted December 27, 2015 Too many ' at the beginning and end. Try just bla := '/^(?!(.).\1)[uitiedåhwtritnåtoiirsrmce]{' + IntToStr(b) + '}$/im'; Could help more if I had something to use for file f to test. Quote Link to comment Share on other sites More sharing options...
febc6ef940 Posted December 28, 2015 Author Share Posted December 28, 2015 (edited) Thanks for taking an interest to my question. I put in the three apostrophes because the function I use goes like PregMatch('..', integer) and the 2nd and 3rd ' gets interpreted as a single apostrophe (just like \' would work in most other languages). But perhaps the apostrophes in PregMatch is not needed when referencing an object - I will have to try that when I get home. For a file you could use something like xxx xes ces yyy The RegEx should only pick out ces. Edit: I tried it and it worked - thanks. Edited December 28, 2015 by febc6ef940 Quote Link to comment Share on other sites More sharing options...
JanisItach Posted June 21 Share Posted June 21 Похудение это тема, которая всегда животрепещуща для многих женщин. Почти многие из нас стремятся к идеальной форме, но часто сталкиваются с трудностями и препятствиями на пути к этой цели. Но, с правильным подходом, похудение может быть достижимо без нервного напряжения и изнурительных диет. В данной статье мы рассмотрим 10 эффективных стратегий похудения, помогающие девушкам добиться хотимых результатов и сохранить здоровье. 1. Установите цель Пробным камнем к успешному похудению является установление конкретной цели. Обусловьте, сколько килограммов вы хотите сбросить и по какой причине. Цель должна быть близкой к реальности, измеримой и достижимой. 2. Питание Здоровое питание играет ключевую роль в ходе похудения. Сосредотачивайтесь на употреблении естественных товаров, богатых витаминами и минералами. Опасайтесь стремительных углеводов и жирной пищи. Устремляетесь к балансу макро- и микроэлементов в рационе. 3. Физическая активность Регулярные физические упражнения не только помогут сжигать калории, но и укрепят мышцы, улучшат общее самочувствие и увеличат выносливость. Найдите вид активности, который вам нравится: от йоги до плавания, от бега до танцев. 4. Гидрация Пить достаточное количество воды в течение дня не только поможет вам поддерживать уровень воды в организме, но и ускорит метаболизм, снизит аппетит и поможет сбросить лишний вес. 5. Сон Качественный сон играет главную роль в процессе похудения. Старайтесь спать более 7-8 часов в сутки, чтоб ваш организм мог восстановиться, а метаболизм был в норме. 6. Управление стрессом Стресс может стать препятствием на пути к похудению можно похудеть Найдите способы расслабления и отдыха: медитация, йога, чтение книжек, прогулки на свежем воздухе. 7. Ежедневный контроль Ведение дневника пищевых повадок и физической активности поможет вам понять, что вы едите и какой-никакое количество калорий потребляете, но также оценить свои успехи. 8. Постепенные изменения Избегайте радикальных диет и стрессовых ситуаций. Внедряйте изменения в кормленьи и виде жизни чуть-чуть, чтобы они стали размеренными привычками. Quote Link to comment Share on other sites More sharing options...
JanisItach Posted June 21 Share Posted June 21 Похудение это тема, которая всегда животрепещуща для большинства женщин. Многие из нас стремятся к идеальной форме, но нередко сталкиваются с трудностями и препятствиями на пути к этой цели. Но, с правильным подходом, похудение может быть достижимо без нервного напряжения и изнурительных диет. В данной статье будут рассмотрены 10 действенных стратегий похудения, которые помогут дамам добиться хотимых результатов и сохранить здоровье. 1. Установите цель Первым шагом к успешному похудению является установление определенной цели. Обусловьте, сколько килограммов вы хотите сбросить и по какой причине. Цель обязана быть близкой к реальности, измеримой и достижимой. 2. Питание Правильное питание играет главную роль в процессе похудения. Сосредотачивайтесь на употреблении естественных товаров, богатых витаминами и минералами. Избегайте прытких углеводов и жирной пищи. Устремляетесь к балансу макро- и микроэлементов в рационе. 3. Физическая активность Регулярные физические упражнения не только посодействуют сжигать калории, но и укрепят мышцы, улучшат общее самочувствие и увеличат выносливость. Найдите вид активности, который вам нравится: от йоги до плавания, от бега до танцев. 4. Гидрация Пить достаточное количество воды в течение денька не только лишь поможет вам поддерживать уровень жидкости в организме, да и ускорит метаболизм, снизит аппетит и поможет скинуть лишний вес. 5. Сон Качественный сон играет важную роль в процессе похудения. Пытайтесь спать не менее несколько часов в сутки, чтоб ваш организм мог восстановиться, а метаболизм был в норме. 6. Управление стрессом Стресс может стать препятствием на пути к похудению что нужно сделать чтобы сбросить вес Найдите методы расслабления и отдыха: медитация, йога, чтение книжек, прогулки на природе. 7. Ежедневный контроль Ведение дневника пищевых повадок и физической активности поможет вам осознать, что вы едите и какой-никакое количество калорий потребляете, также оценить свои успехи. 8. Постепенные изменения Избегайте радикальных диет и раздражающих факторов и ситуаций. Внедряйте изменения в питании и виде жизни равномерно, чтоб они стали стабильными привычками. Quote Link to comment Share on other sites More sharing options...
TerryKig Posted July 23 Share Posted July 23 0.019 bitcoins en euros can uzbekistan buy bitcoin how to buy bitcoin how to buy bitcoin stock trolls crypto parafi capital a que hora comprar bitcoin smurfs crypto 2018 jan bitcoin price bitcoin buy tesla helium mobile token price buy bitcoin reidsville north carolina hq crypto city btc price bybit wi harper group brics gold-backed currency 0.01888 bitcoin to cash do i need bitcoin to buy dogecoin bitcoin casino fast payout coin tron how to buy altcoins with bitcoin on bittrex 10 best cryptos to buy how many bitcoins can you buy bitcoin payment gateway bitcoin buy sell strategy buying bitcoin in namibia buy bitcoin with my ira coinbase wont let me send crypto buy bitcoin ath time high bitcoin vs gold chart amp crypto latest news 10 years bitcoin performance 13 dollars to bitcoin bitcoin lifestyle review sea of stars physical release date trap bull binance ceo jail hivemapper token fidelity crypto news acomo esta el bitcoin stage 2 capital coinbase wallet secure how safe is it to buy hydrocodone with bitcoin mining coins with cpu buy bitcoins credit card india $bricks crypto sponge v2 crypto fastest way to buy bitcoins canada how to buy bitcoin lite neno price bitcoin casino no verification Quote Link to comment Share on other sites More sharing options...
TerryKig Posted July 24 Share Posted July 24 crypto finance buy bitcoin withn paypal xnos where to buy dash crypto what is dodge cryptocurrency abraxas bitcoin can you buy bitcoin with binnace 3.27 bitcoin in dollars notowania bitcoina 200 million crypto stolen defichain shiba inu price target chase won t let me buy bitcoin today bitcoin rate 0l crypto how to use a credit card to buy bitcoin pawthereum adin ross bitcoin 0.3 bitcoin into usd 1000 apr crypto buy ripple with bitcoin on bittrex honda accepts crypto mew crypto airdrop bear flag stocks how to buy bitcoin in canada online 1 pie crypto tiger hedge fund crypto tax form 8949 42 traffic increase to bitcoin.org as lira hurtles downward buy house bitcoin how much did elon buy bitcoin for 25 bitcoin to usd 10 years ago does zillow have all listings chinelink crypto in usa age to open crypto account ztg crypto ticker how can i buy bitcoin for my child amazon crypto coin price buy pc parts bitcoin 7 cryptos to buy american express crypto card bitcoin owner obol gambling tool bow to buy bitcoin atlantis crypto bitcoin buying app buy prepaid card bitcoin chainlink price prediction next bull run Quote Link to comment Share on other sites More sharing options...