Узнать об изменениях в тексте

@Чиполлино · Регистрация: 13.05.2012

Студворк — интернет-сервис помощи студентам

Привет всем.
В общем имею такой мессенджер, что-то вроде ICQ, Skype и т.п. который не имеет функцию ведения истории сообщений, я решил написать программу для ведения такой истории.

Уже почти написал её, получаю хендл компонента в котором находятся сообщения, получаю эти сообщения, иииии, я не знаю как грамотно сделать ведение лога.

Объясняю на пальцах

Получаем на вход:

Петя:
Привет чуваки.
Вася:
Здарова, здарова.
Николай:
Йоу, парни.

Сохраняем в Log.Txt

Получаем снова на вход

Петя:
Привет чуваки.
Вася:
Здарова, здарова.
Николай:
Йоу, парни.
Петя:
Как дела у всех, как настрой?
Вася:
Да вроде неплохо всё, настрой ок.

Дописываем в log.txt

Петя:
Как дела у всех, как настрой?
Вася:
Да вроде неплохо всё, настрой ок.

Я нарисовал алгоритм в голове, что нужно занести последние две строки в буффер, и потом с помощью функции Pos, определять есть ли символы после этих двух строк, если есть, то копировать и заносить.
Но что-то мне не нравится так, есть получше идеи? Я уверен что это велосипед еще тот.

@cotseec · 30.03.2014, 14:42

Сообщение от Чиполлино

что нужно занести последние две строки в буффер, и потом с помощью функции Pos, определять есть ли символы после этих двух строк, если есть, то копировать и заносить.

а почему нельзя сразу записывать в файл? без сравнения, сообщения ведь только накапливаются, уменьшения количества сообщений не происходит
в любом случае если необходимо что-то сравнивать, то не проще ли сравнивать количество строк в файле и в полученном списке? формат сообщений ведь тоже не изменяется

@Чиполлино · 30.03.2014, 16:11 **[ТС]**

Мессенджер накапливает сообщения до определённого постоянного значения строк (около 140) и после этого начинает удалять верхние и добавлять нижние.

Поэтому если заменять файл, то я получу тоже самое, что и в окне мессенджера.
Поэтому количество строк всегда будет равно 140(когда наберется 140 строк) и сравнивать бесполезно.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
   
NewText.Text:=s;
   i:=0;
   if length(Memo2.Text) = 0 then
    Memo2.Lines.Text:= NewText.Text 
   else
   Begin
      While (newtext[newtext.Count-i] <> Memo2.Lines[Memo2.Lines.Count]) or (i = Memo2.Lines.Count) do 
        inc(i);
      for k:=1 to i do
        Memo2.Lines.Add(Newtext[Newtext.Count-i]);
      NewText.Free;
    End;

Решил сделать сравнение строк, что-то не работает, вылезает за пределы почему то.

@mss · 30.03.2014, 16:40

Сообщение от Чиполлино

получаю хендл компонента в котором находятся сообщения

Эти сообщения попадают туда в рез-те получения и обработки компонентом оконных сообщений опер.системы.
Поэтому разумным и наверняка вполне достаточным будет перехват этих оконных сообщений непосредственно в момент их отправки/получения, а не периодическое тупое чтение всей этой унылой "йоу"-галиматьи, в надежде увидеть там что-то новое)

@Чиполлино · 02.04.2014, 07:54 **[ТС]**

Сообщение от mss

Поэтому разумным и наверняка вполне достаточным будет перехват этих оконных сообщений непосредственно в момент их отправки/получения.

Я думаю это лучший вариант, но проблема в том, что я не умею это делать.

Можете подсказать, я поискал в интернете, но нашел просто функции, которые мне непонятны.

Добавлено через 24 часа 35 минут
Поднимаю наверх, нужна помощь.

Добавлено через 23 часа 14 минут
В общем, как и обычно, сделал через задницу, вопрос закрыт.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .