Текущий архив: 2007.04.15;
Скачать: CL | DM;
Вниз
Неправильный Hint :) Найти похожие ветки
← →
Riply © (2007-03-21 03:40) [0]Здравствуйте !
В ситуациях, похожих на приведенную ниже, стал
появляться Hint (раньше, вроде, не было).
"Значение, присвоенное InternalThreadFunct ну совсем нигде не используется" :).
А оно мне нужно :)
Честно говоря, мне это очень сильно мешает.function InternalThreadFunct(pParam: Pointer): integer;
begin
Result := 6574;
while True do
begin
//////////
end;
end;
procedure TMainForm.btnStartClick(Sender: TObject);
var
i: integer;
hThread: THandle;
ThreadID: DWord;
begin // Попытка показать, что результат нужен :)
i := InternalThreadFunct(nil);
if i = 8 then Beep;
hThread := BeginThread(nil, 0, InternalThreadFunct, nil, CREATE_SUSPENDED, ThreadID);
Как ей (Delphi) объяснить, что в данной ситуации Result мне нужен ?
P.S. BDS 2006, но попробовала в Delphi 7 - та же картина.
← →
Riply © (2007-03-21 05:32) [1]Разобралась.
BDS - ка умная. Она не видела условия при котором
можно выйти из цикла, о чем и сообщала :)
Страницы: 1 вся ветка
Текущий архив: 2007.04.15;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.036 c
