Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Вниз

Как в отдельном потоке вызвать функцию из основного без зависаний   Найти похожие ветки 

 
AlxAY   (2012-02-17 13:53) [0]

Пробовал по-разному:
procedure TMyThread.Execute;
begin
....
  Synchronize(Name(1, "строка")); //- так не компилируется
  // Form1.Name(1, "строка"); - так виснет выполнение данной функции
...
end;

function Form1.Name(X: integer; S: String): Integer;
begin
...
end;

Отдельно скопировать то-же самое для потока TMyThread, продублировать код Name(X:integer;S:String):Integer ? Или можно использовать одну function Form1.Name ???


 
Сергей М. ©   (2012-02-17 14:18) [1]

В справке же есть пример, почему не проштудировать его ?


 
Ega23 ©   (2012-02-17 14:53) [2]

Синхронайзом пускается метод без параметров.


 
Dimka Maslov ©   (2012-02-17 15:10) [3]

можно ещё форме сообщение послать.


 
SMTP   (2012-02-17 20:38) [4]

А, простите, что есть "функция из основного"?


 
antonn ©   (2012-02-18 01:23) [5]


> SMTP   (17.02.12 20:38) [4]

там где VCL


 
Sha ©   (2012-02-18 01:42) [6]

IntToStr() там или не там?


 
antonn ©   (2012-02-18 01:56) [7]

Там конечно же. И больше нигде быть не может, поэтому желательно к ней обращаться через критическую секцию.
Крит. секция, кстати тоже там, поэтому к ней тоже нужно через отдельную синхронизацию обращаться. Только не очень часто - программа заболеть может от напряжения.

ЗЫ напряжение можно взять в розетке
ЗЗЫ розетка не в потоке, потому можно без синхронизации


 
_Юрий   (2012-02-19 09:57) [8]

Отправить форме сообщение
(PostMessage)
параметры передать через параметры сообщения



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.072 c
15-1339161690
Unk
2012-06-08 17:21
2013.03.22
Почему статьи не дополняются?


3-1282803008
Nurjanov
2010-08-26 10:10
2013.03.22
[Error] Need imported data reference ($G) to access GUID_NULL f


15-1337173516
oldman
2012-05-16 17:05
2013.03.22
ХОЧУ В ОТПУСК!!!


15-1330983798
Дмитрий С
2012-03-06 01:43
2013.03.22
Зачем нужен IFDEF POSIX?


15-1330079134
AV
2012-02-24 14:25
2013.03.22
Контроллер, большой, промышленный. Для чего? (vs Обычный ПК?!)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский