Форум: "Основная";
Текущий архив: 2003.09.01;
Скачать: [xml.tar.bz2];
ВнизНити Найти похожие ветки
← →
Orange Lim (2003-08-18 09:55) [0]Мастера, подскажите где грабли:
1. Есть структура, например такая:
PData = ^TData;
TData = record
Status: Byte;
dwSize: Cardinal;
Source: String;
end;
var
Data: TData;
2. Создаю новый поток
...
h := BeginThread(nil, 0, ThreadProc, @Data, 0, IdTh);
...
Но при обращении к элементам структуры, переданной через указатель, вылетает с ошибкой Access Violation.
Структура и функции объявлены в одном модуле.
А функция например такая:
function ThreadProc(P: Pointer): Integer;
begin
PData(P^).dwSize := 0;
end;
← →
han_malign (2003-08-18 10:01) [1]либо TData(P^), либо PData(P )^, но уж никак не подругому...
← →
Orange Lim (2003-08-18 10:20) [2]Хорошо подметил :-))
← →
panov (2003-08-18 11:17) [3]>Orange Lim © (18.08.03 09:55)
function ThreadProc(P: Pointer): Integer; stdcall;
← →
panov (2003-08-18 11:18) [4]Сорри, это для CreateThread требуется...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.09.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c