Студопедия
Новини освіти і науки:
МАРК РЕГНЕРУС ДОСЛІДЖЕННЯ: Наскільки відрізняються діти, які виросли в одностатевих союзах


РЕЗОЛЮЦІЯ: Громадського обговорення навчальної програми статевого виховання


ЧОМУ ФОНД ОЛЕНИ ПІНЧУК І МОЗ УКРАЇНИ ПРОПАГУЮТЬ "СЕКСУАЛЬНІ УРОКИ"


ЕКЗИСТЕНЦІЙНО-ПСИХОЛОГІЧНІ ОСНОВИ ПОРУШЕННЯ СТАТЕВОЇ ІДЕНТИЧНОСТІ ПІДЛІТКІВ


Батьківський, громадянський рух в Україні закликає МОН зупинити тотальну сексуалізацію дітей і підлітків


Відкрите звернення Міністру освіти й науки України - Гриневич Лілії Михайлівні


Представництво українського жіноцтва в ООН: низький рівень культури спілкування в соціальних мережах


Гендерна антидискримінаційна експертиза може зробити нас моральними рабами


ЛІВИЙ МАРКСИЗМ У НОВИХ ПІДРУЧНИКАХ ДЛЯ ШКОЛЯРІВ


ВІДКРИТА ЗАЯВА на підтримку позиції Ганни Турчинової та права кожної людини на свободу думки, світогляду та вираження поглядів



Приклад

Обробник події OnFind повинен знайти зразок в тексті і показати його користувачеві. Хай, наприклад, компонент Memo1 містить відшукуваний фрагмент, і пошук йде з урахуванням регістра. Тоді обробник може мати такий вигляд:

procedure TForm1.FindDialog1Find (Sender: TObject);

var

SelPos:Integer;

begin

with TFindDialog (Sender) do

begin

//Шукаємо фрагмент в тексті

SelPos:=Pos(FindText, Mtmo1.Lines.Text);

if SelPos>0 then

begin //Фрагмент знайдений - виділяємо його

Memo1.SelStart:=SelPos-1;

Memo1.SelLength:=Length(FindText);

end else

ShowMessage('Текст"' + FindText + '"не найден');

end; end;


Читайте також:

  1. IV. ПРИКЛАДИ ТИПОВИХ ІНДИВІДУАЛЬНИХ ЗАВДАНЬ ТА ПОРЯДОК ЇХ РОЗВ’ЯЗАННЯ
  2. Абсолютні синоніми (наприклад, власне мовні й запозичені) в одному тексті ділового стилю вживати не рекомендується.
  3. Алгоритм однофакторного дисперсійного аналізу за Фішером. Приклад
  4. Аналіз структури та динаміки необоротних активів за даними Ф№1 «Баланс» (на прикладі ВАТ «Горизонт»)
  5. Базові та прикладні класифікації
  6. В Додатку до диплома (приклад)
  7. В процесі читання виділіть маркером або підкресліть приклади дії променів на живі організми.
  8. В чому полягає явище тунелювання через потенціальний бар’єр, наведіть приклади.
  9. Вивчення прикладу СК: моніторинг дотримання положень КПК ООН з боку СК
  10. Визначення і приклади
  11. Виокремте з обраної програми концептуальну ідею, мету, наведіть 1-2 приклади форм і методів її реалізації.
  12. Вільсон О. Г. Охорона праці в галузі (на прикладі будівництва). Навчальний посібник. – К.: «Основа». 2006. – 204 с.




Переглядів: 397

<== попередня сторінка | наступна сторінка ==>
Компонент TFindDialog | Компонент TReplaceDialog

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

  

© studopedia.com.ua При використанні або копіюванні матеріалів пряме посилання на сайт обов'язкове.


Генерація сторінки за: 0.017 сек.