Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.057 c
2-1174805889
GeLLeR
2007-03-25 10:58
2007.04.15
Drag and Drop


15-1174164985
Shamansky
2007-03-17 23:56
2007.04.15
Delphi PHP


2-1174910685
Sonia
2007-03-26 16:04
2007.04.15
Поиск значения в БД через DBLookupComboBox


15-1174477063
zdm
2007-03-21 14:37
2007.04.15
Создание сайта


5-1151158278
PRT
2006-06-24 18:11
2007.04.15
DelhiX в Delphi 7