ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / С вызовом external функции из потока какие-то непонятки
9 сообщений из 34, страница 2 из 2
  2  все
С вызовом external функции из потока какие-то непонятки
    #39713008
Фотография Flying-home
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Flying-home
Участник
_Vasilisk_,

Если так, то почему не создать это окно при вызове первой, безобидной функции "Ты здесь?"
...
Рейтинг: 0 / 0
04.10.2018, 14:13
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713018
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
Flying-homeЕсли так, то почему не создать это окно при вызове первой, безобидной функции "Ты здесь?"С этим вопросом - к разработчикам.

Я вам указал вероятную причину. Единственное чем отличается основной поток от дополнительных - наличие очереди обработки сообщений
...
Рейтинг: 0 / 0
04.10.2018, 14:24
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713028
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dimitry Sibiryakov
Участник
_Vasilisk_Я вам указал вероятную причину.

Это причина по которой функции могут не работать. Ошибка 216 от этого вряд ли вылезет.

Аффтар, DrMemory в руки и смотреть где shit happen.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
04.10.2018, 14:40
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713044
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
_Vasilisk_Единственное чем отличается основной поток от дополнительных - наличие очереди обработки сообщений
Откуда уверенность, что у доп. потока нет очереди сообщений?
...
Рейтинг: 0 / 0
04.10.2018, 15:04
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713067
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Короче, мне надоело.
Напиши уже IsMultiThreaded := True в begin end файла dpr библиотеки.
...
Рейтинг: 0 / 0
04.10.2018, 15:30
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713086
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
YuRockНапиши уже IsMultiThreaded := True в begin end файла dpr библиотеки.Я не уверен, что библиотека у автора с исходниками и на делфи
wadmanОткуда уверенность, что у доп. потока нет очереди сообщений?Хрустальный шар
...
Рейтинг: 0 / 0
04.10.2018, 15:50
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713184
Фотография Flying-home
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Flying-home
Участник
Кстати, раз уж зашел разговор про память, меня давно мучает вопрос. Могу ли я создавать StringList в одной процедуре, а освобождать в другой? Ведь если не забывать про освобождение, проблем не должно быть?
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
  ...
  Lines := StringParts(Line);
  ...
  Lines.Free;
  ...

function StringParts(s : String) : TStringList;
begin
  result := TStringList.Create;
  result.Delimiter := ',';
  result.StrictDelimiter := true;
  result.DelimitedText := s;
end;



И это, прога заработала. Всем спасибо за обсуждение. Первый вызов делаю в основном потоке.
...
Рейтинг: 0 / 0
04.10.2018, 18:04
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713215
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
Flying-homeМогу ли я создавать StringList в одной процедуре, а освобождать в другой?Если аккуратно, то можно
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
  ...
  Lines := StringParts(Line);
  try
    ...
  finally
    Lines.Free;
  end;
  ...

function StringParts(s : String) : TStringList;
begin
  result := TStringList.Create;
  try
    result.Delimiter := ',';
    result.StrictDelimiter := true;
    result.DelimitedText := s;
  except
    Result.Free;
    raise;
  end;
end;
...
Рейтинг: 0 / 0
04.10.2018, 18:46
| Ответить | Цитировать | Написать  
С вызовом external функции из потока какие-то непонятки
    #39713326
Фотография Flying-home
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Flying-home
Участник
Похоже, действительно, этот API потоконебезопасный.
авторClosing the API

function oziCloseApi:integer;stdcall;

Versions
API - 1.08

Frees up any windows or data the dll has created for its own use.

The function should be called before your own program exits otherwise you may get an error (especially if running on win 2000).

If programming in Delphi you could place the call in the Destroy method of your main form.
...
Рейтинг: 0 / 0
05.10.2018, 08:49
| Ответить | Цитировать | Написать  
9 сообщений из 34, страница 2 из 2
  2  все
Форумы / Delphi [игнор отключен] [закрыт для гостей] / С вызовом external функции из потока какие-то непонятки
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39713028&tid=2040319]:
 0ms
get settings:
 8ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 193ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 1ms
others: 205ms
total:  505ms
созд. / загр.: 505ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]