![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Передача строк между потоками приложения [D7]
samum © (2007-02-21 09:26:00)Здравствуйте.
Вот встал такой вопрос: в приложении имеется несколько потоков. Каждый из них имеет необходимость передавать строку в главный поток. Пока это реализовано примерно так:
var
s: string;
p: pchar;
begin
self.FreeOnTerminate := true;
s := 'Тестовая строка';
p := PChar(s);
PostMessage(Form1.Handle, WM_SAMPLEMESSAGE, integer(p), 0);
end;
Ну, главный поток это ловит и со строкой как с Pchar работает.
Пока проблем не возникало, но вот смутные сомнения меня терзают - не получится ли, что при большом количесвтве таких потоков (учитывая, что каждый из них закрывается после отправки сообщения), в ту область памяти, на которую указывает pбудет распределено что-то другое поверх строки? Т.е. вместо строки я получу в главном потоке набор непонятных символов?
Может стоит использовать явно GetMem(p, length(s)+1), а в главном потоке FreeMem вызывать? Подскажите, пожалуйста.
evvcom (2007-02-21 09:42:00) [1]И судя по всему выдран кусок из метода, где s - локальная переменная. Потому скорее всего в большинстве случаев
> [1] MBo © (21.02.07 09:29)
> сообщение послано, строка освобождена, а прием состоится позже
это и происходит, а
> возникнет ошибка обращения к памяти
не происходит по чистой случайности. Видимо, не так часто запрашивается перевыделение памяти.
MBo (2007-02-21 09:29:00) [2]PostMessage не ждет обработки сообщения, поэтому может сложиться ситуация, когда сообщение послано, строка освобождена, а прием состоится позже, и возникнет ошибка обращения к памяти. SendMessage же дождется обработки сообщения, если устроит синхронный режим.